Home » » KONEKSI DATABASE ACCESS PADA VISUAL BASIC NET 2008

KONEKSI DATABASE ACCESS PADA VISUAL BASIC NET 2008



A.   Pada Microsoft Access
1.      Siapkan file Database Access terlebih dahulu dengan nama “TestDatabase.accdb” yang disimpan di dalam drive “C:\Test Project\Database”,



2.      Pada menu view, pilih design view dan masukkan data seperti di bawah ini

       
3.      Pilih datasheet view, pada menu view, untuk input data database yang kan ditampilkan sebagai isi record dari table “TextTable” ke DataGridView. Save dan close  database Access

B.     Pada Visual Basic Net 2008

1.      Buka Aplikasi Visual Studio 2008 – Pilih File – New Project. Ubah Nama Projectnya menjadi DatabaseConnection, lalu klik OK


2.      Pilih menu Project – DatabaseProperties ( Menu yang paling Bawah )

3.      Pilih Settings, Ubah Name Menjadi ConnStr, Ganti Type menjadi (Connection String) Scope menjadi Application, kemudian klik button kecil di kolom value

4.      Pilih Microsoft Access Database File , kemudian klik tombol OK

5.      Klik browse, arahkan ke folder TestDatabase, Kemudian Klik tombol OK

Tampilan akan menjadi seperti ini :

6.      Kembali ke Design Form1.vb, tambahkan control Button Dan DataGridView

7.      Double klik button1, lalu ketikkan perintah dengan urutan sebagai berikut :

a.    Diatas Public Class Form1, ketikkan syntax ini :
Imports System.Data.OleDb


b.    Kemudian ketikkan syntax berikut:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Using Conn As New OleDbConnection(My.Settings.ConnStr)
Using Dta As New OleDbDataAdapter(“Select * From TestTable”, Conn) ‘koneksi database access’
Conn.Open()
Dim Dttabel As New DataTable ‘deklarasi variabel tabel yang akan dimasukkan pada datagridview’
Dta.Fill(dttabel)                           ‘memasukkan data pada database testtable pada datagridview’
DataGridView1.DataSource = dttabel      ‘memasukkan data pada database testtable pada datagridview’
End Using
End Using
End Sub

8.      Setelah selesai, coba jalankan project dengan menekan tombol F5, lalu klik Button1, jika koneksi berhasil maka datagridview akan terisi oleh record dari table “testTable” seperti gambar dibawah.

     9.  Running Project Berhasil


1 komentar:

  1. kenapa perintah My.Settings.ConnStr bergaris bawah biru? please respons

    ReplyDelete