Sytse1
Gebruiker
- Lid geworden
- 9 aug 2007
- Berichten
- 584
- Office versie
- miDer
In mijn Form heb ik de knoppen ga naar vorig, volgend, 1e en laatste record.
Met naar het gaan van het volgend record kom je na het laatste record automatisch in een leeg (nieuw) record.
Maar dit wil ik niet. Er is al een knop voor een nieuw record.
Ik probeer dit op te lossen met de volgende code.
Vervolgens met
Maar ook dit werkt niet.
De volgende code geprobeerd.
Maar hierbij krijg ik de melding.
Geen huidig record??
Wie weet een wel werkende code hiervoor?
B.v.d.
Sytse
Na veel proberen is het met de volgende code toch gelukt.
:d
Met naar het gaan van het volgend record kom je na het laatste record automatisch in een leeg (nieuw) record.
Maar dit wil ik niet. Er is al een knop voor een nieuw record.
Ik probeer dit op te lossen met de volgende code.
Code:
'------------------------------------------------------------------------
'Ga naar het laatste record maar toon niet een leeg record middels A_Preview terug
'------------------------------------------------------------------------
DoCmd.GoToRecord A_FORM, Screen.ActiveForm.FormName, A_Next
stActiveCtl$ = Screen.ActiveControl.ControlName
If (Err) Then stActiveCtl$ = ""
DoCmd.GoToRecord A_FORM, Screen.ActiveForm.FormName, A_Preview
Vervolgens met
Code:
If (Not IsNull(Me.IdMw.Value)) Then
DoCmd.GoToRecord , , acNext
End If
De volgende code geprobeerd.
Code:
With Me.RecordsetClone
Do Until Not .EOF
If Me.Dirty Then
Me.Dirty = False
End If
.MoveNext
Me.Bookmark = .Bookmark
Loop
End With
Maar hierbij krijg ik de melding.
Geen huidig record??
Wie weet een wel werkende code hiervoor?
B.v.d.
Sytse
Na veel proberen is het met de volgende code toch gelukt.
Code:
If Me.IdMw.Value = Null Then
DoCmd.GoToRecord , , acPreview
Else: DoCmd.GoToRecord , , acLast
End If
Laatst bewerkt: