Показать сообщение отдельно
Старый 07.08.2015, 00:30   #15
seriousstas
Бывалый писикарщик
 
Регистрация: 14.06.2013
Регион: Украина
Машина: Nissan Qashqai+2
Сообщений: 3,424
seriousstas has a brilliant futureseriousstas has a brilliant futureseriousstas has a brilliant futureseriousstas has a brilliant futureseriousstas has a brilliant futureseriousstas has a brilliant futureseriousstas has a brilliant futureseriousstas has a brilliant futureseriousstas has a brilliant futureseriousstas has a brilliant futureseriousstas has a brilliant future
По умолчанию

mendisabal
Цитата:
ну конечно можно навешать разрешений на скомпилированный екзешник ,но тогда его будет неудобно править\вылизывать .

Держи (пример закрытия процесса BT и окна Икара от админа "без бубнов") :
Код:
#NoTrayIcon
SetTitleMatchMode, 2 
DetectHiddenWindows, On 
RunAsAdmin()
;RunAs Admin,Password,

Run, taskkill /im BlueSoleilCS.exe /f, , Hide
WinClose, iCar DS

;RunAs
RunAsAdmin() {
  Loop, %0%  ; For each parameter:
    {
      param := %A_Index%  ; Fetch the contents of the variable whose name is contained in A_Index.
      params .= A_Space . param
    }
  ShellExecute := A_IsUnicode ? "shell32\ShellExecute":"shell32\ShellExecuteA"
      
  if not A_IsAdmin
  {
      If A_IsCompiled
         DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_ScriptFullPath, str, params , str, A_WorkingDir, int, 1)
      Else
         DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_AhkPath, str, """" . A_ScriptFullPath . """" . A_Space . params, str, A_WorkingDir, int, 1)
      ExitApp
  }
}
ExitApp
seriousstas вне форума   Ответить с цитированием