<% Dim dtmLM Dim dtmLMD Dim dtmLMT FName = Server.MapPath(FName) 'FName = "/home/gracea2/public_html/" & FName Set objFileSystemObject = Server.CreateObject("Scripting.FileSystemObject") Set objFile = objFileSystemObject.GetFile(FName) dtmLM = objFile.DateLastModified Set objFile = Nothing Set objFileSystemObject = Nothing dtmLMD = FormatDateTime(dtmLM, 1) dtmLMT = FormatDateTime(dtmLM, 3) dtmLMD = dtmLMD & " " & LMT %> Last Update On: <%=dtmLMD%>