Ver Mensaje Individual
  #1 (permalink)  
Antiguo 22/08/2005, 08:36
pillo
 
Fecha de Ingreso: agosto-2005
Mensajes: 9
Antigüedad: 18 años, 8 meses
Puntos: 0
sentencias de asp para php

hola tengo una duda no se si las sentencias de asp me serviran para implementarlas en php si alguien sabe por favor ayudeme, les muestro un codigo hecho en asp por favor me dicen que sentencias me pueden servir para php que esten en este codigo gracias.

<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/conexionTotal.asp" -->
<%

MM_LoginAction = Request.ServerVariables("URL")
If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Request.QueryString
MM_valUsername=CStr(Request.Form("login"))
If MM_valUsername <> "" Then
MM_fldUserAuthorization=""
MM_redirectLoginSuccess="index2.asp"
MM_redirectLoginFailed="Falla.htm"
MM_flag="ADODB.Recordset"
set MM_rsUser = Server.CreateObject(MM_flag)
MM_rsUser.ActiveConnection = MM_conexionLOGIN_STRING
MM_rsUser.Source = "SELECT Nombre_USR, Contraseña"
If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization
MM_rsUser.Source = MM_rsUser.Source & " FROM Usuarios WHERE Nombre_USR='" & Replace(MM_valUsername,"'","''") &"' AND Contraseña='" & Replace(Request.Form("passwd"),"'","''") & "'"
MM_rsUser.CursorType = 0
MM_rsUser.CursorLocation = 2
MM_rsUser.LockType = 3
MM_rsUser.Open
If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then
' username and password match - this is a valid user
Session("MM_Username") = MM_valUsername
If (MM_fldUserAuthorization <> "") Then
Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization ).Value)
Else
Session("MM_UserAuthorization") = ""
End If
if CStr(Request.QueryString("accessdenied")) <> "" And false Then
MM_redirectLoginSuccess = Request.QueryString("accessdenied")
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginSuccess)
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginFailed)
End If
%>