请问各位大侠，怎么按时间挑选某一个文件夹里的文件？

Question

我想要在某个文件夹中，以时间为标准选择文件，比我给定的时间大的文件统统复制。我该怎么做？

Answer 1

利用file对象，判断其属性DateCreated是否符合复制要求，然后逐个复制，用copy方法

Answer 2

用GETFILETIME（）函数或
定义SCRIPT.SYSTEMFILEOBJECT 对象中的FILE 对象
以获的文件时间再用DATEDIFF（）函数比较

Answer 3

实际上没有那难吧。
先取出文件名(使用Dir)，再去掉其后缀，用去掉后缀的数字来与你指定的时间比较，大于指定时间再复制，否则不复制。这里假如文件后缀名为“.txt”,指定文件都在文件夹“D:\MYFiles”下dim X as string
dim XX as string
dim FileNumber as long
const T 
 
   X=dir("D:\MYFiles\*.txt")
   XX =mid$(X,1,len(X)-4)   if isnumeric(XX) then
      fileNumber =XX
      if FileNumber>T then
         copy X(拷贝模块代码自己写)
      end if
   end if