
 <%
 Response.Buffer = True
 Response.Expires = 0
 %>
 
 <!-- #Include virtual = "/admin/programs/var_toolkit.asp" -->
 <!-- #Include virtual = "/admin/programs/db_toolkit.asp" -->
 
 <% 
 	Session("theAdmId") = ""
 	myQuery = "SELECT * FROM c21_administradores WHERE adm_username = " & Comillas(Request.QueryString("admUsr")) & " AND adm_password = " & Comillas(Request.QueryString("admPass"))
    Set Rs = GetConnectionGeneric("db00017", ServerDBName).Execute(myQuery)
	If Not Rs.EOF Then
      Session("theAdmId") = Rs("adm_id")
	End If
	Rs.Close
	Set Rs = Nothing
	Response.Redirect("../default.asp")
 %>