[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
ww0000

Rank: 3Rank: 3

帖子
188 
积分
219 
技术
0  
捐助
0  
注册时间
2012-12-15 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2023-3-5 16:14 | 只看该作者

[文件操作] 批处理如何批量复制指定文件夹到当前文件夹？

老师们好，我有"张三"、"2022李四"、"王老五"、"赵一六"、"陈七选"、"2023张三选"、"王五"、"马老七选"、"李四相片"这些文件夹，怎么能把"陈七选"、"2023张三选"、"马老七选"、这些带“选”字的文件夹复制到当前文件夹？
收藏 分享

jyswjjgdwtdtj

Rank: 5Rank: 5

帖子
606 
积分
705 
技术
30  
捐助
0  
注册时间
2023-2-9 
2楼
发表于 2023-3-5 16:50 | 只看该作者
vbs行不行？

TOP

ww0000

Rank: 3Rank: 3

帖子
188 
积分
219 
技术
0  
捐助
0  
注册时间
2012-12-15 
3楼
发表于 2023-3-5 16:55 | 只看该作者
回复 2# jyswjjgdwtdtj


    可以

TOP

jyswjjgdwtdtj

Rank: 5Rank: 5

帖子
606 
积分
705 
技术
30  
捐助
0  
注册时间
2023-2-9 
4楼
发表于 2023-3-5 16:55 | 只看该作者
回复 3# ww0000 
  1. set s=createobject("shell.application")

  2. set nowfolder=s.namespace("这里写你要移动的文件夹的父文件夹")

  3. set tofolder=s.namespace("这里写你要移动到的文件夹")

  4. for each item in nowfolders.items

  5. if item.isfolder and not instr(item.name,"选") then

  6. tofolder.copyhere(item.path,4)

  7. end if

  8. next
复制代码

TOP

ww0000

Rank: 3Rank: 3

帖子
188 
积分
219 
技术
0  
捐助
0  
注册时间
2012-12-15 
5楼
发表于 2023-3-5 17:06 | 只看该作者
本帖最后由 ww0000 于 2023-3-5 17:12 编辑

回复 4# jyswjjgdwtdtj 错误：调用过程不能使用括号？

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14844 
积分
46040 
技术
854  
捐助
745  
注册时间
2008-6-9 
6楼
发表于 2023-3-5 17:24 | 只看该作者
回复 1# ww0000


    这些文件夹目前在哪个路径下？跟bat所在文件夹有啥关联关系吗？
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

ww0000

Rank: 3Rank: 3

帖子
188 
积分
219 
技术
0  
捐助
0  
注册时间
2012-12-15 
7楼
发表于 2023-3-5 17:30 | 只看该作者
回复 6# Batcher


    BAT所在的目标文件夹和需要复制的源文件夹都在同一个盘上

TOP

ww0000

Rank: 3Rank: 3

帖子
188 
积分
219 
技术
0  
捐助
0  
注册时间
2012-12-15 
8楼
发表于 2023-3-5 17:34 | 只看该作者
本帖最后由 ww0000 于 2023-3-5 17:35 编辑

回复 6# Batcher


    A里面有很多文件夹，B里面有很多文件夹，C里面有很多文件夹，我要把ABC里面带“选”字的文件夹复制到D文件夹（ABCD只是打比方）

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14844 
积分
46040 
技术
854  
捐助
745  
注册时间
2008-6-9 
9楼
发表于 2023-3-5 18:26 | 只看该作者
回复 8# ww0000


请参考Q-04把bat文件保存为ANSI编码：
https://mp.weixin.qq.com/s/Koje4FufWxWBs7ioDy_LJA
  1. @echo off

  2. REM 假设A、B、C、D都在这个路径下

  3. set "FromFolder=C:\Test\测试"

  4. REM 复制到当前文件夹

  5. set "ToFolder=%~dp0"

  6. for /f "delims=" %%i in ('dir /b /s /ad "%FromFolder%" ^| findstr "选"') do (

  7.     xcopy /e /y "%%i" "%ToFolder%%%~nxi\" 

  8. )
复制代码
1

评分人数

我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

jyswjjgdwtdtj

Rank: 5Rank: 5

帖子
606 
积分
705 
技术
30  
捐助
0  
注册时间
2023-2-9 
10楼
发表于 2023-3-5 19:29 | 只看该作者
回复 4# jyswjjgdwtdtj


    那就把copyhere的括号删了吧
发出来的时候没试

TOP

ww0000

Rank: 3Rank: 3

帖子
188 
积分
219 
技术
0  
捐助
0  
注册时间
2012-12-15 
11楼
发表于 2023-3-5 19:37 | 只看该作者
回复 9# Batcher


谢谢老师，效果达到！！！

TOP

返回列表