Prikazi cijelu temu
22.05.2019 00:11
22.05.2019 00:11
Predmet:Re: Custom Menu dozvole
Case 1 'Otvori formu
DoCmd.OpenForm ImeForme, , , , , acIcon
Set Frm = Forms(ImeForme)
Frm.SetFocus
Forms!frmPristup.Form.RecordSource = ("SELECT * FROM tblOperatori WHERE KorisnikID=" _
& M_Oper.OperID)
DoCmd.Restore
Case 1 'Otvori formu
DoCmd.OpenForm ImeForme, , , , , acIcon
Set Frm = Forms(ImeForme)
Frm.SetFocus
Forms!frmPristup.Form.RecordSource = ("SELECT * FROM tblOperatori WHERE KorisnikID=" _
& M_Oper.OperID)
DoCmd.Restore
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.