Question

我正在尝试抓取特定文本文件上传到计算机上的日期。日期不在实际文本文件中，而是必须右键单击，然后转到属性以查看日期。我需要将日期读入变量。

我不知道从哪里开始尝试完成这项工作。

谢谢，

Jesse Smothermon

Answer 1

如果内置的FileDateTime()不是您可以使用FSO后的内容：

Dim FSO As Object: Set FSO = CreateObject("Scripting.FileSystemObject")
Dim objFile As Object: Set objFile = FSO.Getfile("C:\bleep\bloop.file")

Debug.Print "Date created: " & objFile.DateCreated
Debug.Print "Date last accessed: " & objFile.DateLastAccessed
Debug.Print "Date last modified: " & objFile.DateLastModified

如果它在扩展属性中的日期检查this，那么

VBA从文本文件的属性获取日期

1 个答案: