Jump to content

[Share]How to make Login Form in vb [ Simple and SQL ]


Recommended Posts

Posted

 

Hello members i make 2 video today for how to make login form it is easy ;)

 

 

How to make Simple Login Form

 

Video ~>

 

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       Me.Close()
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       if textbox1.text = "Username" and textbox2.text = " Password" then
       form2.show
       me.hide
       else
       msgbox.show("Your Information is wrong. Please try again!")
        end if

 

How to make SQL Login Form(RECOMMENDED)

Safe Usrname and password!

 

Video ~>

 

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       Me.Close()

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim connection As New SqlClient.SqlConnection
       Dim command As New SqlClient.SqlCommand
       Dim adaptor As New SqlClient.SqlDataAdapter
       Dim dataset As New DataSet

       connection.ConnectionString = ("Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\members.mdf;Integrated Security=True;User Instance=True")
       command.CommandText = "SELECT * FROM [user] WHERE Username= '" & TextBox1.Text & "'and password='" & TextBox2.Text & "';"
       connection.Open()

       command.Connection = connection
       adaptor.SelectCommand = command
       adaptor.Fill(dataset, "0")

       Dim count = dataset.Tables(0).Rows.Count

       If count > 0 Then
           form2.show()
           Me.Hide()
       Else
           MsgBox("Your information is wrong. Please try again!")
           TextBox1.Clear()
           TextBox2.Clear()
       End If

IN FORM 2!
   Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       TextBox1.Text = "Welcome, " + Form1.TextBox1.Text + "! "

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Me.Close()
       Form1.Show()

 

 

                        = = = = = = = =

                      =

                    =

                  =

                =

               =                                oyad

               =

                 =

                   =

                     =

                       = = = = = = = =    

 

 

Topic moved | Special thanks to WeirdSituation

 

 

 

Posted

Did you see anywhere GR tags at topic's title?...

 

 

Good job coyad,it seems you are good on vb.

Keep up.

Thanks ;)

 

Aplo, katanoito :D, thanks for share

man only english in topic anyway Thanks ;)

  • 2 weeks later...
Posted

This is only for local databases,plus it is very unsafe to save it this way.The best way to do this is with vb.net + php + mysql.

It goes like this for better security:

VB.net  -> PHP processes the data and contains the connection string to the database -> Mysql Database.

Posted

This is only for local databases,plus it is very unsafe to save it this way.The best way to do this is with vb.net + php + mysql.

It goes like this for better security:

VB.net  -> PHP processes the data and contains the connection string to the database -> Mysql Database.

I am missing your skills man...

Keep sharing/writing

Posted

This is only for local databases,plus it is very unsafe to save it this way.The best way to do this is with vb.net + php + mysql.

It goes like this for better security:

VB.net  -> PHP processes the data and contains the connection string to the database -> Mysql Database.

I know.. I learning....

I am missing your skills man...

Keep sharing/writing

Ok, Tenks ;)

  • 2 weeks later...
Posted

I can help if you want, we can make a Login system together or so, or I can advice you on certain things.

  • 7 months later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



×
×
  • Create New...