Código PHP:
<!--#include file="conexion.asp"-->
<%
'Aqui se valida que el usuario y la contraseña existan en la BD
'Primero hacer una consulta de los usuarios y las contraseñas checando que sean iguales a las introducidas
consulta = "select * from usuarios where Usuario='" & request.form("txtusuario") & "' and Secreta='" & request.form("txtpassword") & "'"
'Abrimos un objeto Recordset que nos permite abrir una tabla en la BD
Dim Rs
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open consulta, ConnSQL2005, 3, 3
'Si viene vacio nos regresamos a principal
IF (Rs.BOF) AND (Rs.EOF) Then
Rs.Close
ConnSQL2005.Close
'destruimos la conexion
set Rs = Nothing
set ConnSQL2005 = Nothing
Response.Redirect("../inicio.asp")
ELSE
Rs.MoveFirst'nos movemos al primer registro
Rs.Close
ConnSQL2005.Close
destruimos la conexion
set Rs = Nothing
set ConnSQL2005 = Nothing
Session ("validado") = "true"
Response.Redirect("menu.asp")
END IF
%>
Código PHP:
<%
CHECAMOS SI LA SESION VALIDADO TRAE DATOS*****
IF (Session("validado") <> "true" ) THEN
Response.Redirect("../inicio.asp")
END IF
%>