yakeyun

回复 3# fly9902

同版本系统，测试正常。

@echo off & setlocal enabledelayedexpansion

Pushd %~dp0 & cd /d "%~dp0"
%1 %2
mshta vbscript:createobject("shell.application").shellexecute("%~s0","goto :runas","","runas",1)(window.close)&goto :eof
:runas


title 批处理程序 by.SanLi
color 07
mode con: cols=80 lines=25
chcp 936 >nul
echo 当前系统时间：%date% %time%

pause >nul
exit
复制代码