在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中獲取文件的最後修改日期

回答

相關問題