Jump to content

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


Coyad

Recommended Posts

 

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

 

 

 

Link to comment
Share on other sites

Aplo, katanoito :D, thanks for share

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

 

 

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

Keep up.

Link to comment
Share on other sites

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 ;)

Link to comment
Share on other sites

  • 2 weeks later...

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.

Link to comment
Share on other sites

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

Link to comment
Share on other sites

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 ;)

Link to comment
Share on other sites

  • 2 weeks later...
  • 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...