<% UserName = Request.Form("username") PassWord = Request.Form("password") 'grab the form contents
Set MyConn=Server.CreateObject("ADODB.Connection") MyConn.Open "your connection string here"
SQL = "Select * From tblLogin" Set RS = MyConn.Execute(SQL)
If UserName = RS("UserName") AND Password = RS("Password") Then 'if there is a match then show the page %>
Put the contents of your page here.
<% Else Response.Redirect "http://www.yourdomain.com/login.asp" RS.Close MyConn.Close Set RS = Nothing Set MyConn = Nothing End If %> 'if there was no match then make the visitor try again to login.
