[es] - Pozivanje druge forme iz liste

DSavic

Član broj: 83445
Poruke: 34
*.telekom.yu.

Profil

^{05.03.2009. u 09:17 - pre 184 meseci}

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

Odgovor na temu

domaci_a_nas
PHP developer

Član broj: 42333
Poruke: 524
*.dynamic.sbb.rs.

+8 Profil

Re: Pozivanje druge forme iz liste

^{05.03.2009. u 09:46 - pre 184 meseci}

Grešiš u mnogo čemu. Možeš da u List9_Click upišeš

Code:
Form_frm_master.RecordSource = "SELECT qry_master.* FROM qry_master WHERE ([qry_master].[ID])=" & Nz(List9,0)
Form_frm_master.Visible = True

Ozbiljan i odgovoran mladić

Odgovor na temu

DSavic

Član broj: 83445
Poruke: 34
*.telekom.yu.

Profil

Re: Pozivanje druge forme iz liste

^{05.03.2009. u 09:56 - pre 184 meseci}

Ne radi...

Private Sub List9_DblClick(Cancel As Integer)
Forms!frm_Pretraga.Visible = False
Dim lList As Integer
Dim icnt As Integer
ssrec = ""
lList = List9.ListCount - 1

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
Next icnt

End Sub

Kada je u pitanj txt polje a ne ID ..onda prolazi ovako (ali meni treba da se poziva na number)

Private Sub List9_DblClick(Cancel As Integer)
Forms!PretragaJMBG.Visible = False
Dim lList As Integer
Dim icnt As Integer
ssrec = ""
lList = List9.ListCount - 1

For icnt = 0 To lList
If List9.Selected(icnt) = True Then

Form_frmmaster.RecordSource = "SELECT tblmaster.* FROM tblmasterWHERE ((([tblmaster.[MLB])='" & List9.Column(0, icnt) & "'));"
Form_frmmaster.Visible = True
ssrec = "MLB = '" & List9.Column(0, icnt) & "'"
Exit Sub

End If
Next icnt

End Sub

Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.100.46-69.q9.net.

+79 Profil

Re: Pozivanje druge forme iz liste

^{05.03.2009. u 14:23 - pre 184 meseci}

Sta ti u stvari pokusavas? Deluje kao da zelis da otvoris formu za osobu izabranu sa liste. Zar ne bi moglo

Code:
DocmdOpenForm FormName:="frmTvojaForma",WHereCondition:="MLB = '" & me!List9 & "'"

Da bi se otvorila forma za tacno odredjeni rekord NE MORA da se menja formin rekordset. Moze, ovako kako si ti pokusao, ali to nije nacin na koji se radi u Accessu. Ako sam pogodio sta radis, to je kao kad u PAncevo putujes preko Skoplja i Sarajeva. I Nikola je u pravu, ako vec pokusavas na komplikovan nacion, on ti je pokazao sta je za nijansu jednostavnije. To sto nece da ti proradi, ima neki drugi razlog.

Odgovor na temu