Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Current login username
Message
 
À
08/02/2006 19:24:45
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9
OS:
Windows XP SP2
Database:
Visual FoxPro
Divers
Thread ID:
01094665
Message ID:
01094841
Vues:
12
>>>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


Forgot to mention that you must relog in once to take effect or it would return Steve again.
Lead programmer of the free MIS Info Video(Frontend/player), Info 2 MIS or visit me at Steve's Tech Blog
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform