[已解决]15元求助批处理弹窗、填入数字、运行命令

ksla

具体报酬：15元人民币
支付方式：支付宝
请将支付宝手机号私信给我！可用马上打款！


运行批处理----弹窗---（随便填入数字）例如：填入6--然后再填入18---运行命令


reboot    程序6
reboot    程序7
reboot    程序8
reboot    程序9
reboot    程序10
reboot    程序11
.
.
.
reboot    程序18

结束

zaqmlp

1. @echo off
   
2. set info=互助互利,支付宝扫码头像,感谢赞助
   
3. title %info%
   
4. cd /d "%~dp0"
   
5. >"%tmp%\t.vbs" echo;WSH.echo inputbox^("输入起始和末尾的数字","%info%","6 18"^)
   
6. for /f "tokens=1,2" %%a in ('cscript -nologo "%tmp%\t.vbs"') do set "s=%%a 1 %%b"
   
7. if defined s (
   
8.     for /l %%a in (%s%) do (
   
9.         echo;%%a
   
10.         reboot %%a
    
11.     )
    
12. )
    
13. echo;%info%
    
14. pause

复制代码

ksla

回复 2# zaqmlp

出错

'mshta VBScript:Execute("CreateObject(""Scripting.Filesystemobject"").GetStandardStream(1).Write(inputbox(""输入起始和末尾的数字"",""互助互利,支付宝扫码头像,感谢赞助"",""6 18""))")(close)' 不是内部或外部命令，也不是可运行的程序
或批处理文件。
互助互利,支付宝扫码头像,感谢赞助
请按任意键继续. . .

Blitz

1. @echo off
   
2. set /p a=开头:
   
3. set /p b=结尾:
   
4. for /l %%a in (%a%,1,%b%) do reboot 程序%%a
   
5. pause
   
6. exit

复制代码