[ DSavic @ 05.03.2009. 09:17 ] @
Gde grešim ? For icnt = 0 To lList If List9.Selected(icnt) = True Then Form_frm_master.RecordSource = "SELECT qry_master.* FROM qry_master WHERE ([qry_master].[ID])=" & List9.Column(0, icnt) Form_frm_master.Visible = True ssrec = "ID = " & List9.Column(0, icnt) Exit Sub End If |