Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Finding out who the user is...
Message
 
To
21/01/1999 16:54:27
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00178748
Message ID:
00178914
Views:
24
Hi Eric,

Try this.

*==============================================================================
* Method: GetDefaultUserName
* Purpose: Gets the name of the user logged onto the machine at the * operating system level.
* Author: F1 Technologies
* Parameters:
* Returns:
*==============================================================================
LOCAL ;
lcNull, ;
lcUserId, ;
lnLen

lcNull=""
lcUserId=SPACE(255)
lnLen=255

* Use the WNetGetUser function in the Win32API to get the user id
DECLARE INTEGER WNetGetUser IN WIN32API String @, String @, Integer @
IF WNetGetUser(@lcNull,@lcUserId,@lnLen)=0
lcUserId=UPPER(LEFT(lcUserId,AT(CHR(0),lcUserId)-1))
ELSE
lcUserId = ""
ENDIF

RETURN ALLTRIM(lcUserId)
Mike Feltman

F1 Technologies
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform