ich möchte in einem Textfeld das Erstellungsdatum und in einem 2. das Updatedatum anzeigen.
Wie kann ich das realisieren?
Private Sub Form_BeforeUpdate(Cancel As Integer)
With Me
If .NewRecord Then
.CreateDate = Now() 'mit Uhrzeit, oder ohne
.CreateDate = Date()
Else
.ChangeDate = Now() 'bzw. Date(), s.o.
End If
End With
End Sub
ich habe da ein Verständnisproblem.
Füge doch bitte einmal eine MsgBox ein und zeige das datum
Zitatdas Erstellungsdatum und in einem 2. das Updatedatum anzeigen
Zum ANZEIGEN: Du brauchst diese Felder in der anzuzeigenden Tabelle und bindest auch diese an Formular-Textfelder (falls Du in einem Formular arbeitest). Sicher keine schwere Übung.
Beaker s.a. zeigte, wie man bei der Arbeit im gebundenen Formular diese Felder auch direkt füllt, in Abweichung zu Deiner Frage.
Ich habe dieses Problem für mich noch nicht gelöst und komme später darauf zurück
bis hierher erst einmal Danke für eure Bemühungen mir Erleuchtung zu verschaffen