• Programmazione » ASP » Tutorial ASP - Base

Per facilitare l'inserimento della data di aggiornamento di un sito,
basta inserire il seguente codice dove si vuol far visualizzare appunto la data dell'ultimo aggiornamento.

<%
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 novità: " & FormatDateTime(LM, 0))
Set f = Nothing
Set fs = Nothing
%> 

Utilizziamo la collezione ServerVariables dell'oggetto Request per recuperare l'indirizzo fisico della pagina.
Attraverso l'oggetto FileSystemObject richiamiamo la pagina e andiamo poi a leggere la data dell'ultima modifica di questo file e la stampiamo su schermo formattata secondo le nostre prefernze.