Subform Errors connect to OLE

[d1004]

I created a subform and w/in my subform is a frame with 4 radio options (Apple, Orange, Grape, Banana). The purpose of this frame is when the user select a certain fruit, it populates the shopper ID and the current date into the field. And I use the following code:

Private Sub fraResultOpt_Click()
userID = Environ("username&quot
DateTested = Date
End Sub

But when I test it, it gave me the following error message:

A problem occurred while MSAccess was communicating with the OLE server or ActiveX Control.
* The expression may not result in the name of a macro, the anme of a user-defined function, or [Event Procedure].
* There may have been an error evaluating the function, event, or macro.


I even double check the name to see if it is spelled correctly, and it is. So I'm not sure why I'm getting this error. Please help.
-thank you.

 

[Norris68]

I assume the error is happening on the userID=... line?
It should work, but be aware that the username environment variable is not set on Win9X - it should return an empty string if not set.

Can you investigate further to isolate exactly where the error is occurring - is it the Environ() call, or the userID= assignment? Try a hard-coded string instead of Environ() e.g. userID = "Norris68"