Fungsi Tanggal di ASP

<%
Dim tg, mt, tn
tg = day(now)
mt = month(now)
tn = year(now)
Response.Write tg
Response.Write "
"
Response.Write mt
Response.Write "
"
Response.Write tn
%>