很多時候我們需要管理員權限來運行bat那么就需要結合vbscript來實現了

方法一：

%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)exit

常用

@echo off
mode con lines=30 cols=60
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)exit
cd /d "%~dp0"
rem 下面可以寫你的bat代碼了

方法二：

@echo off 
%1 %2 
ver|find "5.">nulgoto :st 
mshta vbscript:createobject("shell.application").shellexecute("%~s0","goto :st","","runas",1)(window.close)goto :eof 
:st 
copy "%~0" "%windir%\system32\" 

原理類似

ShellExecute method

Run a script or application in the Windows Shell.

Syntax
.ShellExecute "application", "parameters", "dir", "verb", window

.ShellExecute 'some program.exe', '"some parameters with spaces"', , "runas", 1
Key
application The file to execute (required)
parameters Arguments for the executable
dir Working directory
verb The operation to execute (runas/open/edit/print)
window View mode application window (normal=1, hide=0, 2=Min, 3=max, 4=restore, 5=current, 7=min/inactive, 10=default)
Note the different (double " and single ' ) quotes that can be used to delimit paths with spaces.

The runas verb is undocumented but can be used to elevate permissions. When a script is run with elevated permissions several aspects of the user environment may change: The current directory, the current TEMP folder and any mapped drives will be disconnected.

runas will fail if you are running in WOW64 (a 32 bit process on 64 bit windows) for example %systemroot%\syswow64\cmd.exe ...

The ShellExecute method is a member of the IShellDispatch2 object.

Examples

Run a batch script with elevated permissions, flag=runas:

Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "E:\demo\batchScript.cmd", "", "", "runas", 1

Run a VBScript with elevated permissions, flag=runas:

Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "cscript", "E:\demo\vbscript.vbs", "", "runas", 1

“If you don't execute your ideas, they die” ~ Roger Von Oech

Related:

Run with elevated permissions - Script to run as Admin
.Exec - Execute command, returning an object
.Run - Run a command
joeware.net - CPAU (Create Process As User) like RunAs but with an options to encrypt the password.
Equivalent CMD command: ShellRunAs - Run a command under a different user account

 批處理文件中的%~dp0表示含義

~是擴展的意思，相當于把一個相對路徑轉換絕對路徑
%0代指批處理文件自身
%1表示批處理文件命令行接收到的第一個參數，%2表示第二個，以此類推
%~d0 是指批處理所在的盤符，其中d代表drive
%~p0 是指批處理所在的目錄，其中p代表path
%~dp0 是批處理所在的盤符加路徑

cd %~dp0 就是進入批處理所在目錄了

詳細解釋還可參考命令 call /?

自從Vista帶來了UAC之后，應用程序就變成了兩種，有管理員權限的，和沒有管理員權限的。一些老的應用程序會莫名其妙地出錯，這時候就要考慮右擊應用程序，然后“以管理員身份運行”。這還不是什么大問題，exe文件的右鍵菜單里都會有這個，但是對于一些腳本文件(cmd, js一類）來說，就沒那么方便了。通常需要重新開一個帶管理員權限的命令行窗口，然后打很多cd回到剛的文件夾，然后再運行腳本，相當麻煩。

搜了一下，找到一個解決辦法。把下面的代碼保存為Elevate.js：

var command = WScript.Arguments.Item(0);
var argument = "";
for (var i = 0; i  WScript.Arguments.Count(); ++i){
 argument += WScript.Arguments.Item(i) + " ";
}
 
try{
 var shellapp = new ActiveXObject("Shell.Application");
 shellapp.ShellExecute(command, argument, null, "runas", 1);
}
catch(e){
 WScript.Echo("Something wrong: " + e.description);
}

以后要以管理員身份運行程序的時候，只要輸入“Elevate exefile> arguments>”就可以了，比如“Elevate cmd /k”。

當然，這個逃不過UAC的檢查，還是會有一個對話框彈出來要點“確定”的。