Please title this page. (objFile.htm)

Set objFile = ObjFSO.GetFile(strPhysicalPath)

strPhysicalPath is the actual directory and file name on the server. For example "D:\WebSites\index.htm". It can be derived from Server.MapPath(strURLPath) where strURLPath might be "http://www.mipsdla.com/index.htm" (i think: at least /index.htm works)

objFile can now do:

objFile.ParentFolder returns an Folder object that represents the parent folder of the file.
objFile.Name returns the file name
objFile.type returns a description of the file derived from the registered description of the files extension.
objFile.size
objFile.DateLastModified
objFile.DateCreated
objFile.DateLastAccessed
objFile.OpenAsTextStream returns a text stream object

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN"

<HTML>
<HEAD>
<TITLE>Chapter 11 Example - Display Directory</TITLE>
</HEAD>
<BODY>
<%
Dim strPathInfo, strPhysicalPath
strPathInfo = Resuest.ServerVariables("PATH_INFO")
strPhysicalPath = Server.MapPath(strPathInfo)

Dim objFSO, objFile, objFileItem, objFolder, objFolderContent8
Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objFile = objFSO.GetFile(strPhysicalPath)

Set objFolder = objFile.ParentFolder

Set objFolderContents = objFolder.Files
%>
<TABLE cellpadding=5>
<TR align=center><TH align=left>File Name</TH><TH>File Size</TH><TH>Last
Modified</TH></TR>

<%
For Each objFileItem in objFolderContents
Response.Write "<TR><TD align=left>"
Response.Write objFileItem.Name
Response.Write "</TD><TD align=right>"
Response.Write objFileItem.Size
Response.Write "</TD><TD align=right>"
Response.Write objFileItem.DateLastModified
Response.Write "</TD></TR>"
Next
%>
</TABLE>

<BODY>
</HTML>