<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open Application("Clients_ConnectionString") Set RS = Conn.Execute ("SELECT * From Clients WHERE username = '" & Request.Form("username") & "' AND password = '" & Request.Form("password") & "'") Do until RS.EOF Pass = RS("Password") Name = RS("username") RS.MoveNext loop RS.Close Conn.Close IF pass = "" Then Message = "The Password you entered is either wrong or not found in our database. Please press the BACK button and try again." Else Session("Password") = Pass Session("username") = Name IF Session("Ori_URL") = "" Then 'do nothing Else Response.redirect(session("Ori_URL")) End IF End IF %> Client Login
 

 
 

 

Client Login

Please choose your company/event from the list below.

 

Lone Star Biker Bash

North Texas Rock Rally

 

 


Thunderbird Events & Project Planning

Post Office Box 24087

Fort Worth, Texas 76124-4087

817-446-0462

2003 Thunderbird Events & Project Planning, Inc. All rights reserved.

Webmaster