在批处理代码最前面，添加一行代码，保存文件

—————添加的代码↓—————

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

—————添加的代码↑—————