Lorenzo Pascucci
a- a+

Visualizzare la data dell'ultimo aggiornamento del sito

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. 



Ti potrebbe interessare anche

commenta la notizia

C'è 1 commento
Redazione
Ti interessano altri articoli su questo argomento?
Chiedi alla nostra Redazione!