大型建站公司,外贸网站建设怎么建设,网址短链接生成,建筑设计说明模板100字如果要根据上次修改日期覆盖#xff0c;则 File 对象具有所需的属性#xff1a; DateLastModified . (您可以检查 File 对象的所有属性here . )您已经可以访问源文件对象(代码的 Photo 变量)#xff0c;因此您只需要获取目标的文件对象 .这样的事情应该有效#xff1a;Dim …如果要根据上次修改日期覆盖则 File 对象具有所需的属性 DateLastModified . (您可以检查 File 对象的所有属性here . )您已经可以访问源文件对象(代码的 Photo 变量)因此您只需要获取目标的文件对象 .这样的事情应该有效Dim PhotoDim targetFile, bmpTargetFilename, jpgTargetFilenameSourceFolder C:\Photo1DistinationFolder C:\Photo2Set ObjPhoto CreateObject(Scripting.FileSystemObject)For Each Photo In ObjPhoto.GetFolder(SourceFolder).FilesbmpTargetFilename ObjPhoto.BuildPath(DistinationFolder, Replace(Photo.Name, .jpg, .bmp))jpgTargetFilename ObjPhoto.BuildPath(DistinationFolder, Photo.Name)If ObjPhoto.FileExists(bmpTargetFilename) Then Get the target file objectSet targetFile ObjPhoto.GetFile(jpgTargetFilename) Now compare the last modified dates of both filesIf Photo.DateLastModified targetFile.DateLastModified ThenPhoto.Copy jpgTargetFilename, TrueEnd IfElsePhoto.Copy jpgTargetFilename, TrueEnd IfNext几个笔记看来你正在检查是否存在.BMP文件而复制.JPG文件所以我通过使用两个变量使它明确 .我还假设你要比较JPG文件因为那些是被复制的文件 .
