Minggu, 20 April 2014

Cara Menghubungkan Visual Basic Ke Microsoft Access (Real)

Assalamu'alaikum..

Agan2 yang lagi bingung cara menghubungkan vb ke ms access ,disini di jelaskan caranya yang benar.
Awalnya ane bingung caranya ,masalahnya gurunya juga belom pernah ngajarin sebelumnya..
Setelah browsing2 ,ngumpulin bahan2 buat ngerjainnya ,dan buat percobaan2 ,akhirnya ane berhasil buat project vb yang bisa terhubung ke ms access..

Sebelumnya jangan cepet putus asa karna mungkin cara2 ini bakalan agak panjang ,tapi ente2 harus tau ,cara di bawah terbukti yang paling bener di antara cara2 yang lain..

Okelah gak usah panjang lebar lagi ,langsung aja menuju ke TKP.. :D

Syarat2nya :
1. Punya niat yang kuat
2. Pc/Laptop/Notebook sudah di install vb

okelah langsung ke cara yg pertama :
1. Buat Database dari microsoft access dengan format mdb

Tulis terlebih dahulu nama database yg akan dibuat ,lalu tekan gambar folder kecil di sebelah nama database tadi. Itu bertujuan untuk memilih dimana kita akan menyimpan database itu ( sebaiknya siapkan folder baru untuk menyimpan database dan project vb nya nanti ).
Pilih 2002-2003 Format ,klik Ok
Klik Create
#Lihat gambar


2. Klik kanan tabel ,pilih design view ,beri nama tabel sesuka hati ,Klik OK


3. Buat Seperti ini gan :


4. Setelah itu Klik Save ,Kemudian Exit

Sekarang kita beralih ke Vb nya nih gan :

5. Pertama buat form seperti ini :


Klik kanan Taskbar di sebelah kiri ,pilih components
Pilih Microsoft ADO Data Control 6.0 (SP6) (OLEBD) dan Microsoft DataGrid Control 6.0 (SP6) (OLEBD)



Klik icon adodc lalu buat ke dalam form ,lakukan hal yg sama dengan DataGrid
Nanti akan jadi seperti ini :


Kemudian klik kanan Adodc ,pilih Adodc propeties
pilih "use connection string" ,klik Build ,klik next
Pilih Microsoft Jet 4 ,klik next
pilih tempat dimana ente simpan database tadi ,klik open


Lalu klik RecordSource pilih 2 cmd table dan pilih nama tabel yg tadi ente buat.


Klik DataGrid ,pilih Data Source Di sebelah  kanan ,pilih adodc1 (sesuai nama adodc yang tadi ente buat)


Lalu Klik Kanan di DataGrid ,pilih Retrieve Fields
Dan Jeng Jeng !! Field2 yg tadi sudah di buat di ms access akan tampil di DataGrid

Tapi sebelumnya buat sample data dulu dari ms access ,kalo gak ada data apaun dari ms access ,di DataGrid Hanya akan muncul field2nya aja.




6. Nah langkah Terakhir Adalah menulis kode2nya..

Nih gan kode2nya :

Private Sub Command1_Click()
Adodc1.Recordset.AddNew
Me.Adodc1.Recordset.Fields(0) = Text1.Text
Me.Adodc1.Recordset.Fields(1) = Text2.Text
Me.Adodc1.Recordset.Fields(2) = Text3.Text
Me.Adodc1.Recordset.Fields(3) = Text4.Text
Me.Adodc1.Recordset.Fields(4) = Text5.Text
Me.Adodc1.Recordset.Fields(5) = Text6.Text
Me.Adodc1.Recordset.Fields(6) = Text7.Text
Adodc1.Recordset.Update


End Sub

Private Sub Command2_Click()
Adodc1.Recordset.Delete
Adodc1.Recordset.Update
DataGrid1.Refresh
End Sub

Private Sub Command3_Click()
Unload Me
End Sub

Private Sub Command4_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text1.SetFocus
End Sub

Private Sub Form_Load()
Adodc1.Refresh
End Sub

NOTE : Jangan di Copast All ,liat dulu perintahnya di suruh isi buat command button yang mana atau buat form nya ,gak bakalan berhasil kalo di copast all !!!

#Kalo agan2 udah ikutin langkah2 di atas dengan benar ,tapi tetep ada yg salah ,coba liat kembali project agan2 ,apa ada yg salah atau enggak..
Kalo  udah merasa bener tapi tetp ada yg salah ,silahkan tulis comment..
Insya Allah bakalan Di jawab :D

Terima kasih udah liat blog ane..
Wassalamu'alaikum..

Tidak ada komentar:

Posting Komentar