中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 批量建立文件夹,把文件夹和里面的文件放进去
« [1] [2] » ›
作者:
标题: 批量建立文件夹,把文件夹和里面的文件放进去 上一主题 | 下一主题
dddyjq1
初级用户





积分 175
发帖 108
注册 2008-5-19
状态 离线
『楼 主』:  批量建立文件夹,把文件夹和里面的文件放进去

一个目录下有几百个文件夹，文件夹里有很多文件，文件名可能有空格或特殊字符

驱动器 C 中的卷没有标签。
卷的序列号是 0C5D-07FF

c:\32 的目录

2008-09-02  22:32    <DIR>          .
2008-09-02  22:32    <DIR>          ..
2008-09-02  22:35    <DIR>          科
2008-09-02  22:35    <DIR>          空
2008-09-02  22:35    <DIR>          绝
2008-09-02  22:35    <DIR>          郡
2008-09-02  22:35    <DIR>          克
2008-09-02  22:35    <DIR>          军
2008-09-02  22:35    <DIR>          决
2008-09-02  22:35    <DIR>          卡
2008-09-02  22:35    <DIR>          可
2008-09-02  22:35    <DIR>          咖
2008-09-02  22:35    <DIR>          啃
2008-09-02  22:35    <DIR>          喀
2008-09-02  22:35    <DIR>          均
2008-09-02  22:35    <DIR>          垦
2008-09-02  22:35    <DIR>          堪
2008-09-02  22:35    <DIR>          客
2008-09-02  22:35    <DIR>          崛
2008-09-02  22:35    <DIR>          巨
2008-09-02  22:35    <DIR>          康
2008-09-02  22:35    <DIR>          开
2008-09-02  22:35    <DIR>          拒
2008-09-02  22:35    <DIR>          炕
2008-09-02  22:35    <DIR>          烤
2008-09-02  22:42               222 2.txt
               1 个文件            222 字节

c:\32\科 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:51               993 科尔特 .txt
2008-09-01  23:44             3,953 科特迪瓦男足 .txt
2008-09-01  23:50             1,529 科学出版社网站 .txt
2008-09-01  23:43             1,785 科学画报 .txt
2008-09-01  23:44             2,428 科学技术文献出版社 .txt
               5 个文件         10,688 字节

c:\32\空 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:49               137 空分多址 .txt
2008-09-01  23:41             3,617 空间物理 .txt
2008-09-01  23:42               924 空降兵和特种兵救生刀 .txt
2008-09-01  23:41               976 空军救生刀 .txt
               4 个文件          5,654 字节

c:\32\绝 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:50             4,008 绝句四首 .txt
2008-09-01  23:50            20,882 绝世双骄 .txt
               2 个文件         24,890 字节

c:\32\郡 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:47             5,604 郡斋独酌 .txt
               1 个文件          5,604 字节

c:\32\克 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:45               138 克莱克·奥·布莱恩·科恩斯威特方块 .txt
2008-09-01  23:44             2,500 克莱蒙梭级航空母舰 .txt
2008-09-01  23:43             7,253 克罗地亚国家足球队 .txt
               3 个文件          9,891 字节

c:\32\军 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:49               794 军屯锅魁 .txt
               1 个文件            794 字节

c:\32\决 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:42               187 决策支持中心 .txt
2008-09-01  23:42             2,247 决斗高达 .txt
               2 个文件          2,434 字节

c:\32\卡 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:49               547 卡布斯·本·赛义德 .txt
2008-09-01  23:50             1,023 卡达隆尼会战 .txt
2008-09-01  23:48               558 卡狄根威尔斯高基犬 .txt
2008-09-01  23:43             2,607 卡迭石战役 .txt
2008-09-01  23:43             6,056 卡莉达·齐亚 .txt
2008-09-01  23:51               378 卡洛·阿泽利奥·钱皮 .txt
2008-09-01  23:44             1,580 卡庞特拉事件 .txt
2008-09-01  23:42               352 卡普奇诺 .txt
               8 个文件         13,101 字节

c:\32\可 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:47               194 可扩展标记语言 .txt
2008-09-01  23:43               720 可怜的秋香 .txt
2008-09-01  23:48               150 可移植可执行(PE)文件 .txt
2008-09-01  23:47               695 可执行文件 .txt
               4 个文件          1,759 字节

c:\32\咖 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:50               531 咖喱花蟹 .txt
2008-09-01  23:47               699 咖喱牛小排 .txt
2008-09-01  23:44               835 咖哩牛肉粽 .txt
               3 个文件          2,065 字节

c:\32\啃 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:49             2,231 啃春 .txt
               1 个文件          2,231 字节

c:\32\喀 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:49               289 喀什馕坑肉 .txt
               1 个文件            289 字节

c:\32\均 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:44             8,084 均瑶集团 .txt
               1 个文件          8,084 字节

c:\32\垦 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:46             5,807 垦利县 .txt
               1 个文件          5,807 字节

c:\32\堪 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:46             4,574 堪萨斯州 .txt
               1 个文件          4,574 字节

c:\32\客 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:50             4,318 客至 .txt
               1 个文件          4,318 字节

c:\32\崛 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:45             2,878 崛围山 .txt
               1 个文件          2,878 字节

c:\32\巨 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:42               753 巨济岛事件 .txt
2008-09-01  23:45             1,378 巨系统 .txt
               2 个文件          2,131 字节

c:\32\康 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:49               583 康复国际 .txt
2008-09-01  23:46             3,898 康斯坦丁 .txt
2008-09-01  23:41            36,120 康熙微服私访记 .txt
               3 个文件         40,601 字节

