XProfan

Français

Beschreibung:

GetLengthSid ermittelt qui Longueur dans Bytes eines Security Identifiers (SID). qui Funktion gibt es seulement sous NT-basierten Windowssystemen.

Deklaration:

DEF @GetLengthSid(1) !advapi32,GetLengthSid

paramètre:

1.paramètre: Bereichsvariable avec einer SID Struktur ou bien Adresse einer SID Struktur.

Rückgabewert:

si qui SID Struktur gültig ist, Longueur qui SID Struktur dans Bytes. Ist vous ungültig, ist qui Rückgabewert undefiniert.

Beispiele:

Kompilieren Marque Séparation

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>)