[ rribaric @ 06.08.2004. 15:35 ] @
Dali netko zna zašto mi u accessu 2000 izbacuje grešku kad pokrenem ovaj kod. Kod je inače napravljen za pozicioniranje na točno željeno polje. Konvertiran je iz 97 i u jednoj bazi mi radi a u drugima koje kreiram ne. U čemu je kvaka! Javlja mi grešku na dim tb as dao.recordset Tb.findfirst Tb.Nomatch Kod: Public Function fLoadKartica() Dim gdje As String, tb As DAO.Recordset gdje = Forms![Brisanje].OpenArgs If Len(gdje) > 0 Then Set tb = Me.RecordsetClone tb.FindFirst "ID=" + gdje If tb.NoMatch Then MsgBox "greska" Else Me.Bookmark = tb.Bookmark End If tb.Close End If End Function |