1. 运行时定位到批处理文件所在目录。(test on win7, win8.1)
cd /d "%~dp0"
2. 运行批处理自动选择管理员权限确认。(test on win8.1)
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
3. 延迟几秒继续运行。(test on win7, win8.1)
ping 127.0.1 -n 5>nul