中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
作者:
标题: (求助)如何批量生成文件 上一主题 | 下一主题
zxlxsqzy
初级用户





积分 126
发帖 47
注册 2007-7-2
状态 离线
『楼 主』:  (求助)如何批量生成文件

因为要做一个工作,需要在一个文件夹中做上百个记事本文件,并且按顺序命名,有没有办法先创建一个文件,然后用批处理完成下面的工作
比如说我想在D:\666下建名字为S001-----S100这样一百个空的文本文件,请问我应该怎么写批处理。我可以先手动建一个名为S001的文本文件,接下来我应该怎么办?

2007-7-3 23:46
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
lasting
初级用户





积分 52
发帖 24
注册 2007-5-9
状态 离线
『第 2 楼』:  

试试这个可行不。。。

  Quote:
@echo off
color 1f
:01
set /a bar=%choice%+1
echo. > s%bar%.txt
set choice=%bar%
if /i "%choice%"=="100" goto et
goto 01
:et
exit



2007-7-4 01:23
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
wjh6088
初级用户





积分 85
发帖 39
注册 2007-6-28
状态 离线
『第 3 楼』:  


@echo off
for /l %%i in (1,1,99) do if %%i LSS 10 (call :xy10 %%i) else (call :dy10 %%i)
echo.>S100.txt
goto :end
:xy10
echo.>S00%1.txt&&goto :eof
:dy10
echo.>S0%1.txt&&goto :eof
:end
pause
exit


2007-7-4 01:46
查看资料  发短消息 网志   编辑帖子  回复  引用回复
qinbuer
高级用户

我思故我在


积分 512
发帖 228
注册 2007-1-21
状态 离线
『第 4 楼』:  

@echo off & setlocal ENABLEDELAYEDEXPANSION
for /l %%a in (1,1,100) do (
if %%a lss 10 (set var=00%%a) else (
   if %%a lss 100 (set var=0%%a) else (
     set var=%%a
       )
     )
       type nul >D:\666\S!var!.txt
   )



我确实是只菜鸟,而且这里X人太多,所以我不敢装X。谁要再说我装X,我就XXOO他。
2007-7-4 01:50
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
qinbuer
高级用户

我思故我在


积分 512
发帖 228
注册 2007-1-21
状态 离线
『第 5 楼』:  

来迟一步 ^_^!

3楼兄弟方法比我好,学习了,论坛应该很多这方面的文章,LZ可以搜索下



我确实是只菜鸟,而且这里X人太多,所以我不敢装X。谁要再说我装X,我就XXOO他。
2007-7-4 02:01
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ThinKing
中级用户





积分 471
发帖 207
注册 2007-5-3
状态 离线
『第 6 楼』:  


@for /L %%a in (1,1,100) do @if %%a lss 10 (cd.>00%%a.txt) else (if %%a leq 99 (cd.>0%%a.txt) else (cd.>%%a.txt))


2007-7-4 11:01
查看资料  发短消息 网志   编辑帖子  回复  引用回复
ccwan
金牌会员




积分 2725
发帖 1160
注册 2006-9-23
来自 河北廊坊
状态 离线
『第 7 楼』:  

这个有很多方法。
@echo off&setlocal enabledelayedexpansion
for /l %%i in (1,1,100) do (set var=00%%i&cd.>S!var:~-3!.txt)




三人行,必有吾师焉。   学然后知不足,教然后知困,然后能自强也。
2007-7-4 11:30
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
wjh6088
初级用户





积分 85
发帖 39
注册 2007-6-28
状态 离线
『第 8 楼』:  



  Quote:
Originally posted by ccwan at 2007-7-4 11:30 AM:
这个有很多方法。
@echo off&setlocal enabledelayedexpansion
for /l %%i in (1,1,100) do (set var=00%%i&cd.>S!var:~-3!.txt)

这个比较精简!赫赫,没想到这个思路,谢谢了

2007-7-4 11:41
查看资料  发短消息 网志   编辑帖子  回复  引用回复
6622186
高级用户





积分 894
发帖 411
注册 2007-2-17
状态 离线
『第 9 楼』:  

七楼写的真好



@set c=     不知则觉多,知则觉少,越知越多,便觉越来越少.        --- 知多少.
@for,/l,%%i,in,(1,1,55)do,@call,set/p=%%c:~%%i,1%%<nul&ping/n 1 127.1>nul


2007-7-4 22:30
查看资料  发短消息 网志   编辑帖子  回复  引用回复
Vampire
初级用户





积分 176
发帖 78
注册 2007-4-15
状态 离线
『第 10 楼』:  

思路明确,方法简洁,强!

2007-7-5 00:35
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
jmz573515
银牌会员




积分 1212
发帖 464
注册 2006-12-13
状态 离线
『第 11 楼』:  

参考CCWN兄的代码写个VBS的,纯属灌水!
for i=1 to 100:createobject("scripting.filesystemobject").createtextfile("s" & right("00" & i,3) & ".txt"):next


2007-7-5 08:47
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
zxlxsqzy
初级用户





积分 126
发帖 47
注册 2007-7-2
状态 离线
『第 12 楼』:  

谢谢大家对我的帮助,谢谢!

2007-7-5 13:24
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
jashonx
初级用户

铂金会员


积分 44
发帖 21
注册 2007-4-15
状态 离线
『第 13 楼』:  

一个小问题,居然可以有这么多的解决方案!牛啊!

2007-7-5 18:01
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
steven
新手上路





积分 14
发帖 5
注册 2007-6-23
状态 离线
『第 14 楼』:  

3楼的好!

2007-7-5 20:49
查看资料  发送邮件  发短消息 网志  OICQ (118010132)  编辑帖子  回复  引用回复
lygwdyanzi
初级用户





积分 51
发帖 26
注册 2007-5-13
状态 离线
『第 15 楼』:  

cd. 是什么东西啊?查不到啊

2007-7-8 13:50
查看资料  发短消息 网志   编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: