<%
Set FS = Server.CreateObject("Scripting.FileSystemObject")
Set FO = FS.GetFile(Server.MapPath("/default.asp"))
Response.Write("File created: " & FO.DateCreated & "<br>")
Response.Write("Attributes: " & FO.Attributes & "<br>")
Response.Write("DateCreated: " & FO.DateCreated & "<br>")
Response.Write("DateLastAccessed: " & FO.DateLastAccessed & "<br>")
Response.Write("DateLastModified: " & FO.DateLastModified & "<br>")
Response.Write("Drive: " & FO.Drive & "<br>")
Response.Write("Name: " & FO.Name & "<br>")
Response.Write("Path: " & FO.Path & "<br>")
Response.Write("ShortName: " & FO.ShortName & "<br>")
Response.Write("ShortPath: " & FO.ShortPath & "<br>")
Response.Write("Size: " & FO.Size & "<br>")
Response.Write("Type: " & FO.Type & "<br>")
Set FO = Nothing
Set FS = Nothing
%>