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

[文件操作] 【已解决】批处理如何随机复制文件夹?

本帖最后由 cs_t 于 2013-3-29 13:04 编辑

F盘下很多文件夹,比如 f:\1\    f:\2\   f:\3\   f:\4\   f:\5\   ...... ,但是有的文件夹名后面有特殊标记“$”比如 f:\32$\

批处理实现随机复制F盘下的一个 文件夹名不含"$"的文件夹 到c盘下面,
复制成功后在把F盘下的源文件夹的名字后增加"$"符号
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

自己顶一下,还有,为什么管理员不在站点放点百度或者谷歌的广告啊,上论坛点点广告,多少能让我们为论坛做点贡献呀~

TOP

回复 2# cs_t


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

TOP

哦,看到了,但是在遨游3 极速模式下  看不到广告,换兼容模式才看得到。

谁帮忙把上面的功能给个代码啊 ,感谢~~~~

TOP

本帖最后由 apang 于 2013-3-29 11:24 编辑
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. pushd "f:\"
  4. for /d %%a in (*) do (
  5.    set "a=%%a"
  6.    if "!a:~-1!" neq "$" (
  7.       set /a n+=1
  8.       set ".!n!=%%a"
  9.    )
  10. )
  11. set /a r=!random! %% n + 1
  12. for %%a in (!r!) do (
  13.    xcopy "!.%%a!\*" "c:\!.%%a!\" /s /y && ren "!.%%a!" "!.%%a!$"
  14. )
  15. pause
复制代码
改一下,不用临时文件
1

评分人数

TOP

楼上的朋友 谢谢你 我测试下 你QQ多少?可以用的话我送你一个月QQ会员

TOP

好像不能复制 我运行一直提示复制了0个文件件

TOP

回复 7# cs_t


    xcopy 加上 /h 开关试试

TOP

@echo off
setlocal enabledelayedexpansion
pushd "Z:\test\"
for /d %%a in (*) do (
   set "a=%%a"
   if "!a:~-1!" neq "$" (
      set /a n+=1
      set ".!n!=%%a"
   )
)
set /a r=!random! %% n + 1
for %%a in (!r!) do (
   xcopy "!.%%a!\*" "c:\test\!.%%a!\" /s /y  && ren "!.%%a!" "!.%%a!$" && start c:\test\"!.%%a!"\1.txt
)
pause

搞定了,谢谢你!QQ多少?

TOP

回复 9# cs_t


    呵呵,QQ会员,偶不需要,好意心领了。

TOP

@echo off
setlocal enabledelayedexpansion
pushd "Z:\test\"
for /d %%a in (*) do (
   set "a=%%a"
   if "!a:~-1!" neq "$" (
      set /a n+=1
      set ".!n!=%%a"
   )
)
set /a r=!random! %% n + 1
for %%a in (!r!) do (
   xcopy "!.%%a!\*" "c:\test\!.%%a!\" /s /y  && ren "!.%%a!" "!.%%a!$" && start c:\test\"!.%%a!"\1.txt
)
echo "!.%%a!"
pause

为什么echo 是空值啊!? 传递不下来吗?我需要这个参数往下传递

TOP

回复 10# apang


热心人还是多,你帮了我大忙了,谢谢谢谢!!!

TOP

返回列表