คุณสมบัติ DateLastAccessed ASP

FileObject.DateLastAccessed

FolderObject.DateLastAccessed

<%
dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.GetFile("c:\test.txt")
Response.Write("File last accessed on: ")
Response.Write(f.DateLastAccessed)
set f=nothing
set fs=nothing
%>

输出：

File last accessed on: 10/29/2001 10:21:23 AM

<%
dim fs,fo
set fs=Server.CreateObject("Scripting.FileSystemObject")
set fo=fs.GetFolder("c:\test")
Response.Write("Folder last accessed on: ")
Response.Write(fo.DateLastAccessed)
set fo=nothing
set fs=nothing
%>

输出：

Folder last accessed on: 9/19/2001 10:01:19 AM