complicacion para recoger datos

[cristianf]

ahroa tengo el codigo escrito 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("base1.mdb")
d = cdate(datafin) - cdate(dataini)
for t=0 to d
response.write cdate(dataini)+t & "<br>"
sqltext = "Insert into base1 (fecha1) values ('" & CDATE(DATAINI + T) & "')"

next
%>


y me tira el siguiente error

No coinciden los tipos: '[string: "22/02/2006"]'

que complicado que esta este tema....saludos y gracias por la onda.....