PK

<!--#include file="includes/openconn.asp" -->

<%session("adm_usuario")=request("adm_usuario")
session("adm_password")=request("adm_password")

if session("adm_usuario")="" or session("adm_password")="" then 
	conn.Close
	Response.Redirect("default.asp?err=complete_ambos_campos")
end if
rs.Open "SELECT * FROM Administradores WHERE adm_usuario = '" & session("adm_usuario") &"' AND adm_password = '" & session("adm_password") & "'",conn,3,1
if rs.EOF then 
	rs.Close
	conn.Close
	
	'response.Write(md5(session("admpass")))
	Response.Redirect("default.asp?err=Datos_no_autorizados")
else
	rs.movefirst

	rs1.open "Administradores_Logs",conn,2,2
	rs1.addnew
	rs1("log_IP")=request.ServerVariables("REMOTE_ADDR")
	rs1("log_now")=now()
	rs1("xidadministrador")=rs("idadministrador")
	rs1.update
	rs1.close%>

	<!--#include file="includes/backup.asp" -->

	<%session("idadministrador")= rs("idadministrador")
	session("adm_nombre")= rs("adm_nombre")
	session("adm_email")= rs("adm_email")
	session("adm_nivel")= rs("adm_nivel")

	rs.Close
	conn.Close
	if request("ruta") = "" then
		Response.Redirect("Pedidos.asp?Pedidos.asp?ped_enviado=NO")
	else
		Response.Redirect(request("ruta") & "?" & session("rq") & "&" & request("rf"))
	end if
end if
%>

PK 99