Getting Windows User's Account Type

[Adele]

Hi all. How can I get current user type? I want to get is user administrator or is standard user. I can't use the IsAdmin() function because if uac is active, this returns negative value. I've searched but I haven't found.

Thank you in advance.

Edited June 12, 2014 by sanaldosya

[Danyfirex]

Maybe using http://msdn.microsoft.com/en-us/library/bb776463(v=vs.85).aspx but I'm no sure if isAdmin is a wrapped of this.

Saludos

[guinness]

That's deprecated.

[Danyfirex]

Use CheckTokenMembership instead...

[Adele]

Use CheckTokenMembership instead...

Thank you but how can I use this? Can you give example with AutoIt?

[Jos]

What exactly is it you want to do that doesnt work with isadmin()?

[Adele]

I will add restricted version to my program. If user is standard user, will run restricted version. If user is administrator, will run completely version. Even if user is administrator,  if uac is active IsAdmin() function returns negative value.

Edited June 12, 2014 by sanaldosya

[Jos]

So you want to know whether the current userid is part of the administrators group of the computer?

It is clear that the isadmin() will only return a 1 when actually running at that level.

Jos

[Adele]

Yes, I want this. If add #RequireAdmin, my program won't run in standard users. If administrator user has password, will want password. Instead I want to run restricted version. If user is administrator, with this code will want uac permission. 

ShellExecute(@ScriptFullPath, "", "", "runas")

Edited June 12, 2014 by sanaldosya

[Jos]

Are these users listed in the Computers Administrators group or are they given in another way Admin access?

When they are in the Administrators group you could enumerate the users in the group and see if the @username is in it.

Jos

[Adele]

How can I do? I don't know.

[Jos]

Something like this maybe:

$oMyError = ObjEvent("AutoIt.Error", "ComError")
If  UserInGroup(@LogonDomain,@UserName,"Administrators") then
    msgbox(0,"Validate","User exists in specified groupname")
Else
    msgbox(0,"Validate","User does NOT exist in specified groupname")
EndIf

Exit
; Check if User is in a group
Func UserInGroup($Domain, $UserName, $InGroup)
    Local $objUser = ObjGet("WinNT://" & $Domain & "/" & $UserName)
    For $oGroup in $objUser.Groups
        If $oGroup.Name = $InGroup Then
            Return 1
        EndIf
    Next
    Return 0
EndFunc
;COM Error function
Func ComError()
    If IsObj($oMyError) Then
        $HexNumber = Hex($oMyError.number, 8)
        SetError($HexNumber)
    Else
        SetError(1)
    EndIf
    Return 0
EndFunc   ;==>ComError

[Adele]

Thank you very much. The issue has been resolved.