Cara membuat form login menggunakan vb.net dan database ms.acces 2007

   
     Hay gan kali ini saya akan posting tentang cara membuat form login multi  menggunakan dotnet dan ms.acces 2007, tampa banyak basa-basi yuk lansung aja ke pokoq inti dari postingan yang akan saya share ini ckckckckckcCKCK,,KEBETULAN ane lagi bad mud ni, jadi malas buat ngomong yang gk penting :D....Oke tunggu apa lagi yukkkk kita siapkan kebutuhan-kebutuhan yang diperlukan:

  1. Buatlah database dengan nama "login" tanpa tanda petik

  2. Buat sebuah tabel dengan nama "t_login" 

  3. yang terakhir buat buat 2 buah kolom dengan nama : n_user(text),pass(text)
      Ket: user adalah "nama" kolom dan "text" adalah type kolom yang akan dibuat.

  4. Nah sekarang databasenya sudah beres gan, tinggal menyiapkan 1 buah form Beri nama Form_Login , buatlah seperti gambar yang ada dibawah ini : 

  5.Nah sekarang kita sudah sampai kegiatan yang paling menarik ketika membuat sebuah program

     yaitu "Ngoding", Sebelumnya siapakan kopi dan rokok dulu biar semangat gan hkzhkzhkz

   '========================================================================

     Pertama buatlah sebuah modul, nama biarkan default aja "Moudl1" lalu double klik modul tersbut 

     dan masukkan script(kode) dibawah ini :

   '------------------------------------------------------------------------------------------------------------

     Public Function ConString() As String

        ConString = ("Provider=Microsoft.Jet.OLEDB.4.0;" & _

        "Data Source=" & Application.StartupPath & "/login.mdb") 'login.mdb adalah nama database

    End Function

    Public Function SQLTable(ByVal Source As String) As DataTable

        Try

            Dim Adp As New OleDb.OleDbDataAdapter(Source, ConString)

            Dim DT As New DataTable

            Adp.Fill(DT)

            SQLTable = DT

        Catch ex As OleDb.OleDbException

            MsgBox(ex.Message)

            SQLTable = Nothing

        End Try

    End Function

    '-------------------------------------------------------------------------------------------------------------------

    Selanjutnya kita perlua buat koneksi ke databasenya, Double klik form_loginnya, masukkan kode

    (Script) berikut :

    '-------------------------------------------------------------------------------------------------------------------

    Dim lokasi = "Provider=Microsoft.Jet.OLEDB.4.0;" & _

        "Data Source=" & Application.StartupPath & "/login.mdb"

        db = New OleDbConnection(lokasi)

        If db.State = ConnectionState.Closed Then

            db.Open()

        End If

    ' ------------------------------------------------------------------------------------------------------------------

    Ok samapai sini gimana rasanya gan, asikkan?????hahahaa asik donk. Modul dan koneksi ke database

    sudah beres, tapi pastikan databasenya sudah terkoneksi dengan connectionstring yang ada di atas :D

    Langkah selanjutnya mengaktifkan tombol masuk pada form login, double clik button "Masuk" :

    '----------------------------------------------------------------------------------------------------------------     

   Dim sql As String = "select * from t_login where n_user='" & TextBox1.Text & "' and kode='" & TextBox2.Text & "'"

            Dim oDa As New OleDbDataAdapter(sql, db)

            Dim ods As New DataSet

            oDa.Fill(ods)

            tbl = ods.Tables(0)

            If tbl.Rows.Count > 0 Then

                MsgBox("Login '" & tbl.Rows(0).Item(0) & "'  Sukses  '", vbInformation)

                UTAMA.Show()

                TextBox2.Text = ""

                Me.Hide()

                Else

                MsgBox("User Name atau Password Salah!", MsgBoxStyle.Critical, "Error")

                TextBox1.Text = ""

                TextBox2.Text = ""

                End if

    '-----------------------------------------------------------------------------------------------------------------

    Oya untuk mengaktifkan button keluarnya, double klik tombol/button tersebut :

    '-----------------------------------------------------------------------------------------------------------

    me.close

    '------------------------------------------------------------------------------------------------------------
    Selesai.
    Gimana gan, Mudahkan !!!!!hehe mudah donk,,kalau ada yang ingin ditanyakan silahkan melalui
    kotak  komentar ada dibawah, Sekian tutorial membuat form login sederhana dari saya,

    SEMOGA BERMANFAAT :)