ZetCode

VBScript DateCreated 属性

最后修改于 2025 年 4 月 9 日

VBScript 中的 DateCreated 属性是 FileSystemObject 的一部分。它返回文件或文件夹创建的日期和时间。这个只读属性对于文件管理和审计很有用。它有助于跟踪系统资源最初创建的时间。

DateCreated 返回一个标准的日期/时间值,可以对其进行格式化或比较。它同时适用于 FileFolder 对象。本教程将通过实际示例介绍 DateCreated 及其用法。

DateCreated 属性概述

DateCreated 属性需要一个指向有效文件或文件夹对象的引用。它以本地系统时区返回创建时间戳。该值包含日期和时间分量,精确到秒。

主要功能包括自动转换为 VBScript 的日期格式和只读访问。该属性反映了实际的文件系统创建时间。了解此属性有助于创建文件管理和报告脚本。

基本文件创建日期检查

此示例演示了 DateCreated 获取文件创建日期的最简单用法。它展示了如何访问该属性并显示结果。该脚本会检查特定文件的创建时间戳。

basic_datecreated.vbs
Set fso = CreateObject("Scripting.FileSystemObject")
Set file = fso.GetFile("C:\Temp\example.txt")

creationDate = file.DateCreated
WScript.Echo "File created on: " & creationDate

Set file = Nothing
Set fso = Nothing

该脚本创建一个 FileSystemObject 并获取一个文件引用。然后,它访问 DateCreated 属性并显示它。输出显示了文件创建的确切日期和时间。

比较文件创建日期

此示例显示了如何比较两个不同文件的创建日期。它演示了使用 DateCreated 进行日期比较操作。该脚本确定哪个文件创建得更早。

compare_dates.vbs
Set fso = CreateObject("Scripting.FileSystemObject")
Set file1 = fso.GetFile("C:\Temp\file1.txt")
Set file2 = fso.GetFile("C:\Temp\file2.txt")

If file1.DateCreated < file2.DateCreated Then
    WScript.Echo "file1.txt was created earlier"
Else
    WScript.Echo "file2.txt was created earlier"
End If

Set file1 = Nothing
Set file2 = Nothing
Set fso = Nothing

该脚本比较两个文件的 DateCreated 属性。它使用标准的日期比较运算符来确定哪个文件更旧。此技术对于按年龄对文件进行排序或处理文件很有用。

格式化创建日期输出

此示例演示了如何格式化 DateCreated 输出以提高可读性。它展示了如何使用 VBScript 的日期格式化函数。该脚本以自定义格式显示创建日期。

format_date.vbs
Set fso = CreateObject("Scripting.FileSystemObject")
Set file = fso.GetFile("C:\Temp\data.log")

creationDate = file.DateCreated
formattedDate = Year(creationDate) & "-" & Right("0" & Month(creationDate), 2) & "-" & Right("0" & Day(creationDate), 2)

WScript.Echo "Log file created on: " & formattedDate

Set file = Nothing
Set fso = Nothing

该脚本检索创建日期并将其格式化为 YYYY-MM-DD。它使用 VBScript 日期函数来提取和格式化每个组件。此方法可控制日期的显示方式。

检查文件夹创建日期

DateCreated 同样适用于文件夹和文件。此示例显示了如何获取目录的创建日期。该过程与检查文件创建日期类似。

folder_date.vbs
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder("C:\Projects")

creationDate = folder.DateCreated
WScript.Echo "Project folder created on: " & creationDate

Set folder = Nothing
Set fso = Nothing

该脚本获取一个文件夹的引用,而不是文件的引用。然后,它以相同的方式访问 DateCreated 属性。这表明该属性在不同的文件系统对象之间具有一致性。

列出带有创建日期的文件

此示例显示了如何列出目录中的所有文件及其创建日期。它将 DateCreated 与文件夹枚举结合使用。该脚本创建了一个简单的文件清单报告。

list_files.vbs
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder("C:\Temp")

WScript.Echo "Files in " & folder.Path & ":"
For Each file In folder.Files
    WScript.Echo file.Name & " - Created: " & file.DateCreated
Next

Set folder = Nothing
Set fso = Nothing

该脚本枚举文件夹中的所有文件,并显示每个文件的名称和创建日期。这演示了 DateCreated 在文件管理任务中的实际应用。输出提供了带有时间戳的完整文件列表。

来源

FileSystemObject 文档

在本文中,我们探讨了 VBScript 中的 DateCreated 属性,涵盖了其用法和实际应用。从简单的日期检查到复杂的列表文件,这些示例展示了可靠的文件时间戳访问。通过这些知识,您可以增强文件管理脚本的创建日期跟踪功能。

作者

我叫 Jan Bodnar,我是一名热情的程序员,拥有多年的编程经验。自 2007 年以来,我一直在撰写编程文章。到目前为止,我已撰写了 1400 多篇文章和 8 本电子书。我在教授编程方面拥有八年以上的经验。

列出所有 VBScript 教程