 -- |
<%
dim fs, f1',f2,f3
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f1=fs.GetFile(Server.MapPath("\announce.asp"))
Response.Write("(updated: " & FormatDateTime(f1.DateLastModified,2) &")")
set f1=nothing
'set f2=nothing
'set fs=nothing
%>
|
