[文本处理] [已解决]批处理批量建立以数字命名的文本如何在文件名的数字前补零？

Rank: 1

帖子: 66
积分: 88
技术: 2
捐助: 0
注册时间: 2011-1-18

1楼 跳转到 » 倒序看帖

打印

字体大小: tT

发表于 2011-5-13 11:18 | 只看该作者

[文本处理] [已解决]批处理批量建立以数字命名的文本如何在文件名的数字前补零？

本帖最后由 pcl_test 于 2016-8-6 22:47 编辑

是这样的，我需要建立100个文本，那利用FOR就可以解决了。

for /l %%i in (1,1,100) do echo.>%%i.txt
复制代码

现在问题是建立的文件前10个都是1.txt 2.txt 3.txt等，而我实际需要的却是01 02 03。
各种办法都想了，一直做不到。
希望各位大大指教

1 评分人数

Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

batman

荣誉版主

Rank: 8 Rank: 8

帖子: 2702
积分: 14562
技术: 177
捐助: 630
注册时间: 2008-6-16

2楼

发表于 2011-5-13 11:43 | 只看该作者

楼主可否列举下你所想的各种办法？

＊＊＊共同提高＊＊＊

wolonga123

Rank: 1

帖子: 42
积分: 82
技术: 1
捐助: 0
注册时间: 2010-12-2

3楼

发表于 2011-5-13 11:55 | 只看该作者

for /l %%i in (1,1,9) do echo.>0%%i.txt
for /l %%i in {10 1 100) do echo.>%%i.txt
复制代码

batman

荣誉版主

Rank: 8 Rank: 8

帖子: 2702
积分: 14562
技术: 177
捐助: 630
注册时间: 2008-6-16

4楼

发表于 2011-5-13 12:12 | 只看该作者

@echo off&setlocal enabledelayedexpansion
for /l %%a in (1001,1,1100) do (
     set "str=%%a"
     cd.>!str:~1!.txt
)
复制代码

＊＊＊共同提高＊＊＊

Rank: 1

帖子: 66
积分: 88
技术: 2
捐助: 0
注册时间: 2011-1-18

5楼

发表于 2011-5-13 12:26 | 只看该作者

本帖最后由 Bearxy 于 2011-5-13 12:28 编辑

3# wolonga123

这种办法我也试了.只怪我问题没说清楚,文件是本身存在的,我想用FOR来取文件名.

文件是01 02 03 04 05 06.txt

FOR /L %%i in (1,1,100) do (xcopy "%%i.txt" "c:\%%i")
复制代码

但是实际上%%i的前9个值都是 1 2 3 4 5 6 7 8 9,而不是01 02 03....
两条代码是可以做到,是否有办法可以直接实现?

我记得看到很多例子,建立文本文档的,都是01 02 03 等等这样的.所以才有此一问.

Rank: 1

帖子: 66
积分: 88
技术: 2
捐助: 0
注册时间: 2011-1-18

6楼

发表于 2011-5-13 12:29 | 只看该作者

4# batman
batman老大的代码也是一样，到9后面的值就为 010 011 012... 了。

mxxcgzxxx

中尉

Rank: 5 Rank: 5

帖子: 327
积分: 755
技术: 38
捐助: 0
注册时间: 2011-3-17

7楼

发表于 2011-5-13 12:41 | 只看该作者

本帖最后由 mxxcgzxxx 于 2011-5-13 20:35 编辑

@echo off&setlocal enabledelayedexpansion
set p=0
set /p a=起始文号，请用数字！：
set /p b=终止文号，请用数字！：
set /p c=文件后辍：四位以内的字符
set /p d=需要补0的位数？如001为3，0001为4！：
set /p e=你想什么前辍吗？：
for /l  %%1 in (%a%,1,%b%) do (
       call :补0 %%1 %d%
       echo !dat!
       cd.>!dat!.%c%
       )
echo :eof

:补0
:test
set "var=%1"
set len=0
for /l %%x in (0,1,20) do (
   set "var_=!var:~%%x,1!"
   if "!var_!"=="" goto :b
   set /a len+=1
   )
