Pada artikel sebelumnya telah saya berikan cara koneksi database Access 2000 ke VB.Net, kini saya akan berikan cara koneksi database 2003 ke VB.Net
Database Access 2003
1. Buka project vb.net 2005 pertemuan sebelumnya
2. buat form baru dengan nama ACCESS2003
3. buka access 2003
4. Create a new file
5. Blank database
6. Tulis nama file
7. simpan database (di folder project di posisi bin >debug)
8. Create
9. Klik dua kali object create table in desain view
10. Buatlah struktur tabel sebagai berikut
12. Klik kanan field kode_Barang
13. Pilih primary key (atau klik icon Primary Key Gambar kunci warna kuning)
14. Simpan struktur tabel > Klik ikon save (gambar disket)
15. Tulis nama tabel (barang)
16. Klik OK
17. Isilah tabel barang secara manual dengan data sebagai berikut
Koneksi Vb.Net 2005 Dengan Database Access 2003
1. Buka vb.net
2. Buatlah form seperti gambar di bawah ini
3. ubah nama Datagridview1 menjadi GDV
4. buka jendela coding dan tulis coding berikut :
Hasil program :
Database Access 2003
1. Buka project vb.net 2005 pertemuan sebelumnya
2. buat form baru dengan nama ACCESS2003
3. buka access 2003
4. Create a new file
5. Blank database
6. Tulis nama file
7. simpan database (di folder project di posisi bin >debug)
8. Create
9. Klik dua kali object create table in desain view
10. Buatlah struktur tabel sebagai berikut
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 |
13. Pilih primary key (atau klik icon Primary Key Gambar kunci warna kuning)
14. Simpan struktur tabel > Klik ikon save (gambar disket)
15. Tulis nama tabel (barang)
16. Klik OK
17. Isilah tabel barang secara manual dengan data sebagai berikut
Koneksi Vb.Net 2005 Dengan Database Access 2003
1. Buka vb.net
2. Buatlah form seperti gambar di bawah ini
3. ubah nama Datagridview1 menjadi GDV
4. buka jendela coding dan tulis coding berikut :
- Imports System.Data.OleDb
- Public Class TampilGrid
- Dim Conn As OleDbConnection
- Dim da As OleDbDataAdapter
- Dim ds As DataSet
- Sub Koneksi()
- str = "provider=microsoft.jet.oledb.4.0;data source=db1.mdb"
- Conn = New OleDbConnection(str)
- If Conn.State = ConnectionState.Closed Then Conn.Open()
- End Sub
- Private Sub TampilGrid_Load(ByVal sender As System.Object, ByVal e
- As System.EventArgs) Handles MyBase.Load
- Koneksi()
- da = New OleDbDataAdapter("Select * from barang", Conn)
- ds = New DataSet
- ds.Clear()
- da.Fill(ds, "Barang")
- DGV.DataSource = (ds.Tables("Barang"))
- End Sub
- End Class
Hasil program :
0 komentar on CARA KONEKSI DATABASE Access2003 VB.NET 2005 :
Post a Comment and Don't Spam!
Terimakasih Sudah Berkomentar di artikel ini