[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 ShowCode 于 2017-3-19 22:52 编辑
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /f "delims=" %%i in ('dir /b /s /a-d "U:\soft\*.7z"') do (
  4.     set input=
  5.     set /p input=[Y/N]
  6.     if /i "!input!" equ "Y" (
  7.         "U:\soft\7.exe" e "%%i" -o "C:\p"
  8.     )
  9. )
复制代码

TOP

回复 6# eclairkk


    5楼代码第6行笔误,已更正。

TOP

回复 11# eclairkk


这样可以一个一个询问并生成new.bat
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. >"new.bat" type nul
  4. for /f "delims=" %%i in ('dir /b /s /a-d "U:\soft\*.7z"') do (
  5.     set input=
  6.     set /p input=[Y/N]
  7.     if /i "!input!" equ "Y" (
  8.         >>"new.bat" echo "U:\soft\7.exe" e "%%i" -o "C:\p"
  9.     )
  10. )
复制代码

TOP

回复 15# eclairkk


    那确实比较奇怪,13楼的代码及时只有前面3行执行成功,也能创建new.bat,有没有可能你找错路径了?

TOP

回复 21# eclairkk


    报错信息是什么?

TOP

回复 23# eclairkk


第二行和第三行可以合并成1行,注意只有1个大于号
echo [copyright]>AppList.ini

TOP

回复 26# eclairkk


set/p xz=是否解压%line% Y/N:
if /i "%xz%"=="y" (
    set /a eNum+=1
    goto A
)
这里加个计数器就知道有几个啦

TOP

本帖最后由 pcl_test 于 2017-3-20 19:48 编辑

回复 30# eclairkk
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. type nul >AppList.ini.tmp
  4. for /f "delims=" %%i in ('dir /s/b/a-d *.7z') do (
  5.     set line=%%i
  6.     call :output
  7. )
  8. echo [copyright]>AppList.ini
  9. echo Author=有容乃大[YXG8855]>>AppList.ini
  10. echo MyBLOG=http://hi.baidu.com/yxg8855>>AppList.ini
  11. echo [config]>>AppList.ini
  12. echo num=!eNum!>>AppList.ini
  13. echo afterRun=>>AppList.ini
  14. type AppList.ini.tmp >>AppList.ini
  15. start cmd /c "call App.exe"
  16. exit
  17. :output
  18. set/p xz=是否解压%line% Y/N:
  19. if /i "%xz%"=="y" (
  20.     set /a eNum+=1
  21.     goto A
  22. ) else (
  23.     goto B
  24. )
  25. :A
  26. echo !eNum!>>AppList.ini.tmp
  27. echo softname= %line%>>AppList.ini.tmp
  28. echo 7zPath=%line%>>AppList.ini.tmp
  29. echo diskpath=C:\Test>>AppList.ini.tmp
  30. :B
复制代码

TOP

本帖最后由 pcl_test 于 2017-3-20 19:49 编辑

回复 32# eclairkk

31楼已修改

TOP

返回列表