Login Form connecting to Excel spreadsheet

Question

0.00/5 (No votes)

See more:

I've created a a form called login which allows two users to log in but view different forms. Form 1 - allows you to view the database only. Form two allows the user to edit the Excel spreadsheet which I connected to the form (save, delete, add a record); but the code is not allowing the second user to view the second form.

VB

If txtUsername.Text = " " And txtPassword.Text = " " Then
            MsgBox("Please enter your username and Password.", MsgBoxStyle.Information, "Login")
        Else

            If txtUsername.Text = "" Then
                MsgBox("Please enter your Username", MsgBoxStyle.Information, "Login")
            Else

                If txtPassword.Text = "" Then
                    MsgBox("Please enter your Password", MsgBoxStyle.Information, "Login")
                Else

                    If txtUsername.Text = "admin" And txtPassword.Text = "admin0123" Then
                        Me.Hide()
                        Form2.Show() 'Form 2 is in view only format
                    Else
                        If txtUsername.Text = "stacey" And txtPassword.Text = "stacey01" Then
                            Me.Hide()
                            Form3.Show()

and my coding for the add, delete, save does not want to work at all.

Please help...

Posted 23-Nov-11 2:36am

Hoeny-Plum

Updated 23-Nov-11 5:21am

Yvan Rodrigues

v2

Add a Solution

Comments

resonance_siv 23-Nov-11 8:38am

wat add or delete... refine ur question

Hoeny-Plum 24-Nov-11 2:05am

The "add", "save", and "delete" in talking about is on my form that i have created. Do i create seperate buttons that allow me to that or do encode it on the Load_form

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)

Maciej Los · Accepted Answer · 2011-11-23T05:46:00

Try to debug your code line by line (F8) and you'll see why the Form2 is not accessible.
I suggest you to change code like this (it will be more readible for you):

VB

If txtUsername.Text = String.Empty Then
    MsgBox("Please enter your Username", MsgBoxStyle.Information, "Login")
    Exit Sub
End If
 
If txtPassword.Text = String.Empty Then
    MsgBox("Please enter your Password", MsgBoxStyle.Information, "Login")
    Exit Sub
End If

If txtUsername.Text = "admin" And txtPassword.Text = "admin0123" Then
    Me.Hide()
    Form2.Show() 'Form 2 is in view only format
End If

If txtUsername.Text = "stacey" And txtPassword.Text = "stacey01" Then
    Me.Hide()
    Form3.Show()
End If

Hint: Storing the names of users (logins) and passwords inside the program (inside the procedure) is not good practice.