Can't return function value to table?

[dax1226]

I have a form that I need to return the value of a fOSUserName() function back to the table so that I know the username of the person who last updated a record. I have been able to display the username on the form with the function, but have not been able to figure out how to assign the value of that function to the actual "Updated" field in the table.

Any assistance would be greatly appreciated.

 

[boblarson]

Just do this - In the Before Update event of the form put

Me.YourLastUpdatedByTextBoxNameHere = fOSUserName

(no parens after fOSUserName needed).

 

[dax1226]

Bob,

When doing that I received the following error in running the actual form "Microsoft Office Access can't find the macro 'Me'."

Just do this - In the Before Update event of the form put

Me.YourLastUpdatedByTextBoxNameHere = fOSUserName

(no parens after fOSUserName needed).

 

[boblarson]

You are not putting it in the event then (probably putting it in the property instead). See here on my website for what I think you are doing:

http://www.btabdevelopment.com/main/QuickTutorials/Wheretoputcodeforevents/tabid/56/Default.aspx

 

[dax1226]

I put this in the event procedure box:
Private Sub Form_Current()
WFH_Actives.Updated = fOSUserName
End Sub

Now I get a runtime error 424.

You are not putting it in the event then (probably putting it in the property instead). See here on my website for what I think you are doing:

http://www.btabdevelopment.com/main/QuickTutorials/Wheretoputcodeforevents/tabid/56/Default.aspx

 

[boblarson]

What is this - WFH_Actives ?

 

[dax1226]

What is this - WFH_Actives ?

That's my table. If I just do:
Private Sub Form_Current()
Me.Updated = fOSUserName
End Sub

Then I get:
Compile Error
Method or data member not found.

 

[boblarson]

You need to have a control on the form bound to the field "Updated" for Me.Updated = fOSUserName to work.

You can't reference a table like that in VBA.

So, add a control (you can set its visible property to NO if you don't want it seen) to the form and call it txtUpdated, bind it to the field Updated and then use:

Me.txtUpdated = fOSUserName

 

[dax1226]

Finally!

Thank you so much for your extremely prompt response and patience!

You need to have a control on the form bound to the field "Updated" for Me.Updated = fOSUserName to work.

You can't reference a table like that in VBA.

So, add a control (you can set its visible property to NO if you don't want it seen) to the form and call it txtUpdated, bind it to the field Updated and then use:

Me.txtUpdated = fOSUserName

 

[boblarson]

WOO HOO!! I'm glad we finally got that working for you.

Glad to be able to help!

 

[dax1226]

Same, been trying to figure this out all day!

Very glad I ran across this board.

WOO HOO!! I'm glad we finally got that working for you.

Glad to be able to help!