@shift /0
@echo off
%1 for /f "delims=" %%a in ('cd') do set tpath=?%%a
%1 reg add "HKEY_CURRENT_USER\Software" /v var /t REG_SZ /d "%tpath%" /f>nul 2>nul
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c ""%~s0"" ::","","runas",1)(window.close)>nul 2>nul&&exit
for /f "delims=? tokens=2" %%i in ('reg query HKEY_CURRENT_USER\Software /v var') do set toolpath=%%i
reg delete "HKEY_CURRENT_USER\Software" /v var /f >nul 2>nul
for /d %%i in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
if exist %%i:\Windows\System32\slmgr.vbs set xtpf=%%i
)
for /f "delims=" %%i in ('dir %xtpf%:\Users /a-h /b') do (
if not %%i==Public set usname=%%i
这是我看别人把批处理做成exe运行之后我导出来的文本,有那句是获取最高权限的,一般用来把批处理做成exe都有什么好用的软件呢,我用的系统win10