SQL = ""
SQL = SQL & " Select DateDiff(HH, entrada, '" & Request(hr) &" ') as atra, id From horario Where id = '" & Request("ids") &" ' "
Set Consulta = oConn.Execute(SQL)
Do While NOT Consulta.EOF
at = Consulta("atra")
Consulta.MoveNext
Loop
ahora lo estoy tratando de hacer asi, pero me dice:
Microsoft JET Database Engine (0x80040E10)
No se han especificado valores para algunos de los parámetros requeridos.
/a/b.asp, línea 37
