[已解决]批处理如何复制文件同名不覆盖，且重命名？

qq872862088 · 发表于 2015-8-20 00:56:19

复制代码

上述代码只能提醒是否覆盖，我想实现同名文件如F:\1.txt和F:\1\1.txt拷进同一文件夹时，后拷的1.txt变成1(1).txt,求指教

DAIC · 发表于 2015-8-20 09:17:49

WHY · 发表于 2015-8-20 11:01:25

本帖最后由 WHY 于 2015-8-21 15:50 编辑

一种思路：
把当前目录（包括子目录）的所有文件复制到 d:\new文件夹，遇到同名文件时，自动增加(1)、(2)等编号
如果只需要复制指定类型的文件，修改第4行的 *.* 即可。比如改成 *.txt 就只复制扩展名为txt的文件

1<1/* :
@echo off
md d:\new 2>nul
for /f "tokens=1*delims=/" %%i in ('dir /b /s /a-d *.*^|cscript //Nologo //E:jscript "%~f0"')do (
copy "%%j" "d:\new\%%i"
)
pause & exit
*/
var map = {};
var str = WScript.StdIn.ReadAll().replace(
/.+\\(.+)\r\n/g,
function(a,b){
var s = '', n = b.toLowerCase();
map.hasOwnProperty(n)?(map[n]++,s='('+map[n]+')'):map[n]=0;
b = b.replace(/(.+?)(\.[^.]+|)$/, '$1'+s+'$2');
return(b + '/' + a);
}
)
WScript.Echo(str)

复制代码

pcl_test · 发表于 2015-8-20 11:36:51

本帖最后由 pcl_test 于 2015-8-20 11:42 编辑

复制代码

WHY · 发表于 2015-8-20 13:28:13

回复 4# pcl_test

文件名含 +-～() 等字符呢？

WHY · 发表于 2015-8-20 13:31:47

for + call 方案，但效率绝逼不高

复制代码

qq872862088 · 发表于 2015-8-20 15:08:06

回复 4# pcl_test

文件覆盖了，cmd里出现“运算符不存在”这种问题，我电脑问题吗？

pcl_test · 发表于 2015-8-20 15:15:42

本帖最后由 pcl_test 于 2015-8-20 15:17 编辑

回复 5# WHY

这种方法是有此弊端的，但对于一般的文件名，效果却是极好，故也提一下
回复 7# qq872862088
不是，只是文件名有特殊字符而已

qq872862088 · 发表于 2015-8-20 15:18:54

回复 6# WHY

测试过，只有2个同名文件，但新文件夹出现3个同名文件，还有for /r %%i in (*) do里的*改成'dir /b /s *.txt'找不到指定文件...不知道怎么改

qq872862088 · 发表于 2015-8-20 15:22:17

回复 8# pcl_test

的确，没有特殊字符就很好用，但我的文件名大多都是以日期起名的，都带有空格，有什么好方法吗

pcl_test · 发表于 2015-8-20 15:33:19

回复 10# qq872862088

空格不影响，该是其他字符影响

3楼的dir /b /s /a-d改为dir /b /s /a-d *.txt
或6楼in (*)改为in (*.txt)皆可

qq872862088 · 发表于 2015-8-20 15:42:32

回复 11# pcl_test

文件名格式就是这样，果然是-号

qq872862088 · 发表于 2015-8-20 15:51:49

本帖最后由 qq872862088 于 2015-8-20 15:55 编辑

回复 3# WHY

3楼和11楼完美解决了我的问题了，感谢感谢

CrLf · 发表于 2015-8-20 20:54:44

回复 4# pcl_test

for %%i in (!fn!) do
这里有隐患

WHY · 发表于 2015-8-21 16:20:18

另外一种办法：

复制代码

		自动登录	找回密码
密码			注册

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

[文件操作] [已解决]批处理如何复制文件同名不覆盖，且重命名？