[文件操作] 批处理怎样批量转换DOC为TXT文本？

墨者革离

经常写材料，收集和整理很多WORD资料，转换成TXT文本格式，然后打包成电子书，方便使用。
如何实现：拖放文件夹，将文件夹内包括子目录的DOC转换成TXT，并保存在原目录中。以下这段代码仅能转换当前文件夹中。

@echo off

for %%a in (*.doc) do doctotext "%%a">"%%~na.txt"
复制代码

Demon

for /r

CUer

@echo off
for /f "delims=" %%a in ('dir /s /b *.doc') do (
    doctotext "%%a" >"%%~dpna.txt"
)
复制代码

墨者革离

3楼代码不可用。怎么样修改一下！

ArdentMan

@Echo Off
For /R %1 %%I IN (*.doc) Do DocToText "%%I">"%%~dpnI.txt"
复制代码

Hello123World

拖放文件夹，将文件夹内包括子目录的DOC转换成TXT，并保存在原目录中。以下这段代码仅能转换当前文件夹中。

@echo off
set /p a=托文件夹至此：
for /f "delims=" %%i in ('dir /s /b "%a%\*.doc"') do (
	for /f "delims=" %%j in ("%%i") do echo %%j >>%%~dpni.txt
) 
pause>nul
复制代码

Hello123World

DocToText?非系统外部命令。
http://silvercoders.com/en/products/doctotext/
也不给个链接。

Hello123World

doctotext 后面最好加个 2>nul，返回信息忒多了