From: PJ on
I have the following event procedure on a text box:

Private Sub txtNotesOnTransaction_BeforeUpdate(Cancel As Integer)
Debug.Print "User: " & CurrentUser() & " " & Me!txtNotesOnTransaction
End Sub


It is suppose to stamp the user name in the text box but it does not work.

Any suggestions?

Thanks
From: Daryl S on
PJ -

The debug.print will just display (in the immediate window of the code pane)
the name and the Notes. If you want the notes saved with the name, do this:

Me!txtNotesOnTransaction = "User: " & CurrentUser() & " " &
Me!txtNotesOnTransaction


--
Daryl S


"PJ" wrote:

> I have the following event procedure on a text box:
>
> Private Sub txtNotesOnTransaction_BeforeUpdate(Cancel As Integer)
> Debug.Print "User: " & CurrentUser() & " " & Me!txtNotesOnTransaction
> End Sub
>
>
> It is suppose to stamp the user name in the text box but it does not work.
>
> Any suggestions?
>
> Thanks
From: Douglas J. Steele on
In addition to what Daryl told you, hopefully you know that CurrentUser only
works if you're using a file format from Access 2003 or earlier and you've
applied Access User Level Security. Otherwise, it'll return Admin for all
users.

--
Doug Steele, Microsoft Access MVP
http://www.AccessMVP.com/DJSteele
(no e-mails, please!)

"PJ" <PJ(a)discussions.microsoft.com> wrote in message
news:D2B3DEE4-37D4-4254-9AC8-1468612E5F24(a)microsoft.com...
>I have the following event procedure on a text box:
>
> Private Sub txtNotesOnTransaction_BeforeUpdate(Cancel As Integer)
> Debug.Print "User: " & CurrentUser() & " " & Me!txtNotesOnTransaction
> End Sub
>
>
> It is suppose to stamp the user name in the text box but it does not work.
>
> Any suggestions?
>
> Thanks