%@ Import namespace="Microsoft.VisualBasic" %> <% Dim strTopDato strTopDato = FormatDateTime(Now, vbLongDate) Response.Write(strTopDato) %> <% Response.Write("