tipos sin coincidencia

[christum]

Amigos no se que pasa me dice que .os tipos no coinciden me pasara?????? a alguien se le ocuree???
<select name="select">
<%
Dim oConn
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\BaseDeDatos\web.mdb"))
strSQL = "SELECT distinct kd_fecha FROM TADIARIO_CAJA"
Set objRS = oConn.Execute(strSQL)
while (not objRS.Eof)
response.write ("<option value=" & objRS("kd_fecha") &">" & obRS("kd_fecha") &"</option>")
objRS.MoveNext
wend
oConn.Close
set objRS = nothing
set oConn = nothing
%>
</select>

[splig]

No se mucho mucho de ASP pero no me suena esto: strSQL = "SELECT distinct kd_fecha FROM TADIARIO_CAJA" q es esto de distinct? No sé! eh! pero es q suena algo raro...

[dagui]

Prueba con esto, que te hace lo mismo.

<select name="select">
<%
Dim oConn
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\BaseDeDatos\web.mdb"))
strSQL = "SELECT distinct kd_fecha FROM TADIARIO_CAJA"
Set objRS = oConn.Execute(strSQL)
while (not objRS.Eof)
%>
<option value="<%=objRS("kd_fecha")%> "><%=("kd_fecha")%>
<%
objRS.MoveNext
wend
oConn.Close
set objRS = nothing
set oConn = nothing
%>
</select>

Sólo como prueba. Me avisas.