1º - realizo una consulta para ver si esta hecha ya la reserva
sql = "SELECT * FROM reservas WHERE reserva='"&reserva&"' and hora='" & hora & "' and fecha=" & fecha & ""
rs.Open sql, con
'Si el valor EOF (fin de la tabla elegida) es verdadero, no existe la reserva.
If rs.EOF = True then
'Ejecuta un sentencia SQL para insertar alta
sql = "INSERT INTO reservas (fecha, reserva, hora, usuario)"
sql = sql & "VALUES('" & fecha & "', '" & reserva & "', '" & hora & "', '" & usuario & "')"
con.Execute(sql)
else
'La reserva ya existe
Response.redirect "errr0l.htm"
end if
'Libera memoria
con.Close
Set con = Nothing
%>
El problema es q siempre realiza la insercion en la tabla, no cheque la consulta previa de comprobacion, como podría solucionar esto.?
Gracias ;) 
