[已解决]批处理怎样批量提取TXT文件第一行对文件进行改名？

随风

原帖由 sgaizxt001 于 2010-6-19 05:39 发表
为什么不直接
more +2 "!wjm!">"!num!.txt"
del /q "%%a"
可以不用临时文件吧。

是哦，看来我最近脑袋短路的厉害啊～

zxzl

偶真的很郁闷，楼上诸位高手给出的代码为什么没有一个可以成功运行的？

sgaizxt001

难道是你文本编码的问题？

Batcher

能否把其中一个文件用附件的形式传上来看看？

lshhjx

原帖由 hanyeguxing 于 2010-6-18 11:58 发表
@echo off
for %%a in (*.txt) do (
   setlocal enabledelayedexpansion
   (for /F "usebackq delims=" %%b in ("%%a") do (
      if defined b (echo.%%b) else set "a=%%b"
      set b==
   ))>$
   re ...

在我机子上我用这段代码测试了一下，发现并不能完成楼主需要的功能，提示“存在一个重名文件，或是找不到文件”，不知是怎么回事。

BowAngel

可以用VBS实现楼主所要的结果，但不知道在这个版块发VBS代码是不是不太合适。。。。。。

BowAngel

翻阅老帖，看来可以用VBS解决批处理遇到的问题，哈哈，放心了O(∩_∩)O~

1. 
   
2. set fso=createobject("scripting.filesystemobject")
   
3. set fd=fso.getfolder(".")
   
4. fpath=fd.path
   
5. set fo=fso.getfolder(fpath)
   
6. set fc=fo.files
   
7. for each f in fc
   
8.     ext=f.type
   
9.     if ext="文本文档" then
   
10.         strtext=""
    
11.         set rfile=fso.opentextfile(f)
    
12.         fname=rfile.readline
    
13.         rfile.skipline
    
14.         do until rfile.atendofstream=true
    
15.             strline=rfile.readline
    
16.             strtext=strtext&strline&vbcrlf
    
17.         loop
    
18.         rfile.close
    
19.         set wfile=fso.opentextfile(f,2)
    
20.         wfile.write strtext
    
21.         wfile.close
    
22.         newname=fname&".txt"
    
23.         f.name=newname
    
24.     end if
    
25. next

复制代码

如果txt文件较多，可能会等待几秒

[ 本帖最后由 BowAngel 于 2010-6-21 15:28 编辑 ]

zxzl

感谢楼上，不过还是有点问题，您可以新建几个文件试一下

BowAngel

原帖由 zxzl 于 2010-6-21 15:41 发表
感谢楼上，不过还是有点问题，您可以新建几个文件试一下

什么问题？

zxzl

不能全部处理，而且有错误提示，你可以试一下

73yexs4f8qzk

1. @echo off
   
2. for /f "delims=" %%a in ('dir /a:-d /b *.txt') do (
   
3.     set OldName=%%a
   
4.     set /p NewName=<"%%a"
   
5.     SetLocal EnableDelayedExpansion
   
6.     more +2 "!OldName!" > "!NewName!.txt"
   
7.     EndLocal
   
8.     del /a /f "%%a"
   
9. )

复制代码

Batcher

能否把你的数据更新到顶楼？

zxzl

26楼的代码可以实现这个功能了，谢谢各位兄弟

810126769

回复 26# 73yexs4f8qzk


    真的太巧妙了！佩服！

810126769

回复 26# 73yexs4f8qzk

这句代码不好理解啊：
    set /p NewName=<"%%a"

我的理解是NewName这个变量得到的是%%a代表的txt文件的全部内容。可是在下一句中：
more +2 "!OldName!" > "!NewName!.txt"
从这里句代码来看的话，NewName这个变量应该是%%a代表的文本文件中第一行的内容啊。可是没有看到有一句从%%a中提取第一行内容的代码啊？
有没有谁能理解这句代码，帮我解释一下,谢谢！