<%@LANGUAGE="JAVASCRIPT"%> <% // *** Edit Operations: declare variables // set the form action variable var MM_editAction = Request.ServerVariables("SCRIPT_NAME"); if (Request.QueryString) { MM_editAction += "?" + Server.HTMLEncode(Request.QueryString); } // boolean to abort record edit var MM_abortEdit = false; %> <% if (!MM_abortEdit) { // *** 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("User")); if (MM_valUsername != "undefined") { var MM_fldUserAuthorization = "Role"; var MM_redirectLoginSuccess = "intadm_services.html"; var MM_redirectLoginFailed = "admlogin.asp"; var MM_loginSQL = "SELECT Username, UserPassword"; if (MM_fldUserAuthorization != "") MM_loginSQL += "," + MM_fldUserAuthorization; MM_loginSQL += " FROM dbo.TUser WHERE Username = ? AND UserPassword = ?"; var MM_rsUser_cmd = Server.CreateObject ("ADODB.Command"); MM_rsUser_cmd.ActiveConnection = MM_DB_STRING; MM_rsUser_cmd.CommandText = MM_loginSQL; MM_rsUser_cmd.Parameters.Append(MM_rsUser_cmd.CreateParameter("param1", 200, 1, 150, MM_valUsername)); // adVarChar MM_rsUser_cmd.Parameters.Append(MM_rsUser_cmd.CreateParameter("param2", 200, 1, 50, Request.Form("Userpass"))); // adVarChar MM_rsUser_cmd.Prepared = true; var MM_rsUser = MM_rsUser_cmd.Execute(); 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); }} %> Administration
Contact Us Today!
(404) 635-4357
Russ@rhiner.com
Home | About Us | Services | Coaching | Contact Us



Our team can get you where you need to be in business, presentations, personal life, investing, and problem solving. Let our years of experience help you become the person you want to be.

 
Adminstrative Login

This area is reserved for authorized personnel only.

Username:
Password:
 

 

 

Copyright 2022 - Russ Hiner - All Rights Reserved
Site maintained by Verdigris Digital
Contact Russ :: User Login :: Admin