随风

如果某文件夹内没有 jpg 或 gif 文件呢？那么还要复制该文件夹吗？

随风

别人好心为你写了代码，你测试不成功应该告诉别人为什么不成功，提示什么错误。
你预期的是什么，实际执行代码得到的是什么。
而不是简单的一句 “没有得到预期的目的” 就否定了别人的劳动。
你来这里发帖求助，别人解答是热心而不是义务，即使没有真正的帮到你，也应该对这份热心表示感谢，不是吗？
而最能体现你对别人劳动成果尊重的方法之一就是认真测试代码，并指出和你预期不符的具体的地方。
:

@echo off
::目的文件夹名为 temp
set wjj=temp
::复制文件夹及子文件夹
for /f "delims=" %%a in ('dir/b/s/ad') do (
   if not exist "%wjj%\" md "%wjj%"
   set "var=%%a"
   setlocal enabledelayedexpansion
   set var=!var:*%cd%=!
   md "%wjj%!var!"
   endlocal
)
::复制 jpg 和 gif 文件
for /f "delims=" %%a in ('dir/b/s/a-d *.jpg *.gif') do (
   set "var=%%a"
   setlocal enabledelayedexpansion
   set var=!var:*%cd%=!
   copy /y "%%a" "%wjj%!var!"
   endlocal
)
pause
复制代码

随风

回复 楼主

如果你是通过回帖中某个完整代码解决的，请说明是谁的代码解决了你的问题。
如果你是通过某人的代码思路解决的，也请说明。（最好能附上完整代码）
如果你是自行解决的，方便的话最好也能把代码分享一下。

问题解决了，既然发了帖求助，那么请为后来人想想，
如果有人遇到同样问题能直接通过你的这个帖解决不是更好吗。
论坛之所以对标题及回帖管理这么严格就是方便后来人，或者说把已经发的帖作为论坛资源。
试想如果日后有人因同样问题搜索到该帖，他该如何解决他的问题呢？

另：

偶觉得你们在编代码时，都没有自己测试过，觉得这样很不负责的，虽是有苦劳，可是完全不留意一下发贴人的感受，完全在想我是无私帮你，不管怎么你都要对我毕恭毕敬，偶是个直肠子的，如果是这样，宁可不回贴

楼主这话说的是否偏激了一点？
对于一个bat老手来说，有很多代码是不需要测试的，不能与你预期的结果一样，也并不能说明别人就没有测试代码，有可能是你的题意描述不清，也有可能是别人对你的题意理解有误。即便是别人写代码时考虑不周，你测试后把问题再回帖说明一下又怎么了？难道你真的是一字千金？如此吝啬？
直肠子和烈性子 都不是坏毛病，但绝不能成为自己行为的一种理由。
别的不说，就说本人11楼的回帖，就是经过测试的，楼主却未对该帖进行任何反馈，为何？就因为你的问题已经解决了？别人的回复已经是多此一举了？
总的来说对楼主的这种“求助”态度不敢恭维，我也是个直肠子和烈性子，如有什么地方得罪的，还请楼主海涵。

随风

经cn-dos里一会员的提醒，可以更简洁高效。

@echo off
::目的文件夹名为 temp
set wjj=temp
for /f "delims=" %%a in ('dir/b/s/ad') do (
   if not exist "%wjj%\" md "%wjj%"
   set "var=%%a"
   setlocal enabledelayedexpansion
   set var=!var:*%cd%=!
   md "%wjj%!var!"
   copy /y "%%a\*.jpg" "%wjj%!var!" >nul 2>nul
   copy /y "%%a\*.gif" "%wjj%!var!" >nul 2>nul
   endlocal
)
copy /y "*.jpg" "temp" >nul 2>nul
copy /y "*.gif" "temp" >nul 2>nul
pause
复制代码

[ 本帖最后由 随风 于 2009-4-7 13:38 编辑 ]