A nononono.... tenés otros problemas.
Primero, el formulario. Tenés ésto:
Código:
<td bgcolor="#66CCFF"><strong>FECHA:</strong></td>
<td bgcolor="#33CCFF"><input name="fecha" type="text1" id="fecha"></td>
<td bgcolor="#33CCFF"><input name="fecha" type="text2" id="fecha"></td>
Los inputs son type="text", no text
1 o text
2
Luego, dale a cada uno un name único. Que te quede así:
Código:
<td bgcolor="#66CCFF"><strong>FECHA:</strong></td>
<td bgcolor="#33CCFF"><input name="fecha1" type="text" id="fecha1"></td>
<td bgcolor="#33CCFF"><input name="fecha2" type="text" id="fecha2"></td>
Luego, rescatás cada fecha independiente:
Código:
(el proceso)
<%
fecha1=request.Form("fecha1")
fecha2=request.Form("fecha2")
Dim conexion, registros, basedatos, consulta
basedatos = Server.MapPath("./reservas.mdb")
Set conexion = Server.CreateObject("ADODB.Connection")
conexion.Open("Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & basedatos)
consulta = "SELECT * FROM auditorio where [auditorio.fecha] between #"&fecha1&"# and #"&fecha2&"#"
Set registros = conexion.Execute(consulta)
Probalo así y si no funciona, reemplazá el numeral (#) por un apóstrofe (')... aunque me parece que las fechas en access se colocan entre numerales (o almohadillas)