循环复制指定目录下文件名中含指定字符串的文件到其他目录下以该字符串命名的文件夹里

wdh123 · 发表于 2016-7-25 20:13:39

c:\our\aa4-李霞001.txt
c:\our\aa4-李霞.txt
c:\our\aa4-陈丽001.txt

求教大神，我想把李霞和陈丽的文件分别复制到d:\李霞和 d:\陈丽目录下（包含陈丽字符的文件名都复制进去），且文件名相同就覆盖上次复制进去的。能做到吗，c:\our\下的txt需要复制过去d:\李霞和 d:\陈丽目录下，且保留一份备份在d:\backup下，移动过去，最后c:\our\目录下是空的。在不关闭cmd下，循环复制运行着。谢谢

wdh123 · 发表于 2016-7-27 21:49:06

问题详述

我想做一个测试的logfile备份。
logfile 的格式如：abc-MCUpass123.txt abc-MCUfail123.txt

A:测试的结果出现在c:\logfile
B:想保存在2个地方。一个是D:\backup , 一个是\\server\logfile
C:有2个动作，一是先复制一个到d:\backup，一个是移动到\\server\logfile，使c:\logfile是空的.（移动时希望文件不能丢失）
D:能否做到把指定的字符串文件复制到D:\backup\MCUpass 和D:\backup\MCUfail，而fail的文件不移动到\\server\logfile，只要pass的移动到\\server\logfile。
E：能否做到循环复制，就是打开一次后，会自动复制文件，手动关闭CMD才会停止复制。

诚心求教、谢谢大师，我的水平有限. :）

bailong360 · 发表于 2016-7-28 11:39:51

本帖最后由 bailong360 于 2016-7-28 20:49 编辑

(while t
(dolist (key '("李霞" "陈丽"))
(dolist (filename (directory-files "c:\\our" nil key))
(let (fullname (concat "c:\\out" filename))
(copy-file fullname (concat "d:\" key) t)
(delete-file fullname)))
(sleep-for 5)))

复制代码

elisp练手
====2017.7.28 20:49=====

(while t
(dolist (key '("MCUpass" "MCUfail"))
(dolist (filename (directory-files "c:\\logfile" nil key))
(let (fullname (concat "c:\\logfile" filename))
(copy-file fullname (concat "d:\" key) t)
(when (equal key "MCUpass")
(copy-file fullname (concat "\\\\server\\logfile")))
(delete-file fullname)))
(sleep-for 5)))

复制代码

LZ我只是来练手的......

wdh123 · 发表于 2016-7-28 19:56:31

本帖最后由 pcl_test 于 2016-7-28 21:34 编辑

回复 3# bailong360

不好意思，没能实现。

你能帮我看看这个吗。

问题详述见2楼

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

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

[文件操作] 循环复制指定目录下文件名中含指定字符串的文件到其他目录下以该字符串命名的文件夹里

评分

评分

评分