Script ejecute como administrador Topic is solved

[Bertini]

Bertini---> Se puede hacer que un script se ejecute como administrador.

Code: Select all

Run C:\Users\¿¿¿\AppData\Local\Ankama\Wakfu\Wakfu.exe
WinWait, Wakfu

IfWinExist, Wakfu
{
Process, priority, java.exe, High
Process, priority, transition.exe, N
WinActivate
WinMaximize
return
}

IfWinNotExist, Wakfu
return
else
{
Process, priority, java.exe, High
Process, priority, transition.exe, N
Run C:\Users\????\AppData\Local\Ankama\Wakfu\Wakfu.exe
WinActivate
WinMaximize
}

[Flipeador]

Code: Select all

MsgBox % RunAsAdmin() ? "OK!" : "ERROR!"
RunAsAdmin()
{
    Local Ret := 1, Params := A_Space
    If (A_IsAdmin)
    {
        If (ObjLength(A_Args) && A_Args[1] == A_ThisFunc)
            ObjRemoveAt(A_Args, 1), Ret := 2
        Return Ret
    }

    If (ObjLength(A_Args) && A_Args[1] == A_ThisFunc)
        Return ObjRemoveAt(A_Args, 1) * 0

    Loop (ObjLength(A_Args))
        Params .= Chr(34) . A_Args[A_Index] . Chr(34) . A_Space

    If (A_IsCompiled)
        Run % "*RunAs " . Chr(34) . A_ScriptFullPath . Chr(34) . A_Space . A_ThisFunc . Params
    Else
        Run % "*RunAs " . Chr(34) . A_AhkPath . Chr(34) . A_Space . Chr(34) . A_ScriptFullPath . Chr(34) . A_Space . A_ThisFunc . Params
    ExitApp
}

AHKv2: https://github.com/flipeador/AutoHotkey ... sAdmin.ahk

[Bertini]

Code: Select all

MsgBox % RunAsAdmin() ? "OK!" : "ERROR!"
RunAsAdmin()
{
    Local Ret := 1, Params := A_Space
    If (A_IsAdmin)
    {
        If (ObjLength(A_Args) && A_Args[1] == A_ThisFunc)
            ObjRemoveAt(A_Args, 1), Ret := 2
        Return Ret
    }

    If (ObjLength(A_Args) && A_Args[1] == A_ThisFunc)
        Return ObjRemoveAt(A_Args, 1) * 0

    Loop (ObjLength(A_Args))
        Params .= Chr(34) . A_Args[A_Index] . Chr(34) . A_Space

    If (A_IsCompiled)
        Run % "*RunAs " . Chr(34) . A_ScriptFullPath . Chr(34) . A_Space . A_ThisFunc . Params
    Else
        Run % "*RunAs " . Chr(34) . A_AhkPath . Chr(34) . A_Space . Chr(34) . A_ScriptFullPath . Chr(34) . A_Space . A_ThisFunc . Params
    ExitApp
}

AHKv2: https://github.com/flipeador/AutoHotkey ... sAdmin.ahk

Bertini ---> me funcio muy bien gracias Flipeador

[Bertini]

Code: Select all

MsgBox % RunAsAdmin() ? "OK!" : "ERROR!"
RunAsAdmin()
{
    Local Ret := 1, Params := A_Space
    If (A_IsAdmin)
    {
        If (ObjLength(A_Args) && A_Args[1] == A_ThisFunc)
            ObjRemoveAt(A_Args, 1), Ret := 2
        Return Ret
    }

    If (ObjLength(A_Args) && A_Args[1] == A_ThisFunc)
        Return ObjRemoveAt(A_Args, 1) * 0

    Loop (ObjLength(A_Args))
        Params .= Chr(34) . A_Args[A_Index] . Chr(34) . A_Space

    If (A_IsCompiled)
        Run % "*RunAs " . Chr(34) . A_ScriptFullPath . Chr(34) . A_Space . A_ThisFunc . Params
    Else
        Run % "*RunAs " . Chr(34) . A_AhkPath . Chr(34) . A_Space . Chr(34) . A_ScriptFullPath . Chr(34) . A_Space . A_ThisFunc . Params
    ExitApp
}

AHKv2: https://github.com/flipeador/AutoHotkey ... sAdmin.ahk

Bertini ---> me funcio muy bien gracias Flipeador

Bertini ---> se podria hacer sin el mensege de OK O DE ERROR ?