title image


Smiley Datensatz nach Aktualisierung einstellen
Hallo Leute,



ich möchte, dass Access nach dem Aktualisieren nicht zum ersten Datensatz springt, sondern beim jeweiligen Datensatz bleibt. Leider funktioniert nichts. Ich habe auch schon Prozeduren aus dem Archiv probiert, leider auch kein Erfolg. Was mache ich denn nur falsch.





Gruss Wolfgang







Private Sub Form_AfterUpdate()

On Error GoTo ErrorHandler

Dim db As Database

Dim rs As Recordset

Dim strLesezeichen As String

Dim strZähler As String

Dim strKriterium As String





Set db = CurrentDb

Set rs = db.OpenRecordset("tblKundenMitarbeiter", dbOpenDynaset)



strKriterium = "'" & Me.strMitarbeiterNrCnt & "'"



rs.FindFirst "[strMitarbeiterNrCnt] = " & strKriterium







If rs.NoMatch = False Then

strLesezeichen = rs.Bookmark

End If



rs.Bookmark = strLesezeichen



ErrorHandler:

If Err.Number 0 Then

MsgBox Err.Number & " " & Err.Description

End If

End Sub

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: