[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

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

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


运行批处理----弹窗---(随便填入数字)例如:填入6--然后再填入18---运行命令


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

结束

本帖最后由 zaqmlp 于 2023-7-2 21:15 编辑
  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
复制代码
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

回复 2# zaqmlp

出错

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

TOP

  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
复制代码

TOP

返回列表