Simple Login in ASP using MS Access database

shabbir's Avatar author of Simple Login in ASP using MS Access database
This is an article on Simple Login in ASP using MS Access database in ASP.
Create a database in MSAccess and save database as Studentrecords.mdb. Now add a table to the database using the following format
Code:
StudentNO  Text
FName      Text
SurName    Text
Password   Text
Save the table as tblStudent.

Now create a new file and name it login.asp
Code: ASP
<html>

<head>
<title>Home</title>
</head>
<body bgcolor="#003366">
<center>
<%
'StudentNo Of Logged in user
Dim Username
'
Retrieving Username
Username=Request.QueryString("username")
'Invalid Username password
if UserName <> "" then
    Response.Write "<font color='
#FFAA00'>"
    Response.Write "<font face='
Verdana' size=2>"
    Response.Write"Invalid UserName Password. Please Re-login"
    Response.Write "</font></font>"
end if
%>
  <form method="POST" action="verify.asp">
  <table border="1" cellspacing="1" bordercolor="#111111" id="AutoNumber1" height="82">
    <tr>
      <td height="23"><font color="#FFFFFF" face="Verdana" size="2">Student Number</font></td>
      <td width="148" height="23">
        <p align="center">
        <font face="Verdana" color="#FFFFFF">
        <input type="text" name="username" size="20" value=""><font size="2">
        </font></font>
      </td>
    </tr>
    <tr>
      <td height="22"><font color="#FFFFFF" face="Verdana" size="2">Password</font></td>
      <td width="148" height="22">
      <p align="center"><font color="#FFFFFF" face="Verdana"><input type="password" name="password" size="20"></font></td>
    </tr>
    <tr>
      <td width="210" colspan="2" height="22">
      <p align="center"><font face="Verdana"><font color="#FFFFFF">
      <input type="checkbox" name="rememberme" value="ON"></font><font size="2" color="#FFFFFF">Remember
      Me</font></font></td>
    </tr>
    <tr>
      <td width="210" colspan="2" height="22">
      <p align="center"><font face="Verdana" color="#FFFFFF"><input type="submit" value="LogIn" name="B1"><font size="2">&nbsp;</font><input type="button" value="New User" name="B2" onClick = "location.href('
signup.asp');"></font></td>
    </tr>
  </table>
  </form>
  </center>
</div>
</body>
</html>
Now create another file and name it verify.asp
Code: ASP
<body bgcolor="#003366">
<%

'Connection String
Dim Conn
'
Query to be executed
Dim SQLQuery
'Recordset
Dim rs
'
StudentNo Of Logged in user
Dim UserName
'Password of User
Dim Password

'
Getting information from submitted form
UserName = request.form("username")
Password = request.form("password")
RememberMe = request.form("rememberme")

'If not blank Username password submitted
if UserName <> "" or Password <> "" then
    '
Creating connection Object
    set Conn=server.createobject("ADODB.Connection")
    'Creating Recordset Object
    set rs = Server.CreateObject("ADODB.Recordset")
    '
Initialising Provider String
    connStr = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source="
    connStr = connStr + server.MapPath("Studentrecords.mdb")

    'Opening Connection to Database
    Conn.open  connStr
   
    '
Query to be executed
    SQLQuery = "select * from tblStudent where StudentNo = '"&UserName&"' AND Password = '"&Password&"'"

    'Retrieving recordset by executing SQL
    set rs=Conn.execute(SQLQuery)
    '
If no records retrieved
    if rs.BOF and rs.EOF then
        Response.Redirect "login.asp?username=" & UserName
    else
        'If remember me selected
        if RememberMe = "ON" then
            '
Writing cookies permanently
            Response.Cookies("UserName")=UserName
            Response.Cookies("Password")=Password
            Response.Cookies("UserName").Expires = Now() + 365
            Response.Cookies("Password").Expires = Now() + 365
            Response.Redirect "welcome.asp"
        else
            'writing cookies temporarily
            Response.Cookies("UserName")=UserName
            Response.Cookies("Password")=Password
            Response.Redirect "welcome.asp"
        end if
        '
Closing all database connections
        Conn.Close
        rs.close   
        set rs = nothing
        set Conn = nothing
    end if
else
    'Invalid User
    Response.Redirect "login.asp?UserName=blank"
end if
%>
Upload the all the 3 files viz login.asp, verify.asp and Studentrecords.mdb in the current folder and you are ready to go.
mayurvishal likes this
archu's Avatar
Light Poster
Hello

if i want to login using userid or email then what will be the code??

Thank u
shabbir's Avatar, Join Date: Jul 2004
Go4Expert Founder
Quote:
Originally Posted by archu
if i want to login using userid or email then what will be the code??
StudentNO can behave as that. The concenptually article will explain how to go about it and it can always be extended for the custom fields in the database.
archu's Avatar
Light Poster
Hi,

Thanks for the reply. I think you din't get my point. I am asking for the code which help me to login using both username and email id . Ie is if i want i can login with a user name. Or else with a email id . The same way which is there in monster.com

Thanks in advance.

bye
shabbir's Avatar, Join Date: Jul 2004
Go4Expert Founder
Quote:
Originally Posted by archu
Thanks for the reply. I think you din't get my point. I am asking for the code which help me to login using both username and email id . Ie is if i want i can login with a user name. Or else with a email id . The same way which is there in monster.com
Still my answer remains the same but i will add something more.

If one verification process fails you can go with the other but you can also test if the username contains some predefined valid email format and then go for email validation or the username one.
kimnhat's Avatar, Join Date: Mar 2007
Newbie Member
Hi,

I try to apply you code in Macromedia MX asp vbscript page and it not verify the username and password. Could you please let me know what I did wrong. I am new to this software and I try to create simple webpage with user name and password. please help
shabbir's Avatar, Join Date: Jul 2004
Go4Expert Founder
Did you try creating a normal ASP page and see if it works for you.
kimnhat's Avatar, Join Date: Mar 2007
Newbie Member
Hi Shabbir,

It actualy work but it no validate the username and password. I can login either username and passowd blank or I just type some thinf in those 2 field. When I click login it link to verify page. Thanks,
shabbir's Avatar, Join Date: Jul 2004
Go4Expert Founder
There is a check for blank username and password and so see if it is executed correctly and if not it should display the message
Code:
if UserName <> "" or Password <> "" then
.
.
.
else
    'Invalid User
    Response.Redirect "login.asp?UserName=blank"
end if
kimnhat's Avatar, Join Date: Mar 2007
Newbie Member
Hi Shabbir,

My bad. I were missing some code that why it not works. Now it works fine. Thanks alot.