problemas con request.querystring

[fildey]

hola

tengo 2 paginas donde tengo q mostrar una fecha seleccionada por el usuario... el problema es que en la primera aparece pero en la segunda no... les paso los codigos a ver si alguien me puede decir cual es el problema...

reserva.asp (esta es la que anda)

<%
dim conexion
set conexion = Server.CreateObject("ADODB.Connection")
conexion.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & _
Server.MapPath("horarios.mdb")
conexion.Open
dim registros,dia,mes,anio,hora
dia = request.QueryString("dia")
mes = request.QueryString("mes")
anio = request.QueryString("anio")
hora = request.QueryString("hora")
set registros = Server.CreateObject("ADODB.RecordSet")
response.Write(dia)
response.Write("/")
response.Write(mes)
response.Write("/")
response.Write(anio)
%>

reserva2.asp (aca esta el problema)

<%
dim conexion
set conexion = Server.CreateObject("ADODB.Connection")
conexion.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & _
Server.MapPath("horarios.mdb")
conexion.Open
dim registros,dia,mes,anio,hora
dia = request.QueryString("dia")
mes = request.QueryString("mes")
anio = request.QueryString("anio")
hora = request.QueryString("hora")
set registros = Server.CreateObject("ADODB.RecordSet")
response.Write(dia)
response.Write("/")
response.Write(mes)
response.Write("/")
response.Write(anio)
response.Write("<br>")
response.Write(hora)
response.Write("<br>")
conexion.execute("insert into turnos (nombre,apellido,dni) values ('" & request.Form("nombre") & "','" & request.Form("apellido") & "','" & request.Form("dni") & "')")
conexion.close
response.Write("El turno seleccionado fue reservado. Gracias")

%>

alguien ve el problema??

gracias