LOGIN page wont work!!

Question

4.00/5 (1 vote)

See more:

Hi im new in this programming language.. im currently working on a Log In system where there are 3 inputs; Username, Password and Position
my problem is when accessing only 2 inputs(Username, Password) the program works fine but when it is 3 some error occured.
Ive tried google, and other search engine but they are only for two inputs plss help me..
Here is my code

<pre lang="xml"><%@ Page Language="VB" Debug="true" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<%@ Import Namespace="System.Web.UI" %>

<script language="VB" runat="server">

    Sub btnLogin_OnClick(Src As Object, E As EventArgs)
        Dim myConnection  As OleDbConnection
        Dim myCommand     As OleDbCommand
        Dim strUserURL    As String
        Dim strSQL        As String

        strSQL = "SELECT destination FROM tblLoginInfo " _
         & "WHERE username='" & Replace(txtUsername.Text, "'", "''") & "' " _
         & "AND password='" & Replace(txtPassword.Text, "'", "''") & "';" _
         & "AND position='" & Replace(items.Text, "'", "'") & "';"

        myConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; " _
            & "Data Source=" & Server.MapPath("login.mdb") & ";")

        myCommand = New OleDbCommand(strSQL, myConnection)

        myConnection.Open()
        strUserURL = myCommand.ExecuteNonQuery()
        myConnection.Close()

        'Response.Write(intUserCount)
        If strUserURL <> "" Then
            lblInvalid.Text = ""
            FormsAuthentication.SetAuthCookie(txtUsername.Text, True)
            Response.Redirect("bob.aspx")
        Else
            lblInvalid.Text = "Sorry... try again..."
        End If
    End Sub

</script>

<html>
<head>
<title>ASP.NET Login</title>
</head>
<body>

<h2>Please Login:</h2>

<p>
Hint:
</p>

<p>
<asp:Label id="lblInvalid" runat="server" />
</p>

<form runat="server">

    Username: <asp:TextBox id="txtUsername" runat="server" /><br />
    Password: <asp:TextBox id="txtPassword" TextMode="password" runat="server" /><br />
    <br />
    <br />
    <br />
    position: <asp:TextBox id="items" runat="server" /><br />
    <br />
    <br />
    <asp:Button id="btnLogin" runat="server"
        text="Login" OnClick="btnLogin_OnClick" Width="221px"
    />
</form>


<p>
If you're not sure who you are currently logged in as you can
always check via the <a href="whoami.aspx">Who Am I?</a> page.
</p>

</body>
</html>

Here is the problem when i connect it to local host:

<pre lang="msil">IErrorInfo.GetDescription failed with E_FAIL(0x80004005).
Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.

Exception Details: System.Data.OleDb.OleDbException: IErrorInfo.GetDescription failed with E_FAIL(0x80004005).

Source Error:


Line 23:
Line 24:        myConnection.Open()
Line 25:         strUserURL = myCommand.ExecuteScalar()
Line 26:        myConnection.Close()
Line 27:

Posted 26-Apr-11 15:16pm

drkterror1

Add a Solution

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

walterhevedeich · Accepted Answer · 2011-04-26T15:21:00

Solution 1

Not sure if this can help but I saw your code and found out that you have a semicolon on the 3rd line. I think you should remove it. Hope it helps.

strSQL = "SELECT destination FROM tblLoginInfo " _
        & "WHERE username='" & Replace(txtUsername.Text, "'", "''") & "' " _
        & "AND password='" & Replace(txtPassword.Text, "'", "''") & "';" _
        & "AND position='" & Replace(items.Text, "'", "'") & "';"

Posted 26-Apr-11 15:21pm

walterhevedeich

Comments

drkterror1 26-Apr-11 21:30pm

Sir it still wont work I even try deleting the two semicolons but it still dont work i eve tried to chane it to .executescalar but the error still pops out ..
but thanks for the help and time really appreciate it ^^

walterhevedeich 26-Apr-11 22:05pm

Same error?

drkterror1 26-Apr-11 22:27pm

Yes

walterhevedeich 26-Apr-11 22:33pm

Are you sure you posted the right code? I saw in your Source Error that it has a ExecuteScalar method but I can't see that in your code. All I see is ExecuteNonQuery.

drkterror1 26-Apr-11 22:29pm

i even change the query it becomes "Select * from tblLoginInfo"

drkterror1 26-Apr-11 23:03pm

sorry my mistake im changing in to .executenonquery and .executescalar but still the it goes like that line 26

walterhevedeich 26-Apr-11 23:15pm

I found another one. position is a reserved word. try enclosing it with [ ].

drkterror1 27-Apr-11 0:21am

sir position is not a reserved word. it is a column in my database..

drkterror1 27-Apr-11 0:36am

GOT IT!! THANKS FOR THE HELP I SHOULD ENCLOSED tblLoginInfo with [] since that is the reserved word.. thanks for the help

walterhevedeich 27-Apr-11 0:37am

no problem. So will you mark this as solved then? :)