标题: [文本处理] word自动重命名批处理这个判断如何加？ [打印本页]
作者: yhcbird 时间: 2011-1-27 14:44 标题: word自动重命名批处理这个判断如何加？
各位坛友，写了一个自动为word重命名的代码。这个代码的处理功能是可以把word内容标题是两行的文件进行重命名。
如：word内的标题内容是：
危险废物处理处置情况明细
2010年（1月-8月）
1、效果：下面的代码处理结果将会把你的word的文件自动重命名为
危险废物处理处置情况明细2010年（1月-8月）.doc
2、问题：很多文件标题只有一行，那么这个也好写.这时我想加个判断.从而把这两种情况区分开，思路如下：
判断第一次出现的空白行,空白行前面的都是标题.
大家有没有更好的建议。
- @echo off
- setlocal enabledelayedexpansion
- for %%a in (*.doc) do (
- doc2txt "%%a"
- set "c=%%a"
- set "y=%%~na")
- @echo off
- (for /f "usebackq delims=" %%a in ("!y!.txt") do (
- set/p"=%%a"<nul
- if defined n (
- echo/
- set n=
- ) else set n==
- ))>a.txt
- set/p x=<a.txt
- ren "!c!" "%x%.doc"
- pause
[ 本帖最后由 yhcbird 于 2011-1-27 17:26 编辑 ]
作者: yhcbird 时间: 2011-1-28 08:31
没人回。自己顶一个：）
| 欢迎光临 批处理之家 (http://bbs.bathome.net/) |
Powered by Discuz! 7.2 |