Hallo,
ich wieder mal ???
Ich möchte beim Öffnen eines Formulars eine Funktion aufrufen (Windows Benutzername ermitteln) und den Wert in meine Tabelle schreiben.
Das ist eigentlich schon alles.
Danke....
Grüße
Hallo,
das kommt darauf an, wie das gemeint ist.
Wenn Du den Benutzernamen fortlaufend bei jedem Start wie z.B eines Eröffnungsformulars in eine Tabelle (und das soll nicht die Tabelle des Formulars sein) kanns du beim Öffnen des Formulars schreiben:
Private Sub Form_Open(Cancel As Integer)
CurrentDb.Execute "INSERT INTO tblBenutzer ( Benutzer ) VALUES (Environ('UserName'))"
End Sub
Gruß Oma
...okay und wie waere der Code, wenn ich den Usernamen in die aktuelle Tabelle des Formulars eintragen möchte.
2. Wie würde der Code heissen, wenn ich den Usernamen nur ermitteln möchte wenn der dem Formular zu Grunde liegende Datensatz geaendert wird.
Hilfe waere schoen.
Viele grüsse von Rychy
Hi,
im Anhang ein Beispiel.
Das Formular nutzt das Ereignis "Vor Änderung":
Private Sub Form_BeforeUpdate(Cancel As Integer)
Me.BenutzerName = Environ("UserName")
End Sub
Harald
[Anhang gelöscht durch Administrator]