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

[文本处理] 批处理怎样把a文件夹里的文本导入b文件夹然后修改文件名并排序?

[复制链接]
发表于 2011-7-17 20:52:20 | 显示全部楼层 |阅读模式
大家好,问大家一个问题       a文件夹里面的文本导入b文件夹里面并修改a文本里面的名称并排序  只修改文本名称,不改变文本的内容属性  b文件夹里面的文本不变,只改变a文本排列的名称  比如:b文件夹里面的是35.txt,那么a文件夹就从a文件夹里面的第一个06.txt文本修改为36.txt以此类推[img][/img]
或者像3楼的答案也行
发表于 2011-7-17 21:34:07 | 显示全部楼层
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /f %%a in ('dir /b /od C:\test\b\*.txt') do (
  4.     set num=%%~na
  5. )
  6. for /f %%a in ('dir /b /od C:\test\a\*.txt') do (
  7.     set /a num+=1
  8.     move C:\test\a\%%a C:\test\b\!num!.txt
  9. )
复制代码
 楼主| 发表于 2011-7-18 15:38:03 | 显示全部楼层
一个文件夹里面有n多文本,比如一个文件夹里面的文本是06.txt开始,也可以从06.txt开始修改从06.txt,07.txt,08.txt.......只修改名称,文本里面的内容和熟悉不做修改。有时候想把06修改为30.xt开始,31.txt.....
发表于 2011-7-18 19:28:07 | 显示全部楼层
本帖最后由 0428_hai 于 2011-7-18 19:29 编辑

还是老代码,略作修改,虽有冗余,算法不为精简,但基本可以达到楼主所提的要求

  1. @echo off
  2. SETLOCAL ENABLEDELAYEDEXPANSION
  3. ::本批处理功能为将当前文件夹下所有以阿拉伯数字命名的文本文件“按序”排列
  4. ::注意事项:当前文件夹中的文本文件名必须为阿拉伯数字,数字之间不允许空格
  5. ::当然可以根据自己的需求继续完善
  6. ::修改start的值即可达到修改起始编号的目的

  7. set start=11
  8. set max=1
  9. for %%a in (*.txt) do (
  10.         if %%~na geq %start% (
  11.                 set %%~na=%%~na
  12.                 if !max! lss %%~na set max=%%~na
  13.                 set /a cnt+=1
  14.         )
  15. )

  16. set /a start2=%start%
  17. for /l %%a in (1,1,%cnt%) do (
  18.         if defined !start2! (
  19.                 set !start2!=
  20.                 set /a start2+=1
  21.         ) else (
  22.                 set _tmp=!start2!
  23.                 call :reName !start2!
  24.                 set /a start2+=1
  25.         )
  26. )
  27. echo done......
  28. pause>nul
  29. exit

  30. :reName
  31. for /l %%a in (1,1,%max%) do (
  32.         set /a _tmp+=1
  33.         if defined !_tmp! (
  34.                 echo ren !_tmp!.txt %1.txt
  35.                 set !_tmp!=
  36.                 pause>nul
  37.                 goto :eof
  38.         )
  39. )
复制代码
 楼主| 发表于 2011-7-23 13:39:02 | 显示全部楼层
谢谢大师的代码,谢谢
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-3-20 07:02 , Processed in 0.019715 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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