|
Short story: Obtain information about current user, as provided by USER_INFO_3 and GROUP_INFO_2.
Longer description from old site: click here.
To be edited...
This sample, or the one from which it originally derived, was published (or at least peripherally mentioned) in the following article(s):
- Name the Domain, Q&A, VBPJ Enterprise Edition, 1997
- Who Says VB Can't Use Pointers?, Ask the VB Pro, VBPJ, November 1999
This sample uses the following API calls:
Module Library Function CGetDcName.cls kernel32
netapi32
ole32FreeLibrary
GetModuleHandle
GetProcAddress
LoadLibrary
lstrlen
lstrlen
RtlMoveMemory
DsGetDcName
NetApiBufferFree
StringFromGUID2CNetUser.cls advapi32
kernel32
netapi32GetUserName
GetComputerName
GetVersionEx
lstrcpy
lstrlen
RtlMoveMemory
NetApiBufferFree
NetUserChangePassword
NetUserGetGroups
NetUserGetInfo
NetUserGetLocalGroupsMUserName.bas advapi32 GetUserName Don't see what you're looking for? Here's a complete API cross-reference.
Please, enjoy and learn from this sample. Include its code within your own projects, if you wish. But, in order to insure only the most recent code is available to all, I ask that you don't share the sample by any form of mass distribution. Download NetUser.zip, 20Kb, Last Updated: Friday, September 24, 2004