<% DATA = FormatDateTime(date, 2) mes = month(DATA)&"2006" dia = day(DATA) path = Request.ServerVariables("URL") set conn=server.createobject("adodb.connection")%>