| <% Dim file, fs, f, LM file = Request.ServerVariables("PATH_TRANSLATED") Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.GetFile(file) Lm = f.datelastmodified Response.Write ("Ultima modifica: " & FormatDateTime(LM, 0)) Set f = Nothing Set fs = Nothing %> | |||
 |
|
||
