标题: 批处理怎样提取出文件名含繁体字的word文档? [打印本页]
作者: dan5262 时间: 2011-7-17 22:55 标题: 批处理怎样提取出文件名含繁体字的word文档?
文件夹下有2000个word,文件名中含有简体或繁体,批处理怎样将文件名含繁体的word统统提取出来存到另一个文件夹?
谢谢.
作者: batman 时间: 2011-7-17 23:32
批不是万能的。。。
有个字典还有可能实现。。。
作者: dan5262 时间: 2011-7-18 01:13
批不是万能的。。。
有个字典还有可能实现。。。
batman 发表于 2011-7-17 23:32
整理一个繁体字库.txt可以不?
作者: tmplinshi 时间: 2011-7-18 09:21
需要下载 concmd- @echo off
- setlocal
-
- set "move_to=繁体文件名\"
- md "%move_to%" 2>nul
-
- dir /a:-d-h-s /b *.doc >.list
- concmd /i:gbk /o:gbk /f:s .list .list2 >nul
- (findstr /n . .list & findstr /n . .list2) | sort >.list3
-
- set _name1=
- for /f "tokens=1,* delims=:" %%a in (.list3) do (
- if not defined _name1 (
- set _name1=%%b
- ) else (
- set _name2=%%b
- setlocal enabledelayedexpansion
- if "!_name1!" neq "!_name2!" move "!_name2!" "!move_to!"
- endlocal
- set _name1=
- )
- )
-
- del .list .list2 .list3
复制代码
作者: dan5262 时间: 2011-7-18 10:32
需要下载 concmd@echo off
setlocal
set "move_to=繁体文件名\"
md "%move_to%" 2>nul
dir /a:-d-h-s /b *.doc >.list
concmd /i:gbk /o:gbk /f:s .list .list2 >nul
(findstr /n . .list & findstr /n . ...
tmplinshi 发表于 2011-7-18 09:21
多谢斑竹,不是太准确,我贴了两张图,请参考。谢谢。
作者: tmplinshi 时间: 2011-7-18 10:46
奇怪了,为什么“長榮大學94學年度校務執行成效報告書.doc”等文件不会被提取呢?
你把最后一行“del .list .list2 .list3”删掉,然后运行批处理,把 .list3 的内容贴一下,看是什么问题。
作者: dan5262 时间: 2011-7-18 11:29
本帖最后由 dan5262 于 2011-7-18 11:31 编辑
奇怪了,为什么“長榮大學94學年度校務執行成效報告書.doc”等文件不会被提取呢?
你把最后一行“del .list .list2 .list3”删掉,然后运行批处理,把 .list3 的内容贴一下,看是什么问题。
tmplinshi 发表于 2011-7-18 10:46
截图总是超过50K,无法上传.
我上传了样本.rar到网盘,请测试,谢谢.
下载地址:http://ys-b.ys168.com/?0bathome繁体样本.rar_51bks5b9d6dkkks5btqhkt0cqll0cllmj5bkt0cplm7bu14z97f14z
若不能下载请进入网盘下载:http://bathome.ys168.com/
作者: tmplinshi 时间: 2011-7-18 11:50
本帖最后由 tmplinshi 于 2011-7-18 11:55 编辑
我这里测试通过。(测试环境:XP SP2 简体中文)
│ 申论 剖析与写作.doc
│ fanti.bat
│ “十一届三中全会”以来党和国家的少数民族教育政策综述.doc
│ “十一届三中全会”以来党和国家的少数民族教育政策综述7238153.doc
│ “十一届三中全会”以来党和国家的少数民族教育政策综述7238178.doc
│ “思想政治教育学原理”课程教学大纲.doc
│ “思想政治教育学原理”课程教学大纲5962572.doc
│ “思想政治教育学原理”课程教学大纲5964963.doc
│ “思想政治教育学原理”课程教学大纲5964986.doc
│ 中 国 教 育 学 会.doc
│ 中 国 教 育 学 会7183184.doc
│ 中 国 科 学 院 心 理 研 究 所.doc
│ 中 文 系 师 德 建 设 实 施 方 案.doc
│ 中等职业教育学校招生报考指导.doc
│ 中迪教师数字题库及智能管理平台(6个板块).doc
│ 展位号:2011.doc
│ 张店区教育局关于2010年面向社会认定中等职业学校中小学幼儿园教师资格的通知.doc
│ 招 远 市 教 育 体 育 局.doc
│ 章丘市第五批初中、小学骨干教师考查安排表.doc
│ 长在中学章程.doc
│
└─繁体文件名
臺北市99學年度國民小學校長遴選出、列
席人員通訊錄 (請以A3格式紙張列印).doc
篋 聘5壝 靵 3 T 塭vd慳炸d[葑 4g禓槓剆C鑁韔悚趿瘈y捅絰b 枤 G
畩9俩h7运僉鐀WD3 o砰 -^腌@T.doc
嘉義市98年度辦理『促進家長參與教育事務宣導』總體計畫.doc
國立臺北護理健康大學教師發展中心教師成長專題演講活動.doc
國立臺南藝術大學校長遴選要點.doc
彰化縣.doc
彰化縣 水尾 國民小學 總體課程計畫.doc
彰化縣九十二學年度九年一貫課程文開國小教師進階研習討論議題分享紀錄.doc
彰化縣私立精誠高級中學學校校長成績考核辦法 本辦法經第十二屆第十一次董
事會會議通過(91年9月25日).doc
瑋智電腦彰化分校 99年10月份課程表.doc
彰化縣聯興國民小學學生提升閱讀計畫.doc
教出會思考的小孩---2009森林小學朱台翔校長巡迴演講.doc
校長您好:.doc
校長甄選私房菜.doc
校長的話.doc
福山國中九十七學年度第二學期班級家長會.doc
美國校長專業機構與校長中心功能與運作模式.doc
臺北市「北北基聯測」政策中正區家長座談會發言條答覆彙整表.doc
瑋智電腦彰化分校 99年10月份課程表6866581.doc
臺北市「北北基聯測」政策中正區家長座談會發言條答覆彙整表6034252.doc
長榮大學94學年度校務執行成效報告書.doc
高雄縣國民中小學校長遴選要點.doc
臺 中 縣 國 民 中 學 校 長 候 用 人 員 申 請 甄 選 評 分 標 準 表
中華民國 年 月 日填報.doc
98學年度第一學期期末校務會議校長報告 2010.1.19..doc
作者: dan5262 时间: 2011-7-18 12:03
本帖最后由 dan5262 于 2011-7-18 12:04 编辑
我这里测试通过。(测试环境:XP SP2 简体中文)
tmplinshi 发表于 2011-7-18 11:50
我是XP, WORD2003
=================================================================
繁体文件名-------------:
篋 聘5壝 靵 3 T 塭vd慳炸d[葑 4g禓槓剆C鑁韔悚趿瘈y捅絰b 枤 G畩9俩h7运僉鐀WD3 o砰 -^腌@T.doc
瑋智電腦彰化分校 99年10月份課程表6866581.doc
臺 中 縣 國 民 中 學 校 長 候 用 人 員 申 請 甄 選 評 分 標 準 表 中華民國 年 月 日填報.doc
1.txt
“十一届三中全会”以来党和国家的少数民族教育政策综述.doc
“十一届三中全会”以来党和国家的少数民族教育政策综述7238178.doc
“思想政治教育学原理”课程教学大纲5962572.doc
“思想政治教育学原理”课程教学大纲5964986.doc
中 国 教 育 学 会7183184.doc
中 文 系 师 德 建 设 实 施 方 案.doc
嘉義市98年度辦理『促進家長參與教育事務宣導』總體計畫.doc
國立臺南藝術大學校長遴選要點.doc
张店区教育局关于2010年面向社会认定中等职业学校中小学幼儿园教师资格的通知.doc
彰化縣 水尾 國民小學 總體課程計畫.doc
彰化縣私立精誠高級中學學校校長成績考核辦法 本辦法經第十二屆第十一次董事會會議通過(91年9月25日).doc
彰化縣聯興國民小學學生提升閱讀計畫.doc
教出會思考的小孩---2009森林小學朱台翔校長巡迴演講.doc
校長甄選私房菜.doc
福山國中九十七學年度第二學期班級家長會.doc
美國校長專業機構與校長中心功能與運作模式.doc
長榮大學94學年度校務執行成效報告書.doc
高雄縣國民中小學校長遴選要點.doc
=================================================================
提取后剩余----:
臺北市99學年度國民小學校長遴選出、列席人員通訊錄 (請以A3格式紙張列印).doc
瑋智電腦彰化分校 99年10月份課程表.doc
申论 剖析与写作.doc
98學年度第一學期期末校務會議校長報告 2010.1.19..doc
“十一届三中全会”以来党和国家的少数民族教育政策综述7238153.doc
“思想政治教育学原理”课程教学大纲.doc
“思想政治教育学原理”课程教学大纲5964963.doc
中 国 教 育 学 会.doc
中 国 科 学 院 心 理 研 究 所.doc
中等职业教育学校招生报考指导.doc
中迪教师数字题库及智能管理平台(6个板块).doc
國立臺北護理健康大學教師發展中心教師成長專題演講活動.doc
展位号:2011.doc
彰化縣.doc
彰化縣九十二學年度九年一貫課程文開國小教師進階研習討論議題分享紀錄.doc
招 远 市 教 育 体 育 局.doc
校長您好:.doc
校長的話.doc
章丘市第五批初中、小学骨干教师考查安排表.doc
臺北市「北北基聯測」政策中正區家長座談會發言條答覆彙整表.doc
臺北市「北北基聯測」政策中正區家長座談會發言條答覆彙整表6034252.doc
长在中学章程.doc
=================================================================
作者: Batcher 时间: 2011-7-18 13:28
9# dan5262
开始
运行
cmd
chcp
看看得到的数字是多少?
作者: Batcher 时间: 2011-7-18 13:40
7# dan5262
可以学习一下如何压缩图片
http://bbs.bathome.net/thread-4673-1-1.html
作者: dan5262 时间: 2011-7-18 13:59
谢谢指点,我已经压缩过了,刚好大于50K.
作者: dan5262 时间: 2011-7-18 14:00
9# dan5262
开始
运行
cmd
chcp
看看得到的数字是多少?
Batcher 发表于 2011-7-18 13:28
936 简体中文
XP SP2
office2003 完全版
作者: tmplinshi 时间: 2011-7-18 19:41
本帖最后由 tmplinshi 于 2011-7-18 20:17 编辑
那再试试 opencc。
我把 opencc、iconv 和批处理一起打包了,下载地址:http://ge.tt/9oOce36- @echo off
- setlocal
-
- set "move_to=繁体文件名\"
- set /p src_dir=请输入 word 文件所在目录的路径:
- cd /d "%src_dir:"=%"
- md "%move_to%" 2>nul
-
- dir /a:-d-h-s /b *.doc | iconv -t utf-8 -c >"%~dp0\.list"
- pushd "%~dp0"
- opencc -i .list -o .list2 -c zht2zhs.ini
- (
- findstr /n . .list | iconv -f utf-8 -t gbk -c
- findstr /n . .list2 | iconv -f utf-8 -t gbk -c
- ) | sort >.list3
- popd
-
- set _name1=
- for /f "usebackq tokens=1,* delims=:" %%a in ("%~dp0\.list3") do (
- if not defined _name1 (
- set _name1=%%b
- ) else (
- set _name2=%%b
- setlocal enabledelayedexpansion
- if "!_name1!" neq "!_name2!" move "!_name2!" "!move_to!"
- endlocal
- set _name1=
- )
- )
-
- cd /d "%~dp0"
- del .list .list2 .list3
复制代码
欢迎光临 批处理之家 (http://www.bathome.net/) |
Powered by Discuz! 7.2 |