![]() |
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-08-07 19:51 |
共 48,041 主题排行 / 350,128 发帖 / 今日 3 篇 / 48,252 会员排行 |
| DOS批处理 & 脚本技术(批处理室) » 文件批量移动复制批处理 |
| 可打印版本 1,324 / 9 |
| 第1楼 cnndmm | 发表于 2008-03-17 12:11 |
| 新手上路 发帖 6 积分 14 | |
|
文件批量移动复制批处理 请论坛各位大大帮忙..本人想做一格批量复制移动文件的批处理..但有个问题没弄懂..如何才能在执行的时候,自动跳过已有的文件.而不是替换..
|
|
| 第2楼 moniuming | 发表于 2008-03-17 12:57 |
| 银牌会员 发帖 574 积分 1,335 来自 广西 | |
|
先判断目标文件夹里是否有文件再进行复制
|
|
| 第3楼 SpikeKnox | 发表于 2008-03-17 12:59 |
| 初级用户 发帖 28 积分 116 | |
|
用vbs脚本解决比较方便 Dim fso
Set fso = CreateObject("scripting.filesystemobject") On Error Resume Next 'copy c:\test\*.* 到 d:\ 目录下,不覆盖 fso.CopyFile "c:\test\*.*","d:\",False PS:没考虑要Copy子目录的情况 |
|
| 第4楼 cnndmm | 发表于 2008-03-17 13:30 |
| 新手上路 发帖 6 积分 14 | |
|
小弟是个大菜菜...新学的..你们写的都看不懂..
能不能提供一个完整的文件给我? 还有 2楼说的先写个判断语句..那个语句怎么写?我所有的文件都是同一种格式的..都在根目录.. |
|
| 第5楼 HAT | 发表于 2008-03-17 15:15 |
| 版主 发帖 5,017 积分 9,023 | |
| 第6楼 cnndmm | 发表于 2008-03-17 16:37 |
| 新手上路 发帖 6 积分 14 | |
|
楼上的高手..感谢你的程序..
我还有个问题要请教..你这个批处理能处理指定目录的复制..但如果我要指定复制N个不同名字的文件(以编号为文件名)到任意的盘符里去..碰上同样编号就跳过不复制.又要如何处理呢? copy 30001.* f: copy 30008.* f: copy 30009.* f: copy 30036.* f: copy 30039.* f: copy 30047.* f: copy 30052.* f: copy 30093.* f: copy 30094.* f: copy 30108.* f: copy 30136.* f: copy 30138.* f: copy 30139.* f: copy 30146.* f: copy 30190.* f: copy 30193.* f: copy 30210.* f: copy 30245.* f: copy 30073.* f: copy 30111.* f: copy 30112.* f: copy 30113.* f: copy 30125.* f: copy 30130.* f: |
|
| 第7楼 cnndmm | 发表于 2008-03-17 17:42 |
| 新手上路 发帖 6 积分 14 | |
|
哪位大大帮忙写一下..衷心的感谢了..
|
|
| 第8楼 moniuming | 发表于 2008-03-17 20:06 |
| 银牌会员 发帖 574 积分 1,335 来自 广西 | |
|
将5楼的代码稍作更改即可(复制到根目录):
|
|
| 第9楼 cnndmm | 发表于 2008-03-18 14:18 |
| 新手上路 发帖 6 积分 14 | |
|
楼上的大大。。你这个还是从目录复制的。
我想要的是复制根目录下的N个文件。能不能这样考虑。。批处理读取文本文件里的内容。。内容为: 30001.* 30008.* 30009.* 30036.* 30039.* 30047.* 30052.* 30093.* 30094.* 30108.* 30136.* 30138.* 30139.* 然后把这些文件复制到指定的盘符里去,中途如果碰上相同的文件。则不提示自动跳过。。 |
|
| 第10楼 cnndmm | 发表于 2008-03-19 12:17 |
| 新手上路 发帖 6 积分 14 | |
|
顶一下..希望有高手帮忙..
|
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |