bcdedit >nul && goto next
echo - 正在申请以管理员身份运行……
%1 start "" mshta vbscript:createobject("shell.application").shellexecute("""%~0""","::",,"runas",1)(window.close)
exit 0

:next
mklink %USERPROFILE%\Desktop\Han.GJZS "%PWD%Han.GJZS.bat" >nul && echo - 已创建快捷方式Han.GJZS || %error% 创建快捷方式失败，请先删除桌面的Han.GJZS即可重新创建
mklink %USERPROFILE%\Desktop\CMD命令行 "%PWD%CMD命令行.bat" >nul && echo - 已创建快捷方式CMD命令行 || %error% 创建快捷方式失败，请先删除桌面的Han.GJZS即可重新创建
pause
call bat\menu5.bat