[ zslavko @ 09.08.2010. 17:38 ] @
Private Sub Ula_ID_AfterUpdate() Dim strFilter As String strFilter = "UlaID = " & Me![Ula ID] Me!DatumUplate = DLookup("DateU", "zUlazi", strFilter) Me![Broj fakture] = DLookup("[Broj fakture]", "zUlazi", strFilter) Me!JCI = DLookup("JCI", "zUlazi", strFilter) Me!Kontrolnik = DLookup("Kontrolnik", "zUlazi", strFilter) End Sub Ovaj kod je funkcionisao dok je UlaID bio Autonumber, posle sam ga pretvorio u Text polje I sada mi izbacuje grešku sledeću: Run-time error 3464: Data type mismatch in criteria expression. UlaID mi broji ulazne fakture. Šta mi je greška. |