Assalamualikum wr wb

Mohom maaf sebelumnya bila banyak kekurangan, ini thread pertama saya. kali ini saya akan menjelaskan tentang bagaimana cara mengoneksikan Microsoft Acces dengan Visual Basic 6.0 dengan menggunakan program Sistem Informasi Infentaris.

Pertama : Siapkan Visual Basic 6.0 dan Microsoft Acces






A. Membuat Table pada Microsoft Acces
Pertama kita membuat dahulu tabel-tabel yang akan dikoneksikan pada vb pada Microsoft Acces
Buka Microsoft Acces pilih Blank Document Lalu pilih simpan dengan format .mdb



Lalu akan muncul tampilan



Untuk memberi nama pada tabel klik kanan pada table lalu pilih Design View setelah itu akan muncul tampilan



Klik ok, setelah itu kita tambah table dengan cara pilih create dan pilih table




Setelah itu kita buat 8 kolom dengan mengisi nama field, data type, seperti gambar berikut:



Lalu pada General, kita pilih yes untuk required (maksudnya data harus terisi) untuk semua fields



Setelah pada table satunya, ubah nama menjadi admin dan tambah field dengan cara yang sama seperti table barang



Lalu pada required pilih yes
Setelah itu klik kanan pada setiap table dan save



Pada table admin kita isi:




Isi nama, password, dan username sesuai yang diinginkan. Yang nantinya username dan password tersebut akan digunakan saat akan menjalankan program yang kita buat di VB

B. Membuat program pada VB



Buka Visual Basic 6.0 setelah itu Lalu buat tampilan dalam VB seperti gambar



1. 4 label ( 1 untuk kata SISTEM INFORMASI INFENTARIS), 1 lagi untuk kata kata saat program pertama kali muncul, untuk total harga dan tanggal)



2. 5 textbox ( untuk username, password, nama barang, harga barang, jumlah barang)
Jumlah Barang = Text1



3. Pada TextBox NamBar pilih true untuk multiline



Multiline pilih true agar inputan bisa menginput banyak kata

4. Lalu tambah componen Calender dan DataGrid
Caranya klik kanan pada ToolBar dan pilih componet lalu cari Microsoft calender 8.0 lalu centang dan ok



5. Buat 6 Command Button ( Login, Logout, Isi Data, Lihat Data, Clear, Submit)
Login = Command1
Logout = Command2



C. Code Program

1. Sebelumnya kita inisialisasikan total, jumbar dan harbar, ini dimaksudkan untuk mempermudah proses perhitungan, karena nanti kita akan menghitung total harga dari jumlah barang yang dikali dengan harga barang.

2. Command Login
Setelah itu kode untuk Command Login yaitu:
Select * from admin where ... maksudnya adalah ini memanggil data yang ada pada database di Ms. Acces. Bila data sesuai maka akan masuk program namun bila salah akan muncul Message Box.
.Visible = False/ True maksudnya bila false maka tidak akan ditampilkan sedangkan bila True akan ditampilkan



3. Command Logout
Ketika klik Logout maka tampilan akan kembali seperti semua
Dengan Kode program Sbb;




4. Command Submit
Pertama lakukan perhitungan untuk mengetahui total harga,
Setelah itu gunakan fungsi if untuk mengecek apakah data sudah lengkap atau belum, bila belum maka akan ada Message Box.
Kode If Not isNumerik adalah untuk mengatur agar user hanya bisa angka, bila selain angka maka akan muncul Message Box
Kode Call koneksi untuk menambahkan data pada database Ms Acces sesuai dengan data yang diinputkan user pada program Visual Basic tersebut.




5. Command Clear
Command Clear untuk mereset TextBox Nama Barang, Jumlah Barang, Harga Satuan, Total Harga, dan Tanggal agar user bisa memasukan data lagi. Dengan kode sbb:



6. Command Isi Data
Command Isi Data adalah untuk menampilkan kembali TextBox Nama Barang, Jumlah Barang, Harga Satuan, Total Harga, dan Tanggal agar user bisa memasukan data lagi.



7. Command Lihat Data
Command Lihat Data adalah untuk menampilkan data lengkap data yang sudah diinputkan user, dengan menggunakan DataGrid.


Begitu juga dengan TxtPassword, Text1(Jumlah Barang),TxtHarbar dan TxtNambar

D. Menjalankan program
Pertama, kita membuka program akan muncul tampilan berikut:



Lalu inputkan username dan password sesuai dengan yang dibuat pada microsoft acces sebelumnya, setel itu akan muncul tamilan berikut, namu bila username dan password salah maka akan muncul Message Box bahwa username dan password salah





Lalu isikan data dengan lengkap, bila tidak lengkap akan muncul MessageBox isi data dengan lengkap. Bila sudah Klik Sumbit, maka akan muncul tampilan berikut



Setelah itu coba Klik Command Button Lihat Data maka akan muncul tampilan berikut, yaitu data data yang telah diinputkan



Dan untuk melihat programnya silkan Download pada link berikut
[url]http://www.4*shared.com/rar/2sL9IzMB/LP7_A_1205415_IntanP_SisInfInv.html?[/url]

KET : Buang tulisan %2A pada 4%2Ashared menjadi 4*shared tanpa bintang (*)

Terima Kasih
Wassalamualikum wr wb