KONEKSI DATA BASE DENGAN VISUAL STUDIO 2008

KONEKSI DATA BASE DENGAN VISUAL STUDIO 2008

Silahkan anda buka program visual basic .net 2008 milik anda dan buat sebuat project baru dengan memilih menu File -> New Project. Pada jendela New Project, pada jendela templates pilihlah obsi untuk membuat form. Klik Windows Form Application, beri nama Aplikasi dan klik OK.

Selanjutnya kita akan menambahkan sebuah DataGridView pada jendela Form1 dan beri nama DGV pada properti DataGridView. Simpan project anda, klik File -> Save All. Minimize jendela aplikasi visual basic .net 2008 anda.

Buka Microsoft Office Access anda dan buatlah database baru, beri nama Kepegawaian.accdb lalu simpan pada drive C: pada folder Documents  -> Visual Studio 2008 -> Project -> Aplikasi -> Aplikasi -> Bin -> Debug. Selanjutnya buat sebuah tabel baru dengan nama ABSEN.

Masukkan data pada tabel yang sudah dibuat tadi.

Jika sudah, silahkan anda simpan project database tadi dan tutup Microsoft Office Access 2007. Selanjutnya kita akan beralih ke jendela VB.Net 2008. Klik form1, lalu tekan F7 untuk menampilkan kode.

Imports System.Data.OleDb

    Public Class Form1

    Dim conn As OleDbConnection

    Dim da As OleDbDataAdapter

    Dim ds As DataSet

    Dim str As String

Sub Koneksi()

    str = "provider=microsoft.ace.oledb.12.0;data source=kepegawaian.accdb"

    conn = New OleDbConnection(str)

    If conn.State = ConnectionState.Closed Then

    conn.Open()

    End If

End Sub

Sub TampilkanData()

    da = New OleDbDataAdapter("select * from absen", conn)

    ds = New DataSet

    da.Fill(ds, "absen")

    DGV.DataSource = ds.Tables("ABSEN")

End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Call Koneksi()

Call TampilkanData()

End Sub

Coba jalankan dan lihat hasilnya.

Sekian Tutorial yang saya buat semoga bermanfaat N harap di maklumi bila masih banyak kesalahan,,!!

Mohon masukanya yah ,,,,!!!!