c:\32\开 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:51               983 开封电视台 .txt
2008-09-01  23:51             3,092 开口笑 .txt
2008-09-01  23:42             3,175 开锁 .txt
2008-09-01  23:40               474 开洋葱油面 .txt
               4 个文件          7,724 字节

c:\32\拒 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:47               404 拒绝 .txt
               1 个文件            404 字节

c:\32\炕 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:42             4,882 炕围画 .txt
               1 个文件          4,882 字节

c:\32\烤 的目录

2008-09-02  22:35    <DIR>          .
2008-09-02  22:35    <DIR>          ..
2008-09-01  23:44               459 烤蕃茄菲力牛排 .txt
2008-09-01  23:44               645 烤腹嵴牛肉 .txt
2008-09-01  23:48               902 烤酿馅鸡 .txt
2008-09-01  23:44               407 烤鳀鱼纽约克牛排 .txt
2008-09-01  23:43               420 烤鳀鱼纽约客牛排 .txt
               5 个文件          2,833 字节

     所列文件总数:
              57 个文件        163,858 字节
              71 个目录  3,873,136,640 可用字节



2.TXT的内容为
拒        j        ju
决        j        jue
绝        j        jue
崛        j        jue
军        j        jun
均        j        jun
郡        j        jun
咖        k        ka
喀        k        ka
卡        k        ka
开        k        kai
堪        k        kan
康        k        kang
炕        k        kang
烤        k        kao
科        k        ke
可        k        ke
克        k        ke
客        k        ke
垦        k        ken
啃        k        ken
空        k        kong
巨        j        ju


想以2.TXT为依据建立文件夹,如J、K，并在J、K文件夹下建立如JU、JUE、JUN、KA、KAI等文件夹，再把“拒”、“巨”等文件夹及文件夹内的TXT文件放入JU的文件夹内，请问改如何操作？

2008-9-2 23:24
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 2 楼』:  


@echo off
set SrcDir=C:\32
set DstDir=C:\test
set ListFile=C:\test\2.txt
for /f "usebackq tokens=1-3 delims= " %%a in ("%ListFile%") do (
  md "%DstDir%\%%b\%%c" 2>nul
  move /y "%SrcDir%\%%a" "%DstDir%\%%b\%%c"
)




2008-9-3 00:10
查看资料  发短消息 网志   编辑帖子  回复  引用回复
dddyjq1
初级用户





积分 175
发帖 108
注册 2008-5-19
状态 离线
『第 3 楼』:  

谢了,只可惜没有反应

2008-9-3 00:50
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 4 楼』:  

请注意修改2楼定义的变量路径
如果还是不行请把你修改后的代码贴出来看看



2008-9-3 10:18
查看资料  发短消息 网志   编辑帖子  回复  引用回复
dddyjq1
初级用户





积分 175
发帖 108
注册 2008-5-19
状态 离线
『第 5 楼』:  

我没有改路径，

2008-9-3 22:40
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
dddyjq1
初级用户





积分 175
发帖 108
注册 2008-5-19
状态 离线
『第 6 楼』:  

我没有改路径， 我把C盘下的两个目录传上来，您帮我看看
http://upload.cn-dos.net/img/722.rar

2008-9-3 22:47
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
dddyjq1
初级用户





积分 175
发帖 108
注册 2008-5-19
状态 离线
『第 7 楼』:  

请各位高手帮忙想想，先谢了！

2008-9-4 22:24
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 8 楼』:  

原来你的2.txt里面用的tab键啊，你把代码中delims=后面那个空格换成tab键就行了。



2008-9-4 22:53
查看资料  发短消息 网志   编辑帖子  回复  引用回复
dddyjq1
初级用户





积分 175
发帖 108
注册 2008-5-19
状态 离线
『第 9 楼』:  

谢了，好，谢谢

2008-9-4 23:04
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
dddyjq1
初级用户





积分 175
发帖 108
注册 2008-5-19
状态 离线
『第 10 楼』:  

如果不是文件夹而是压缩文件.RAR代码要如何改呢?

2008-9-8 22:11
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 11 楼』:  Re 10楼

我的理解能力非常有限，能否把问题详细描述一遍？



2008-9-8 22:17
查看资料  发短消息 网志   编辑帖子  回复  引用回复
dddyjq1
初级用户





积分 175
发帖 108
注册 2008-5-19
状态 离线
『第 12 楼』:  

我原来是一个一个文件夹的移动,我现在把文件夹批理压缩成RAR文件,也想按2.TXT方式移进去,该如何改

2008-9-8 22:42
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
dddyjq1
初级用户





积分 175
发帖 108
注册 2008-5-19
状态 离线
『第 13 楼』:  

请各位高手帮忙想想

2008-9-9 22:17
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 14 楼』:  

2楼的代码能看懂吗？
有没有看过rar.exe的帮助？



2008-9-9 22:34
查看资料  发短消息 网志   编辑帖子  回复  引用回复
dddyjq1
初级用户





积分 175
发帖 108
注册 2008-5-19
状态 离线
『第 15 楼』:  

2楼的代码看不懂吗,没有认真看过rar.exe的帮助，麻烦您帮我写一下如何改代码，先谢了！

2008-9-9 22:41
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
« [1] [2] » ›
请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。


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



论坛跳转:  



[ 联系联盟系统管理团队 - 中国DOS联盟 ]

Sponsored by ifanr Inc | © 2001-2023