Mit dem folgenden Code von AHT habe ich unter Windows-7 ein Problem:
ZitatAlles anzeigenDEF @CheckTokenMembership(3) !"advapi32","CheckTokenMembership"
DEF @GetProcAddress(2) !"KERNEL32","GetProcAddress"
DEF @GetModuleHandle(1) !"KERNEL32","GetModuleHandleA"
Declare Member&,SID#,MHANDLE&,Module$,Funktion$
LET MODULE$="Advapi32.DLL"
LET Funktion$="CheckTokenMembership"
LET MHANDLE&=@GetModuleHandle(@ADDR(Module$))
IF @GetProcAddress(MHANDLE&,@ADDR(FUNKTION$))<>0
DIM SID#,16
LONG SID#,0=513
LONG SID#,4=83886080
LONG SID#,8=32
LONG SID#,12=544
@CheckTokenMembership(0,SID#,@ADDR(Member&))
IF Member&=1
@Messagebox("Du bist auf deinem Rechner ein Administrator!","Admincheck",64)
else
@Messagebox("Du hast keine Administratorrechte!","Admincheck",64)
endif
DISPOSE SID#
else
@MESSAGEBOX("Falsche Windowsversion","So'n Scheiß!",64)
endif
unter ...XP wurden mir Admin-Rechte gegeben. Win-7 schreibt: "Du hast keine Administratorrechte!"
Ich starte als Administrator und habe keinen Gastzugang eingerichtet.
Was läuft da falsch ?
Danke für jede Hilfe ![]()