>This isn't coming from an ActiveX control but this works under VFP 6.0.
>
>m.cUser = substr(sys(0),at("#",sys(0)) + 2)

This will blow up if the user bypasses the Windows login with the error 'Cannot access characters beyond string' - it's best to ALLTRIM like:

m.cUser = ALLTRIM(substr(sys(0),at("#",sys(0) + space(2)) + 2))

to avoid possible errors like this.