怎么准确的取文件的修改时间？

[rober]

我用VB编了一个程序，其中需要取文件的修改时间，但我总是取不到正确的文件修改时间。我用程序取到的时间总是比资源管理器里看到的要快或慢8个小时，我想可能与是与时区有关，我曾经调整过时区，把"中国"改为"Greenwich Mean Time",结果有时取的时间是正确的，有时又快或慢8个小时，请问，如何是好？

[saxash]

应该用API函数,如GETSYSTEMTIME,GETFILETIME,这样就不应该会忽快忽慢,
而是要快 8个小时.这的确是时区的关系. 取得的时间是 2个long类型的数,
转换后再把小时数 add 8.

[dongdong]

DateLastModified 属性


描述

返回最后一次修改指定文件或文件夹的日期和时间。只读。

语法

object.DateLastModified

object 总是一个 file 或 Folder 对象。

说明

下面的代码用一个文件举例说明了 DateLastModified 属性的用法：

Sub ShowFileAccessInfo(filespec)
Dim fs, f, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(filespec)
s = UCase(filespec) & vbCrLf
s = s & "Created: " & f.DateCreated & vbCrLf
s = s & "Last Accessed: " & f.DateLastAccessed & vbCrLf
s = s & "Last Modified: " & f.DateLastModified
MsgBox s, 0, "File Access Info"
End Sub

[rober]

我已经研究出来了，我用的是GetFileInformationByHandle 函数，两位老兄没有分哦。^_^