Tuesday 17 November 2015

kode program koneksi kedatabase vb 2006 db menggunakan acces

Imports System.Data.OleDb
Public Class Form2
    Dim CONN As OleDbConnection
    Dim CMD As OleDbCommand
    Dim DS As New DataSet
    Dim DA As OleDbDataAdapter
    Dim RD As OleDbDataReader
    Dim LokasiDB As String
    Sub Koneksi()
        LokasiDB = "provider=microsoft.jet.oledb.4.0;data source=dbpegawai.mdb"
        Conn = New OleDbConnection(LokasiDB)
        If Conn.State = ConnectionState.Closed Then Conn.Open()
    End Sub
ganti dppegawai dengan database acces milik anda  

No comments:

Post a Comment