link en asp

[fildey]

a ver si alguien me puede ayudar: necesito q reserva.asp tome el dia, el año, el mes, y la hora q la persona elige de una seri de turnos... el tema es q el link no me anda... alguien podria decirme en q me estoy equivocando??

gracias


<%
dim conexion
set conexion = Server.CreateObject("ADODB.Connection")
conexion.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & _
Server.MapPath("horarios.mdb")
conexion.Open
dim registros,hora
do while hora < 48
hora=hora+1
set registros = Server.CreateObject("ADODB.RecordSet")
registros.open "select hora,dia,mes,anio from turnos where dia=" & dia & " and mes=" & mes & " and anio=" & anio & " and hora=" & hora & "",conexion
response.Write(hora/2)
response.Write("--")
if registros.eof then%><a href="reserva.asp?day=<%=registros("dia")%>&month= <%=registros("mes")%>&year=<%=registros("anio")%>% >"><%response.write("Libre")%></a>
<%response.Write("<br>")
else
response.Write("Reservado")
response.Write("<br>")
end if
loop
conexion.close
%>