<%@LANGUAGE="JAVASCRIPT"%>
<%
// *** Validate request to log in to this site.
var MM_LoginAction = Request.ServerVariables("URL");
if (Request.QueryString!="") MM_LoginAction += "?" + Server.HTMLEncode(Request.QueryString);
var MM_valUsername=String(Request.Form("usuario"));
if (MM_valUsername != "undefined") {
var MM_fldUserAuthorization="";
var MM_redirectLoginSuccess="http://personal.telefonica.terra.es/web/sanzpont/alarcon/alarcon.htm";
var MM_redirectLoginFailed="http://www.sanzpont.com";
var MM_flag="ADODB.Recordset";
var MM_rsUser = Server.CreateObject(MM_flag);
MM_rsUser.ActiveConnection = MM_users_STRING;
MM_rsUser.Source = "SELECT UserID, Password";
if (MM_fldUserAuthorization != "") MM_rsUser.Source += "," + MM_fldUserAuthorization;
MM_rsUser.Source += " FROM tblUsers WHERE UserID='" + MM_valUsername.replace(/'/g, "''") + "' AND Password='" + String(Request.Form("password")).replace(/'/g, "''") + "'";
MM_rsUser.CursorType = 0;
MM_rsUser.CursorLocation = 2;
MM_rsUser.LockType = 3;
MM_rsUser.Open();
if (!MM_rsUser.EOF || !MM_rsUser.BOF) {
// username and password match - this is a valid user
Session("MM_Username") = MM_valUsername;
if (MM_fldUserAuthorization != "") {
Session("MM_UserAuthorization") = String(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value);
} else {
Session("MM_UserAuthorization") = "";
}
if (String(Request.QueryString("accessdenied")) != "undefined" && true) {
MM_redirectLoginSuccess = Request.QueryString("accessdenied");
}
MM_rsUser.Close();
Response.Redirect(MM_redirectLoginSuccess);
}
MM_rsUser.Close();
Response.Redirect(MM_redirectLoginFailed);
}
%>
sanzpont [arquitectura]
sergio sanz pont, victor sanz pont, daniel sanz pont, sanzpont arquitectos, sanzpont arquitectura, arquitectos cancun, arquitectos barcelona, arquitectura, proyectos arquitectura, arquitectura bioclimatica, sostenibilidad, sustentabilidad, arquitectura cancun, arquitectura mexico, arquitectura barcelona, arquitectura ibiza, arquitectura baleares, arquitectura españa, renders barcelona, renders españa
