Retrieving UserName in XP 2

[Ed2020]

The company I work for is due to change from NT4 to WinXP Pro in the next few months.

My team supports in excess of 200 MS Access databases, most of which use Environ$("User&quot to retrieve the current user's login ID.

How do I do this in WinXP??

Many thanks in advance.

Ed Metcalfe. Please do not feed the trolls.....

 

[Beeps]

MsgBox("The current user is: " & CurrentUser)

CurrentUser function is a simple way that works for XP

 

[Ed2020]

Beeps,

Doesn't CurrentUser() return the current workgroup ID that the user is using? I was looking for the Windows user name.....

Ed Metcalfe. Please do not feed the trolls.....

 

[VulcanJedi]

try this?

'/*-/*-/-**/-/*-/*-/*-*/*-/*-/*-
'get username
Dim netw As Object

Set netw = CreateObject("WScript.Network&quot
myuser = netw.UserName
Set netw = Nothing
'/*-/-*/*/-*/*-/*-

-Tranpkp Tranpkp

 

[Beeps]

Thanks for the nice post Tranpkp, here's a star for you. Thought I knew something, but learned something

Here's a good site on getting started with the WScript objects

http://www.winguides.com/scripting/reference.php?id=108