Board logo

标题: [文本处理] 【已解决】帮我 在批处理做个循环，变为支持拖动多个文件。 谢谢 [打印本页]
作者: yyz219    时间: 2021-12-26 13:00     标题: 【已解决】帮我 在批处理做个循环，变为支持拖动多个文件。 谢谢

本帖最后由 yyz219 于 2021-12-27 08:59 编辑 
  1. 已经完美解决了

  2. 

  3. ::【将UTF-8码 转为 ANSI码】

  4. :Loop

  5. if "%~1" equ "" goto :eof

  6. 

  7. CHCP 65001

  8. ::如果输入的 UTF-8 没有 BOM，%~dpn1_unicode-without-BOM.txt 打开乱码

  9. CMD /D /U /C  TYPE %~1 > %~dpn1_unicode-without-BOM.txt

  10. ::取得 Unicode BOM

  11. ECHO.//4=>U.bom

  12. certutil -decode -f U.bom U.bom >NUL

  13. ::Unicode → Unicode BOM

  14. CHCP 936

  15. MOVE /y  U.bom  %~dpn1_Unicode-BOM.txt >NUL

  16. TYPE %~dpn1_unicode-without-BOM.txt >> %~dpn1_Unicode-BOM.txt

  17. ::Unicode BOM → ANSI

  18. TYPE %~dpn1_Unicode-BOM.txt > %~dpn1.reg

  19. DEL /Q /F %~dpn1_unicode-without-BOM.txt %~dpn1_Unicode-BOM.txt

  20. 

  21. shift

  22. goto :loop

  23. ::【切记：这里不能够有“exit”】

  24. 

  25. ::****************【下面设置支持多文件拖放格式】******************

  26. 

  27. :::Loop

  28. ::if "%~1" equ "" goto :eof

  29. ::【原来的批处理代码】

  30. ::shift

  31. ::goto :loop

  32. ::【切记：这里不能够有“exit”】
复制代码
作者: yakeyun    时间: 2021-12-26 13:47

UTF-8   转   ANSI  文本需要保证文本内存在中文，不然转不了。
作者: yyz219    时间: 2021-12-26 18:32

回复 2# yakeyun

我只需要支持多文件拖放就OK了。
作者: netbenton    时间: 2021-12-26 18:41

  1. :Loop

  2. if "%~1" equ "" goto :eof

  3. [处理一个参数]

  4. 

  5. shift 切换参数

  6. goto :loop
复制代码
作者: yyz219    时间: 2021-12-26 19:04

本帖最后由 yyz219 于 2021-12-27 08:59 编辑
netbenton 发表于 2021-12-26 18:41 
  1. 我试一试先  谢谢
复制代码
作者: yyz219    时间: 2021-12-26 19:08

回复 4# netbenton


    很给力



欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2