sige dando error, mirar el codigo:
Código:
<body>
<%
dim comercial, fechaini, fechafin
comercial= "'" & request.form("comercial") & "'"
fechaini= "#" & Cdate(request.form("fechaini")) & "#"
fechafin= "#" & Cdate(request.form("fechafin")) & "#"
set conexion = createobject("ADODB.connection")
conexion.open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=C:\inetpub\wwwroot\itresa.mdb"
strsql = "select * from visitas where dni = " &comercial& " and fecha >=" &fechaini& "and fecha <=" &fechafin
set miconexion = conexion.execute(strsql)
if err.description <> "" then
response.write " <B> error base de datos: " & Err.Description & "</B>"
else
response.write miconexion
end if
miconexion.close
conexion.close
set miconexion = nothing
set conexion= nothing
%>
</body>
Veis algo mal?¿?