[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
你在另一贴中 Q 了一上ME . 就在这插一下楼。
  1. /\*??::<>|][)(}{~`.&^@#$%%!!';‘’_-“”
复制代码
这些是脚中过滤的特殊字符,你自己根据情况增删,不要加入半角双引号。
下面的脚本,和你的 txt 文件放在一起。改名的文件会放到 NEW 文件夹中。
  1. @echo off & cd /d "%~dp0"
  2. for /f "delims=" %%f in ('dir/a-d/b "*.txt"') do for /f "delims=" %%a in ('type "%%f"') do (echo %%a>#&findstr /i /c:"点击下载" #>nul&&for /f "tokens=2 delims=-" %%i in (#) do if "%%i" neq "" (echo %%i>#&set "str="&set "out="&call :SYMBOL &echo f|cmd /v:on /c xcopy /y "%%f" "NEW\!out:~0,-1!.txt">nul&del /q /f #))
  3. pause & exit
  4. :SYMBOL
  5. for /f "tokens=1* delims=/\*??::<>|][)(}{~`.&^@#$%%!!';‘’_-“”" %%a in (#) do (set "str=%str%%%a"&if "%%b" neq "" (echo %%b>#&goto SYMBOL))
  6. set "str=%str:"=%"
  7. CALL :END "%str%"
  8. goto :eof
  9. :END
  10. for /f "tokens=1*" %%a in ("%~1") do (set "out=%out%%%a "&if "%%b" neq "" call :END "%%b")
复制代码
=========================

TOP

返回列表