Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Current login username
Message
From
08/02/2006 19:24:45
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9
OS:
Windows XP SP2
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01094665
Message ID:
01094837
Views:
11
>>Hi Steve,
>>Try this:
>>
>>Declare Long GetUserNameEx in Secur32 ;
>>   Long NameFormat, String @lpBuffer, Long @nSize
>>
>>nBufLen = 260
>>cAccountName = repl( chr(0), nBufLen )
>>If (GetUserNameEx( 3, @cAccountName, @nBufLen ) != 0)
>>   ? 'Friendly Account Name: ' + left( cAccountName, nBufLen-1 )
>>else
>>   ** GetLastError() return 1332 if the account name was not changed from the original one
>>endif
>>
>>Clear Dlls GetUserNameEx
>>
>
>That's it. It works!!!
>In the "else" above, you could use SYS(0) method so that the function would return a value not empty.
>

Yup, that's right! However I suggest you do the GetLastError() in case it return ERROR_MORE_DATA (need longer buffer) or an error other than above

>Thank you and to all the others.

You're welcome :)
Regards
Herman
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform