<%Response.Buffer=true%>

<%if Request.Form("userid")<>"" and Request.Form("password")<>"" then set con = server.createobject("ADODB.Connection") con.Open "dsn=abeedatabase;uid=abee;pwd=abee2001info" set RS = Server.CreateObject("ADODB.Recordset") RS.Open "Select userid,password,distributorid from dealerdetails where userid='"&Request.form("userid")&"' and password='"&Request.form("password")&"'",con %> <%if RS.EOF then%>

<%else%> <%session("dealer")=Session.SessionID%> <%session("distributorid")=RS("distributorid")%> <%Response.redirect "test.asp"%> <%end if%> <%else%> <%end if%>

Not a registered User!!! Click here to register yourself.

UserID

Password

UserID

Password