蓝色信仰

博客园 首页 新随笔 联系 订阅 管理

2012年9月25日 #

VBS脚本COPY指定日期文件及文件夹
摘要： Set oFso = CreateObject("Scripting.FileSystemObject")Set oFolder = oFso.GetFolder(sPath)mpath="d:\1" rem:这里设置你要拷进去的文件夹路径Set oFiles = oFolder.FilesFor Each oFile In oFiles If FormatDateTime(ofile.DateCreated,1)=FormatDateTime(Date,1) Then ofso.CopyFile ofile.Path,mpath End ifNextS 阅读全文
posted @ 2012-09-25 12:00 蓝色信仰 阅读(1745) 评论(0) 推荐(0)