Username and PIN

You need a form with two form fields for the users to input their informations. The form fields must be named: "ID" and "PW". Submit the data to a file containing below code:

Dim IDform,  PWform
IDform = request.form("ID")
PWform = request.form("PW")

strSQL = "Select * from users"
Set rs = Conn.Execute(strSQL)

IF NOT (rs.BOF or rs.EOF) then

    'check the userID & PW against the database content
    Do
        IF IDform = rs("userid") and PWform = rs("pw") then

        response.write "<p>Welcome " & rs("name") & "</p>"

        rs.MoveNext
          else

        rs.MoveNext   
        End IF
    Loop While Not rs.EOF

End IF

'Close Recordset
rs.Close
Set rs = Nothing

The code is comparing the user input against the colomn's "userID" & "pw" and if the user's information is found, the name from the colomn "name" is displayed. You can add your own db-colomn as you like.

There might be a better solution, but this should indeed work...

sql = "SELECT * from users where userID = '"& request.form("ID") &"' AND '"& request.form("PW") &"'"
set record = conn.execute(sql)

if record.eof then
  Response.write "User not found"
else
  Response.write "Hey " & record("name") & " .. welcome!"
end if