在VB6中获取文件的最后修改日期

2009-11-02 Keith Maurino

有一个在VB6功能的内置为 - 无需FSO（虽然FSO是伟大的，更高级的文件操作）

从http://msdn.microsoft.com/en-us/library/aa262740%28VS.60%29.aspx

Dim MyStamp As Date 
MyStamp = FileDateTime("C:\TESTFILE.txt")

来源

2009-11-02 16:40:18

+1。如果可能，我建议避免使用FileSystemObject。它并不总是出现在用户机器上。上个月我们有一个帮助台问题，因为一个偏执狂的IT部门已经瘫痪了FileSystemObject，并且破坏了我们维护的一些软件。这里原生的VB6技术是一行，而FSO代码至少有三行。 – MarkJ 2009-11-02 17:32:37

您可以使用FileSystemObject这里是一个example

您还可以检查出MSDN documentation样本对脚本编写，但它们应该是翻译到VB6容易。

来源

2009-11-02 16:15:46 JoshBerke

-1。如果可能，我建议避免使用FileSystemObject。它并不总是出现在用户机器上。上个月我们有一个帮助台问题，因为一个偏执狂的IT部门已经瘫痪了FileSystemObject，并且破坏了我们维护的一些软件。也可以在本地VB6中执行一行，而不是4行FileSystemObject。 – MarkJ 2009-11-02 17:33:55

添加到Microsoft脚本运行（项目 - >引用...）的参考和使用下面的代码：

Dim fso As New FileSystemObject 
Dim fil As File 

Set fil = fso.GetFile("C:\foo.txt") 
Debug.Print fil.DateLastModified

来源

2009-11-02 16:21:28 raven

-1。如果可能，我建议避免使用FileSystemObject。它并不总是出现在用户机器上。上个月我们有一个帮助台问题，因为一个偏执狂的IT部门已经瘫痪了FileSystemObject，并且破坏了我们维护的一些软件。这也可以在本地VB6中的一行中完成：必须比FileSystemObject的4行更好。 – MarkJ 2009-11-02 17:34:25

我会建议使用Windows API调用： http://www.ex-designz.net/apidetail.asp?api_id=128

然后，您可以获取创建日期或上次修改日期。

来源

2013-06-06 15:53:06 Belmiris

在VB6中获取文件的最后修改日期

回答

相关问题