The time is:
Clock
<% Dim a a=date() Response.Write FormatDateTime(a,1) %>