<% 'Create a recordset object instance and retrieve the information from the table Dim rs, SQL Set rs=Server.CreateObject("ADODB.RecordSet") SQL="SELECT FName, LName, Projects.ID as ProjID, Email " _ & "FROM Clients INNER JOIN Projects ON Clients.ID = Projects.ClientID " _ & "WHERE Login='" & Request("Login") & "' AND Password='" & Request("Password") & "';" rs.Open SQL, con If rs.EOF then Response.Write("

Incorrect login and/or password submitted. Please recheck and try again or else return to the public site.") rs.close con.close Else 'If rs("Member")= "True" then Session("Client")="True" Session("FName")=rs("FName") Session("LName")=rs("LName") Session("Email")=rs("Email") Session("ProjID")=rs("ProjID") rs.close con.close Response.Redirect ("clientpage.asp") End If %>