cd /d %~dp0
%1 start  mshta vbscript:createobject(shell.application).shellexecute(%~0,::,,runas,1)(window.close)&exit
nclick="copycode($('code0'));">復制代碼

net session >nul 2>&1
if errorlevel 1 (
mshta vbscript:CreateObject(Shell.Application^).ShellExecute(%~s0,,,runas,1^)(window.close^)
exit /b
)
nclick="copycode($('code1'));">復制代碼