<% '### nome del file SWF file = "LOADER_DEFINITIVO_110111.swf" '### creazione oggetti necessari per leggere le proprietà del file Set objFS = Server.CreateObject("Scripting.FileSystemObject") Set objFile = objFS.GetFile(Server.MapPath(file)) '### aggiunta della data di ultima modifica al nome del file '### per sicurezza vengono sostituiti gli spazi con il trattino file = file & "?" & Replace(objFile.DateLastModified, " ", "-") '### chiusura degli oggetti precedentemente creati Set objFile = Nothing Set objFS = Nothing %>