- @echo off
- set info=互助互利,支付宝扫码头像,感谢赞助
- rem 有问题,可加QQ956535081及时沟通
- title %info%
- cd /d "%~dp0"
- set "file=C:\Windows\System32\calc.exe"
- for /f %%a in ('mshta VBScript:Execute("CreateObject(""Scripting.Filesystemobject"").GetStandardStream(1).Write(msgbox(""打开 %file% ?"",68,""%info%""))"^)(close^)') do (
- if %%a equ 6 (
- echo;Y
- start "" "%file%"
- ) else (
- echo;N
- )
- )
- echo;%info%
- pause
复制代码
|