找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 21626|回复: 1

[文本处理] [已解决]请教BAT如何把word批量转变为txt?

[复制链接]
发表于 2012-11-7 18:30:34 | 显示全部楼层 |阅读模式
本帖最后由 bbaatt 于 2012-11-18 08:26 编辑

在论坛里面找到一个技术贴! http://www.bathome.net/thread-10929-1-1.html 是关于word写入txt的
今天我专门测试了一下!
好像只能转换一个,而且不支持中文命名的doc!

技术能力有限啊,批量转换N多个doc的代码如何写哦?

同时问一下是不是不支持中文命名的doc呢?

评分

参与人数 1PB +2 收起 理由
Batcher + 2 感谢给帖子标题标注[已解决]字样

查看全部评分

发表于 2012-11-8 06:09:32 | 显示全部楼层
要把中文转换成 utf-8。

把附件中的文件解压到 doctotext.exe 目录,之后使用方法如下:
  1. doctotext_ *.doc
复制代码
  1. doctotext_ 中文测试1.doc "中文 测试2.doc"
复制代码
文件搜索使用的是 dir 的语法。所以例如要搜索子目录的文件,则加 /s 参数:
  1. doctotext_ /s *.doc
复制代码
doctotext_.bat:
  1. @echo off
  2. setlocal
  3. set n=0
  4. set skip=

  5. dir /b %* | win_iconv -f gbk -t utf-8 >"%~f0.tmp"

  6. for /f "delims=" %%a in (' dir /b %* ') do (
  7.     call :doctotext "%%a"
  8. )
  9. exit /b

  10. :doctotext
  11. if %n% neq 0 (
  12.     set skip=skip=%n%
  13. )

  14. for /f "usebackq %skip% eol=< delims=" %%a in ("%~f0.tmp") do (
  15.     echo convert %1...
  16.     doctotext "%%a" >"%~1.txt"
  17.     set /a n += 1
  18.     goto :eof
  19. )
复制代码

评分

参与人数 1技术 +1 收起 理由
Batcher + 1 乐于助人

查看全部评分

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-19 17:51 , Processed in 0.018898 second(s), 9 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表