Login
`
Templates, Tools and Utilities
|
||
Icetips Article
Back to article list
Search Articles
Add Comment
Printer friendly
Direct link
Par2: Getting user name in Windows 1998-02-05 -- Troy Sorzano MODULE('Windows API')
GetUserNameA(*Cstring,*Long),BOOL,PASCAL,RAW
END
Loc:Login_Buffer CSTRING(256)
Loc:Login_Buffer_Size LONG
Loc:Login_Buffer_Size = 255
IF NOT GetUserNameA(Loc:Login_Buffer,Loc:Login_Buffer_Size)
MESSAGE('Error GetUserNameA','Windows API Error',ICON:HAND)
ELSE
MESSAGE('Name: '&Loc:Login_Buffer)
END
This works for us in CW 2.003 32bit.
I think this only gets the windows network loging. It might not get a Novell login.
Today is November 21, 2024, 7:52 am This article has been viewed 35198 times.
|
|