VBScript Basics, Part 52 | Run As Administrator
VBScripting (.vbs) Basic Tutorial On How-To:
Run a program, file, or even the current script as an administrator, or with administrator/elevated permissions.
Code Example:
******************
RunAs “wscript.exe”,”C:UsersJeremyDesktoptestv.vbs”,1
RunAs “C:UsersJeremyDesktoptestb.bat” ,”cmd.exe”,2
Sub RunAs(prog,file,show)
Set objAPP = CreateObject(“Shell.Application”)
objAPP.ShellExecute prog,file,,”runas”,show
End Sub
******************
Sub RunAsAdmin()
If WScript.Arguments.Named.Exists(“RunAsAdmin”) Then Exit Sub
CreateObject(“Shell.Application”).ShellExecute _
“WScript.exe”, “””” & WScript.ScriptFullName & “”” /RunAsAdmin”,””,”runas”, 1
WScript.Quit()
End Sub
RunAsAdmin()
******************