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

回复 1# xp3000
请先下载ENCA.EXE网址:http://batch-cn.qiniudn.com/tool/1.18/enca.rar
将ENCA.EXE和两个dll与批处理一起放入要查看的文件夹内
  1. @echo off&setlocal enabledelayedexpansion
  2. md ANSI文件夹  2>NUL
  3. md UTF-8文件夹 2>NUL
  4. md Unicode文件夹 2>NUL
  5. for /f "delims=" %%a in ('dir /a-d /b /s *.txt *.htm *.html') do (
  6. set gk=0
  7. enca -L zh_CN "%%a"|find /i "UCS-2" && set gk=1
  8. enca -L zh_CN "%%a"|find /i "UTF-8" && set gk=2
  9. if !gk! equ 1 (set "cho=Unicode文件夹")
  10. if !gk! equ 2 (set "cho=UTF-8文件夹")
  11. if !gk! equ 0 (set "cho=ANSI文件夹")
  12. if exist "!cho!\%%~na.txt" (
  13. set k=1
  14. for /l %%i in (1 1 255) do (
  15. if !k! equ 1 (
  16. if not exist "!cho!\%%~na-%%i%%~xa" (
  17. set "SN=%%i"
  18. set k=0
  19. )
  20. )
  21. )
  22. move "%%a" "!cho!\%%~na-!SN!%%~xa"
  23. ) else (
  24. move "%%a" "!cho!\%%~nxa"
  25. )
  26. )
复制代码
1

评分人数

    • xp3000: 能用,如果完美更好技术 + 1

TOP

回复 6# ygqiang
enca的编码识别率还是挺高的,我只有在输入大量重复单字时才能把它搞失效。

TOP

回复 9# xp3000
这个是enca的问题,enca是别人写的,需要他的作者去添加各种编码的支持。批处理只是调用enca。

TOP

返回列表