XProfan

Italia

Beschreibung:

GetLengthSid ermittelt die Länge in Bytes eines Security Identifiers (SID). Die Funktion gibt es nur unter NT-basierten Windowssystemen.

Deklaration:

DEF @GetLengthSid(1) !advapi32,GetLengthSid

Parameter:

1.Parameter: Bereichsvariable mit einer SID Struktur oder Adresse einer SID Struktur.

Rückgabewert:

Wenn die SID Struktur gültig ist, Länge der SID Struktur in Bytes. Ist sie ungültig, ist der Rückgabewert undefiniert.

Beispiele:

Kompilieren Markieren Separieren

DEF @LookupAccountName(7) !"advapi32","LookupAccountNameA"
DEF @GetLengthSid(1) !"advapi32","GetLengthSid"
Declare sys$,User$,SIDa#,SIZE_SID#,DOMAIN#,SIZE_DOMAIN#,SID_NAME_USE#,Fehler&
DIM SIDa#,1024
DIM SIZE_SID#,4
DIM DOMAIN#,256
DIM SIZE_DOMAIN#,4
DIM SID_NAME_USE#,4
LET SYS$=""
LET USER$="Administrator"
CLEAR SIDa#,DOMAIN#,SID_NAME_USE#
LONG SIZE_SID#,0=1024
LONG SIZE_DOMAIN#,0=256
LET Fehler&=@LookupAccountName(@ADDR(SYS$),@addr(USER$),SIDa#,SIZE_SID#,DOMAIN#,SIZE_DOMAIN#,SID_NAME_USE#)
ADDSTRING "Fehlercode LookupAccountName="+@STR$(Fehler&)
LET FEHLER&=@GetLengthSid(SIDa#)
ADDSTRING "Länge des SIDs für Administrator="+@STR$(Fehler&)+" Bytes"
Dispose SIDa#
Dispose SIZE_SID#
Dispose DOMAIN#
Dispose SIZE_DOMAIN#
Dispose SID_NAME_USE#
@EDITBOX("Rückgaben",1<

lass=s2>)