请提供详细的程序,谢谢!
用API
文件属性:
Function Long GetFileAttributesA (String lpFileName) Library "kernel32
返回Long
文件长度:
Function Long GetFileSize (Long hFile , Long lpFileSizeHigh ) Library "kernel32"
hFile文件句柄
lpFilSizeHig文件长度
文件时间信息:
FUNCTION ulong FileTimeToSystemTime(ref FILETIME lpFileTime,ref SYSTEMTIME lpSystemTime) LIBRARY "kernel32.dll"
hFile Long,文件的句柄
lpCreationTime FILETIME,用于装载文件的创建时间
lpLastAccessTime FILETIME,用于装载文件上一次访问的时间
lpLastWriteTime FILETIME,用于装载文件上一次修改的时间
然后用FUNCTION ulong FileTimeToSystemTime(ref FILETIME lpFileTime,ref SYSTEMTIME lpSystemTime) LIBRARY "kernel32.dll"
转换为系统时间。
用API函数GetfILETIME,声明如下:FUNCTION boolean GetFileTime(ulong hfile, ref filetime lpcreate, ref filetime lpaccess, ref filetime lpwrite) LIBRARY "kernel32.dll"
第一个参数为打开的文件句柄用fileOpen()的返回值。
第二个参数为文件创建时间
第三个参数为最后一次访问时间(Fat文件不支持)
第四个参数为最后一次修改时间
都可以设置为零。这个函数返回的文件时间采用UTC格式
下面的代码作为参考:
ulong hfile
boolean rtn
filetime lpcreate
filetime lpaccess
filetime lpwrite
hfile = FileOpen("WinApi.txt")
rtn = GetFileTime(hfile, lpcreate, lpaccess, lpwrite)
if RTN THEN MESSAGEBOX("",取时间成功)