So you would like to use the "login.txt" file as the place where the username and password are stored?

That's not very good login system, anyone could search the computer for login (which is quite obvious). Try renaming the file to something completely random i.e. "4ty47rhegi.txt"

As far as the code goes you used

(Toggle Plain Text)

FILENAME = "LOGIN.TXT"

FileOpen(1, "LOGIN.TXT", OpenMode.Append)
WriteLine(1, username, password, role)
FileClose(1)

FILENAME = "LOGIN.TXT" FileOpen(1, "LOGIN.TXT", OpenMode.Append) WriteLine(1, username, password, role) FileClose(1)

My amendment's for you are simply follow this person's tutorial Here. Its so simple and goes right into depth, I take no credit and pass it all onto him

thanks but can i get a proper code for d same ? i am unable to watch video properly prob. due to my slow connection....can u plz help me out soon ! cya, wating for ur reply

Hi sorry your waiting on my reply

Right.

I will write the code for you now, ok, so
textbox1 is username field, textbox2 is password

This is the code for the button (Login button)

(Toggle Plain Text)

  Dim password As String
        Dim username As String
        password = "yourpassword"
        username = "yourusername"
        If TextBox1.Text = username And textbox2.text = password Then
            form2.show()
            Me.Close()
        ElseIf TextBox1.Text = username = False Then
            MsgBox("Wrong username", MsgBoxStyle.Critical)
        ElseIf textbox2.text = password = False Then
            MsgBox("Wrong password", MsgBoxStyle.Critical)
        ElseIf TextBox1.Text = username = False And textbox2.text = password = False Then
            MsgBox("Wrong username and password", MsgBoxStyle.Critical)
        End If

Dim password As String Dim username As String password = "yourpassword" username = "yourusername" If TextBox1.Text = username And textbox2.text = password Then form2.show() Me.Close() ElseIf TextBox1.Text = username = False Then MsgBox("Wrong username", MsgBoxStyle.Critical) ElseIf textbox2.text = password = False Then MsgBox("Wrong password", MsgBoxStyle.Critical) ElseIf TextBox1.Text = username = False And textbox2.text = password = False Then MsgBox("Wrong username and password", MsgBoxStyle.Critical) End If

yourusername = Should be changed to your username
yourpassword = Should be changed to your password
form2.show = The form you want to show when the correct username and password are entered

Sorry for the late reply, any probs/questions let me know
Also let me know if it works as well lol

Thanks,
Luke

also you could have a change login button which would work by overwriting the other login

Code for change login button:

(Toggle Plain Text)

username = TextBox1.Text
password = textbox2.text

username = TextBox1.Text password = textbox2.text

Hi sorry your waiting on my reply

Right.

I will write the code for you now, ok, so
textbox1 is username field, textbox2 is password

This is the code for the button (Login button)

(Toggle Plain Text)

  Dim password As String
        Dim username As String
        password = "yourpassword"
        username = "yourusername"
        If TextBox1.Text = username And textbox2.text = password Then
            form2.show()
            Me.Close()
        ElseIf TextBox1.Text = username = False Then
            MsgBox("Wrong username", MsgBoxStyle.Critical)
        ElseIf textbox2.text = password = False Then
            MsgBox("Wrong password", MsgBoxStyle.Critical)
        ElseIf TextBox1.Text = username = False And textbox2.text = password = False Then
            MsgBox("Wrong username and password", MsgBoxStyle.Critical)
        End If

Dim password As String Dim username As String password = "yourpassword" username = "yourusername" If TextBox1.Text = username And textbox2.text = password Then form2.show() Me.Close() ElseIf TextBox1.Text = username = False Then MsgBox("Wrong username", MsgBoxStyle.Critical) ElseIf textbox2.text = password = False Then MsgBox("Wrong password", MsgBoxStyle.Critical) ElseIf TextBox1.Text = username = False And textbox2.text = password = False Then MsgBox("Wrong username and password", MsgBoxStyle.Critical) End If

yourusername = Should be changed to your username
yourpassword = Should be changed to your password
form2.show = The form you want to show when the correct username and password are entered

Sorry for the late reply, any probs/questions let me know
Also let me know if it works as well lol

Thanks,
Luke

also you could have a change login button which would work by overwriting the other login

Code for change login button:

(Toggle Plain Text)

username = TextBox1.Text
password = textbox2.text

username = TextBox1.Text password = textbox2.text