15/01/2009, 14:54
|
| | | Fecha de Ingreso: marzo-2006
Mensajes: 124
Antigüedad: 19 años Puntos: 1 | |
| Respuesta: Mensajes en Asp al cambiar de Pagina y Regarme
ahy va el codigo
<%
Rodillo = Request.Form("TxtRodillo")
Usuario = Request.Form("TxtUsuario")
Password = Request.Form("TxtContraseña")
Set CxnSql = Server.CreateObject("ADODB.Connection")
CxnSql.ConnectionString = sCnn
CxnSql.ConnectionTimeout = 10
CxnSql.Open
Set RsBus_Usuario = Server.CreateObject("ADODB.RecordSet")
RsBus_Usuario.Open "EXEC Sp_Buscar_Usuario @Usuario='" + Usuario + "',@Password= '" + Password + "'",CxnSql
IF RsBus_Usuario.EOF THEN
%>
<script language=javascript>
alert("Verifique el Nombre de Usuario y Contraseña")
</script>
<b>
<%
response.Redirect("Ajustes_Pass.asp")
END IF
%> |