【软件自动化测试 - VBScript 5】== Get the recently createed Folder or a File in a Parent Folder

星火测吧

于 2011-08-17 14:24:57 发布

阅读量535

点赞数

CC 4.0 BY-SA版权

分类专栏： VbsScript 文章标签： vbscript file 测试 each path

本文链接：https://blog.youkuaiyun.com/xuyubotest/article/details/6694720

VbsScript 专栏收录该内容

11 篇文章

订阅专栏

本文介绍了一个使用VBS脚本的方法来查找指定文件夹中最近创建的文件。通过遍历文件夹内的所有文件并比较其创建日期，脚本能够确定最新的文件。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

Set objFileSysOb = CreateObject("Scripting.FileSystemObject")

Set colFolderName = objFileSysOb.GetFolder("Give your Parent Folder path here")

Set vFiles =colFolderName.Files

dim f, datecreated, lastfilename

For each i in vFiles

d = Split(i,"\")

   FileName=d(ubound(d))

   f = objFileSysOb.GetFile(FileName)

   if datecreated = "" then

     datecreated = f.DateCreated 

     lastfilename = FileName

   else

      'check lastdate to current file

      if datecreated < f.DateCreated then

         datecreated = f.DateCreated 

         lastfilename = FileName

      end if

   end if

Next

msgbox "Last file created was " & lastfilename