21/05/2004, 15:32
|
 | Moderador | | Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 23 años, 4 meses Puntos: 98 | |
| Trata así:
Set Cn = Server.CreateObject("ADODB.Command")
Cn.ActiveConnection="DRIVER={Microsoft Access Driver
(*.mdb)};DBQ="&Server.MapPath("gestionplus1.mdb")& ";"
sSQL = "select * from CLIENTES where LOGIN_CLIENTE='" &
request.form("usuario") & "' and PASSWORD_CLIENTE='" &
request.form("contrasena") & "'
Set Rs = Server.CreateObject("ADODB.Recordset")
rs.Open sSQL, Cn, 3, 3
If not Rs.EOF then
Response.Redirect "mostrarfacturas.asp"
Else
Response.Redirect "error.html"
End If
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway |