描述

语法

object 应为 File 或 Folder 对象的名称。

说明

Function ShowFileInfo(filespec)
    Dim fso, f
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set f = fso.GetFile(filespec)
    ShowFileInfo = "创建时间： " & f.DateCreated
   End Function