CARA KONEKSI DATABASE MySql VB.Net

Database MySql
Pada artikel sebelumnya saya berikan artikel mengenai Koneksi database menggunakan Access 2000 dan Access 2003, kali ini saya akan berikan tutorial koneksi database vb.net menggunakan wamp server.
Berikut ini saya berikan langkah-langkan menginstal Wamp 3.51
Lakukan Instalasi Wamp 3.51









Lakukan Instalasi Driver ODBC 3.51




1. start > all programs
2. wampserver > start wampserver

3. klik kanan ikon wampserver (warna putih di taskbar sebelah kanan)
4. pilih phpmyadmin

5. ubah tampilan bahasa ke bahasa indonesia agar mudah dipahami

6. buatlah database dengan nama DBLatihan
7. klik ciptakan

8. buatlah tabel siswa dengan tiga buah field
9. klik go

10. buat struktur tabel siswa sebagai berikut

11. field nim dijadikan primary key
12. klik simpan

13. indikasi keberhasilan pembuatan tabel siswa

14. klik sisipkan untuk menambahkan data secara manual

15. isilah data sebagai berikut kemudian klik GO

16. indikasi keberhasilan penambahan data

17. klik BROWSE untuk meihat data hasil entri

18. tambahkan dua data berikutnya


Koneksi Vb.Net Dengan Database Mysql
9. Buka vb.net
10. Buatlah form seperti gambar di bawah ini

11. ubah nama Datagridview1 menjadi GDV

12. buka jendela coding dan tulis coding berikut :

1. Imports System.Data.Odbc  
2. Public Class TampilGrid  
3. Dim Conn As OdbcConnection  
4. Dim da As OdbcDataAdapter  
5. Dim ds As DataSet  
6. Sub Koneksi()  
7. str = "Driver={MySQL ODBC 3.51 
8. Driver};database=DBLatihan;server=localhost;uid=root"  
9. Conn = New OdbcConnection(str)  
10. If Conn.State = ConnectionState.Closed Then  
11. Conn.Open()  
12. End If  
13. End Sub  
14. Private Sub TampilGrid_Load(ByVal sender As System.Object, ByVal e  
15. As System.EventArgs) Handles MyBase.Load  
16. Koneksi()  
17. da = New OdbcDataAdapter("Select * from siswa", Conn)  
18. ds = New DataSet  
19. ds.Clear()  
20. da.Fill(ds, "Siswa")  
21. DGV.DataSource = (ds.Tables("Siswa"))  
22. End Sub  
23. End Class  

Hasil program :


Cara membuat string koneksi database mysql

1. klik kanan toolbox


2. choose items


3. ketik odbc


4. centang odbcconnection


5. klik dua kali object odbcconnection


6. klik dropdown connetionstring


7. pilih new connection









































21. paste string koneksi ke dalam coding

CARA KONEKSI DATABASE Access 2000 VB.Net

Kini saya berikan cara mengkoneksikan database Access 2000 ke vb.net.

Cara membuat string koneksi access 2000

1. klik kanan toolbox
2. pilih choose items
3.
4. ketik oledd
5. centang oledbconnection
6. OK
7.

8. klik dua kali oledbconnection
9.

10.

11.

12.

13.

14.

15.

16. string koneksi yang dihasilkan adalah
Provider=Microsoft.Jet.OLEDB.4.0;Data Source="D:\1 vb.net 2005\modul vb.net
2005 April 2011\Latihan1\Latihan1\bin\Debug\db1.mdb"
Catatan : posisi drive dan folder dapat dilepas menjadi :
Str= “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb"
Database access 2007
1. Buka project vb.net 2005 pertemuan sebelumnya
2. buka access 2007
3. Blank Database



6. Ketik nama file dan simpan di folder BIN > DEBUG
7. Create



8.Memberi Nama Tabel





Rancangan Struktur Tabel Barang:

No	Nama Field	Type	Size	Ket
1	Kode_barang	Text	13	Primary Key
2	Nama_barang	Text	30
3	Harga_beli	Long Integer
4	Harga_jual	Long Integer
5	Jumlah_barang	Numeric
6	Satuan	Text	15

atau



Mengisi Data Secara Manual (Klik Dua Kali Nama Tabel)


Koneksi Vb.Net 2005 Dengan Database Access 2007
5. Buka vb.net
6. Buatlah form seperti gambar di bawah ini



7. ubah nama Datagridview1 menjadi GDV
8. buka jendela coding dan tulis coding berikut :

+ expand sourceview plaincopy to clipboardprint

1. Imports System.Data.OleDb
2. Public Class TampilGrid
3. Dim Conn As OleDbConnection
4. Dim da As OleDbDataAdapter
5. Dim ds As DataSet
6. Sub Koneksi()
7. str = "provider=microsoft.ACE.OLEDB.12.0;data
8. source=LATIHAN1.ACCDB.mdb"
9. Conn = New OleDbConnection(str)
10. If Conn.State = ConnectionState.Closed Then Conn.Open()
11. End Sub
12. Private Sub TampilGrid_Load(ByVal sender As System.Object, ByVal e
13. As System.EventArgs) Handles MyBase.Load
14. Koneksi()
15. da = New OleDbDataAdapter("Select * from barang", Conn)
16. ds = New DataSet
17. ds.Clear()
18. da.Fill(ds, "Barang")
19. DGV.DataSource = (ds.Tables("Barang"))
20. End Sub
21. End Class

Hasil program :