:b
set /a kg=%2-%len%
set "dat="
if %kg% leq 0 set dat=%1 & goto :eof
for /l %%x in (1,1,%kg%) do set "dat=!dat!%p%"
set "dat=!e!!dat!%1"
goto :eof
复制代码

1 评分人数

Batcher: 乐于助人技术 + 1

世界上没有学不会的知识,也没有想得到却做不到的事!

Rank: 1

帖子: 66
积分: 88
技术: 2
捐助: 0
注册时间: 2011-1-18

8楼

发表于 2011-5-13 12:51 | 只看该作者

7# mxxcgzxxx
谢谢大大,测试的时候出现了一个此时不应有...我没看清楚.

这种思路,是不是用ren更快些?
比如

@echo off
set a=0
:ks
set/a a=%a%+1
ren "%a%.txt" "0%a%.txt"
if %a%==9 goto ok
goto ks

:ok
echo 完成！
pause
复制代码

wolonga123

Rank: 1

帖子: 42
积分: 82
技术: 1
捐助: 0
注册时间: 2010-12-2

9楼

发表于 2011-5-13 13:00 | 只看该作者

5# Bearxy
纯属抄袭斑竹的..^-^

@echo off&setlocal enabledelayedexpansion
for /l %%a in (1001,1,1100) do (
     set "str=%%a"
     cd.>!str:~-2!.txt
)
复制代码

wolonga123

Rank: 1

帖子: 42
积分: 82
技术: 1
捐助: 0
注册时间: 2010-12-2

10楼

发表于 2011-5-13 13:05 | 只看该作者

本帖最后由 wolonga123 于 2011-5-13 13:13 编辑

这样好像也行..不过思路差不多

@echo off&setlocal enabledelayedexpansion
for /l %%a in (1,1,100) do (
     set "str=0%%a"
     cd.>!str:~-2!.txt
)
pause
复制代码

hanyeguxing

荣誉版主

Rank: 8 Rank: 8

帖子: 1739
积分: 4955
技术: 255
捐助: 0
注册时间: 2009-6-11

11楼

发表于 2011-5-13 14:20 | 只看该作者

10# wolonga123

迭代范围是1-99

寒夜孤星：在没有说明的情况下，本人所有代码均运行在 XP SP3 下（有问题请发贴，QQ临时会话已关闭）

mxxcgzxxx

中尉

Rank: 5 Rank: 5

帖子: 327
积分: 755
技术: 38
捐助: 0
注册时间: 2011-3-17

12楼

发表于 2011-5-13 15:28 | 只看该作者

8# Bearxy

对不起因为是在论坛里写的没有测试过,现在改正了一些语法错误可以用了!你再试试

世界上没有学不会的知识,也没有想得到却做不到的事!

Rank: 1

帖子: 66
积分: 88
技术: 2
捐助: 0
注册时间: 2011-1-18

13楼

发表于 2011-5-13 17:27 | 只看该作者

本帖最后由 Bearxy 于 2011-5-13 17:29 编辑

12# mxxcgzxxx

测试完全OK,谢谢mxxcgzxxx! 也很感激bathome和其他几位的热心帮助！

applba

中校

Rank: 6 Rank: 6

帖子: 551
积分: 2799
技术: 39
捐助: 0
注册时间: 2011-4-22

14楼

发表于 2011-5-13 17:34 | 只看该作者

直接把前面几个文件改名就行了……

mxxcgzxxx

中尉

Rank: 5 Rank: 5

帖子: 327
积分: 755
技术: 38
捐助: 0
注册时间: 2011-3-17

15楼

发表于 2011-5-13 20:31 | 只看该作者

改改程序还可以加个前辍，比如：文件001.txt,文件002.txt

最前面加句 set /p e=您的文件需要加什么前辍？

最后子程序那赋值那改成 set "dat=!e!!dat!%1"

世界上没有学不会的知识,也没有想得到却做不到的事!