Membuat menu login dengan VB 6.0 dan MS Access

November 5, 2008 at 3:01 am 13 comments

(Materi ini bisa didownload)

Siapkan dahulu databasenya, saya siapkan database dengan nama stok dan di dalamnya ada 4 tabel, table yang saya gunakan untuk Login adalah table TBKaryawan :

access1

Setidaknya ada table TBKaryawan, table ini saya gunakan untuk login, desainnya adalah sbb :

access3

Sedangkan datanya saya isikan sbb :

access2

Saya isikan 3 data disitu, pada NIK = R003 Bagiannya adalah Admin, sedangkan yang lain bagiannya adalah Casir, maksudnya jika nanti yang Login adalah Admin maka dia memiliki wewenang lebih dibanding dengan Casir, nah untuk mencobanya langsung saja masuk ke VB

Kemudian buat Form sebanyak 2 Form, yaitu Form_Login dan Form_Menu sbb :

access51

Sedangkan untuk Form_Login desain formnya adalah sbb :

access6

Textbox yang atas saya beri nama txtusername

Textbox yang bawahnya saya beri nama txtpassword

Sedangkan tombol yang Login diberi nama cmdlogin

Pada Form tsb pada Properties, Captionnya = Login, StartUpPosition = CenterScreen, MinButton = False, MaxButton = False

Langkah selanjutnya buat koneksi dengan ODBC, langkahnya :

Masuk ke Control Panel > Administrative Tools > ODBC > pada tab User DNS > Add > Cari Driver do Microsoft Access (*.mdb) Kemudian Finish

Pada Data Source Name diisi koneksi (nama lain bebas), Discription diisi boleh tidak juga boleh. Kemudian klik tombol Database dan kemudian cari file database yang sudah dibuat dengan access, jika sudah ketemu klik Ok > Ok. Sehingga hasilnya sebagai berikut:

access7

Nah sampai tahap ini database sudah siap untuk dibuat koneksinya dengan VB, sekarang tinggal dilanjutkan ke VB lagi. Pada toolbox diklik kanan, pilih Componen, kemudian cari dan centang Microsoft Ado Data Control 6.0 (OLEDB) > Ok

access8

Masukkan/drag Componen ADODC ke dalam Form_Login, kemudian pada Propertis Visiblenya diset False. Kemudian klik kanan Adodc1 tersebut pilih Adodc Properties, kemudian > pada Use Connection String pilih > Build > pada Tab Provider pilih Microsoft OLEDB Provider for ODBC Driver > Next > Pada Use data source name > cari Koneksi >kemudian untuk menyakinkan koneksinya sukses atau tidak Coba Test Connection, jika sukses bisa dilanjutkan > Kemudian masuk ke Tab Record Source, buka pada Command Text (SQL) masukkan perintah SQL sbb :

Select * from TBKaryawan

Kemudian OK

Langkah selanjutnya lagi masuk ke Form_Menu atur propertiesnya StartUpPosition = CenterScreen

Lalu buat menunya menggunakan Menu Editor, dan susunlah menjadi seperti berikut :

access9

access10

Sedangkan settingannya sebagai berikut :

Caption

name

Master

mnMaster

Karyawan

mnKaryawan

Pengkodean Barang

mnBarang

Keluar

mnKeluar

Transaksi

mnTransaksi

Pembelian

mnPembelian

Penjualan

mnPenjualan

Laporan

mnLaporan

Data Karyawan

mnLapKaryawan

Utility

mnUtility

Pengguna Software

mnPengguna

BackUp Data

mnBackup

Setelah menu terbentuk, tinggal pasang coding untuk keluar, caranya pada Form_Menu, buka Master klik Keluar, kemudian tambahkan coding

End

sehingga tampak sbb :

Private Sub mnKeluar_Click()

End

End Sub

Kemudian buka kembali Form_Login dan pada Tombol Login klik 2x dan isikan codingnya menjadi sbb :

Private Sub cmdlogin_Click()

Vusername = txtusername.Text

Vpassword = txtpassword.Text

Adodc1.RecordSource = “select * from TBKaryawan where nik = ‘” + Vusername + “‘ and password = ‘” + Vpassword + “‘”

Adodc1.Refresh

If (Adodc1.Recordset.RecordCount >= 1) Then

tbagian = Adodc1.Recordset!bagian

If (tbagian <> “Admin”) Then

Form_Menu.mnPengguna.Enabled = False

End If

Form_Menu.Show

Form_Login.Hide

Else

MsgBox “Username atau password salah”

End If

End Sub

Nah sampai disini selesai sudah tinggal di run

Hasilnya seperti berikut, jika yang login bagiannya Casir ya tidak bisa membua pengguna software, tapi kalau yang Login Admin ya bisa membuka Pengguna Software :

access11

About these ads

Entry filed under: Pemrograman Visual. Tags: .

Membuat web untuk login dengan servlet menu login dengan enscripsi nilai ascii (VB 6.0 & mysql)

13 Comments Add your own

  • 1. Y@p  |  February 13, 2009 at 2:10 am

    Thanks Banget
    Ini Indah banget …

    Reply
    • 2. jingklak  |  February 13, 2009 at 11:52 am

      ya

      Reply
    • 3. chika  |  June 16, 2009 at 8:25 am

      gmana cra’a membuat form login tdk pke ODODC/ODOBC?///

      Reply
  • 4. matc  |  February 15, 2009 at 8:08 pm

    Thx pak Hary…

    yang banyak lagi tutorialN..

    Reply
  • 5. ahmadroda  |  May 4, 2009 at 10:26 am

    kalo cara membuat menu log in untuk blog gimana sob?
    ajarin iiiaa…

    Reply
  • 6. ria  |  May 14, 2009 at 3:28 am

    sangat membantu

    Reply
  • 7. ria  |  May 14, 2009 at 3:31 am

    caranya bikin log in pendaftaran sd gmn?
    buatin o….
    hhe..he..he..

    Reply
    • 8. jingklak  |  May 14, 2009 at 8:18 am

      untuk pendaftaran ya tidak jauh beda, tinggal logikanya disesuaikan.

      Reply
  • 9. cua...cua..  |  May 18, 2009 at 1:21 am

    kayaknya kurang lengkap tuh…

    ga ada module nya kan koneksi ke database

    Reply
  • 10. jingklak  |  May 21, 2009 at 9:17 am

    dicoba apa belum ?

    Reply
  • 11. David Candrawan  |  May 29, 2009 at 1:10 pm

    Trima kasih….lg saya coba…

    Reply
  • 12. mojoniaga  |  August 2, 2009 at 9:47 am

    oh….indahnya program ini

    Reply
  • 13. IryuU D.  |  December 8, 2009 at 9:10 am

    ooohhhh…… tararenkyuuuuu banget (terharu)

    akhirnya ke-pusingan ku hilang sudah…..

    akan saya coba…..

    makasih banget sekali lagi..

    Reply

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

Trackback this post  |  Subscribe to the comments via RSS Feed


November 2008
M T W T F S S
« Oct   Dec »
 12
3456789
10111213141516
17181920212223
24252627282930

Recent Posts


Follow

Get every new post delivered to your Inbox.

%d bloggers like this: