我想用 XCOPY 命令写个批处理,但是每天都会生成多个版本,我只想复制最新的文件夹内文件
3个回答
展开全部
这个用批处理写太麻烦里
用au3 写简单
;--------------- au3 源代码 ------------------------------------
Local $srcdir
Local $desdir
Local $name[1001]
Local $search
Local $i
Local $file
Local $attrib
Local $str
Local $max
Local $cmp
Local $flag
$srcdir = IniRead("x.ini","src","srcpath","")
$desdir = IniRead("x.ini","des","despath","")
$name[0] = 0
$search = FileFindFirstFile($srcdir&"\"&"*.*")
If $search = -1 Then
MsgBox(0, "错误", "没有文件/目录 匹配搜索")
Exit
EndIf
$i = 1
While 1
$file = FileFindNextFile($search)
If @error Then ExitLoop
$attrib = FileGetAttrib($srcdir&"\"&$file)
$str = StringInStr($attrib,"D")
If $str = 0 Then
ContinueLoop
Else
$name[$i] = $file
$i += 1
EndIf
WEnd
FileClose($search)
$name[0] = $i-1
$max = 1
For $i = 2 To $name[0]
$cmp = StringCompare($name[$max],$name[$i])
If $cmp<0 Then
$max = $i
EndIf
Next
$flag = FileCopy($srcdir&"\"&$name[$max],$desdir,9)
If $flag Then
MsgBox(64,"复制成功","复制"&@CRLF&$srcdir&"\"&$name[$max]&"\*.*"&@CRLF&"到"&@CRLF&$desdir)
Else
MsgBox(16,"","复制失败!")
Endif
;----------------------------------------------
配置文件
x.ini
;-------------------------------------
[src]
srcpath=c:\sysdata
[des]
despath=d:\userfile
;-------------------------------------
用au3 写简单
;--------------- au3 源代码 ------------------------------------
Local $srcdir
Local $desdir
Local $name[1001]
Local $search
Local $i
Local $file
Local $attrib
Local $str
Local $max
Local $cmp
Local $flag
$srcdir = IniRead("x.ini","src","srcpath","")
$desdir = IniRead("x.ini","des","despath","")
$name[0] = 0
$search = FileFindFirstFile($srcdir&"\"&"*.*")
If $search = -1 Then
MsgBox(0, "错误", "没有文件/目录 匹配搜索")
Exit
EndIf
$i = 1
While 1
$file = FileFindNextFile($search)
If @error Then ExitLoop
$attrib = FileGetAttrib($srcdir&"\"&$file)
$str = StringInStr($attrib,"D")
If $str = 0 Then
ContinueLoop
Else
$name[$i] = $file
$i += 1
EndIf
WEnd
FileClose($search)
$name[0] = $i-1
$max = 1
For $i = 2 To $name[0]
$cmp = StringCompare($name[$max],$name[$i])
If $cmp<0 Then
$max = $i
EndIf
Next
$flag = FileCopy($srcdir&"\"&$name[$max],$desdir,9)
If $flag Then
MsgBox(64,"复制成功","复制"&@CRLF&$srcdir&"\"&$name[$max]&"\*.*"&@CRLF&"到"&@CRLF&$desdir)
Else
MsgBox(16,"","复制失败!")
Endif
;----------------------------------------------
配置文件
x.ini
;-------------------------------------
[src]
srcpath=c:\sysdata
[des]
despath=d:\userfile
;-------------------------------------
展开全部
/D:m-d-y 复制在指定日期或指定日期以后更改的文件。
如果没有提供日期,只复制那些源时间比目标时间新的文件。
按这个说明 你可以直接 复制 你这个目录的上级目录 在后面加/D 就可以了
如果没有提供日期,只复制那些源时间比目标时间新的文件。
按这个说明 你可以直接 复制 你这个目录的上级目录 在后面加/D 就可以了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
我想这个应该能行吧,关键是dir/ad/od/b
@echo off
for /f %%i in ('dir/ad/od/b') do set source=%%i
xcopy/s %source% d:\back
@echo off
for /f %%i in ('dir/ad/od/b') do set source=%%i
xcopy/s %source% d:\back
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询