| |
| |
|
 |
Beschreibung:
GetUserName ermittelt den Usernamen des eingeloggten Users per den aktuellen Thread.
Deklaration:
Def @GetUserName(2) !ADVAPI32,GetUserNameA
Parameter:
 1.Parameter: Bereichsvariable, die den Usernamen aufnimmt.
2.Parameter: 4 Byte grande Bereichsvariable, in der die Dimensione des Bereichs von Parameter 1 in Bytes steht. Kehrt die Funktion zurück, steht hier die Länge des Usenamens plus das abschließende Nullbyte.
Rückgabewert:
1 bei Erfolg, 0 bei Misserfolg.
Beispiele:
KompilierenMarkierenSeparierenDef @GetUserName(2) !"ADVAPI32","GetUserNameA"
Declare USize#,UName#,Fehler&
Windowstyle 31
Windowtitle "Usernamen ermitteln"
Window 0,0-640,440
Dim Usize#,4
Dim UName#,256
LONG Usize#,0=256
LET FEHLER&=@GetUserName(UName#,Usize#)
PRINT "API Fehlercode="+@STR$(Fehler&)
Print "Username="+@String$(UName#,0)
Print "Länge mit abschließendem Nullbyte="+@STR$(@Long(USize#,0))
Dispose UName#
Dispose Usize#
While 0=0
Waitinput
wend
[keywords:71b84696e8]
Benutzer User aktuellen angemeldeten ermitteln
[/keywords:71b84696e8] |
|
| |
| |
| |
|
(850)
Deutsch
English
Français
Español
Italia