ayuda con fechas por favor !!!

[cristianf]

el codigo lo tengo asi:

<%
dataIni = Request.Form("fe")
dataFin = Request.Form("fe1")
Response.Buffer = true
dim cnn,rst
' Creamos la conexión a la base de datos sin DSN
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
cnn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("hoteles.mdb")

for t=cdate(dataIni) to cdate(dataFin)
sqltext = "Insert into hoteles (fecha1) values to_date('" & t & "','yyyy/mm/aa')"
next

%>
probe con las dos formas de fecha y nada