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

[文件操作] 求助:将一个文件 复制到同目录下的每一个文件夹 并重命名

求助:将一个文件 复制到同目录下的每一个文件夹 并重命名

例如 将 报案表.xls  复制到同目录下的每一个文件夹之中 并且重命名 重命名的规则为 文件夹的日期 加一天 即可
ps: 最好程序中 不需要出现 路径  因为是要多人多电脑使用的 做好是傻瓜处理的那种

请把文件夹的日期格式发出来看一下,因为日期可能有多种格式例如:
2019-04-03
20190403
......
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 2# Batcher


    日期 格式 为 2019-04-03 这种 望 大牛 不吝赐教 先谢谢各位了

TOP

  1. @echo off
  2. set info=互助互利,代码可用,支付宝扫码头像,感谢赞助
  3. rem 有问题,加QQ956535081及时沟通
  4. title %info%
  5. start mshta VBScript:Execute("msgbox(""%info%""):close")
  6. cd /d "%~dp0"
  7. set "file=报案表.xls"
  8. powershell ^
  9.     $f=gi '%file%';^
  10.     dir^|?{$_ -is [System.IO.DirectoryInfo]}^|%%{^
  11.         if($_.Name -match '\d{4}-\d{2}-\d{2}'){^
  12.             $newname=([datetime]$matches[0]).adddays(1).toString('yyyy-MM-dd')+$f.Extension;^
  13.             write-host ('%file% --^> '+($_.Name+'\'+$newname));^
  14.             copy -liter '%file%' ($_.FullName+'\'+$newname);^
  15.         };^
  16.     }
  17. pause
复制代码
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

回复 4# zaqmlp


    谢谢 非常感谢 批处理很好用 感谢大牛的帮助  那个二维码 跳转不出来  不知道怎么回事

TOP

返回列表