Koneksi VB.net dengan MS.Access

Neh Source Code Nyomot Dari Warung sebelah tentang Koneksi Vb.net terhadap MS.access...

Code:

Import System.Data.OleDb
public class form1
  dim kns as new OleDbConnection
  dim da as new OleDbDataAdapter
  dim dt as new datatable
  Public Sub form1_load( ...... ) mybase.load
      'ini utk access 2003 kebawah
      kns.ConnectionString = "Provider = Microsoft.Jet.OleDb.4.0;data source=mydata.mdb;Jet Oledb:Database Password='passku'"
      'Ni tuk Access 2007 kebawah
 
    'kns.ConnectionString = "Provider = Microsoft.Ace.OleDb.12.0;data
source=*.mdb/*accdb;Jet Oledb:Database Password='passku'"
      da.SelectCommand=new oledbCommand("select * from tabel1",kns)
      da.fill(dt)
      datagridview1.datasource=dt
  end sub 
end class



semoga berguna

Imports System.Data
Imports System.Data.OleDb
Namespace AccessData
Public Class DatabaseConnection
Dim conect As New
OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + AppPath + "xxxx.mdb;")
Public Function open() As OleDbConnection
conect.Open()

Return conect
End Function

Public Function close() As OleDbConnection
conect.Close()
Return conect
End Function
End Class
End Namespace


Coding di atas juga bisa di pakai untuk koneksi dr vb 2005 ke acces

wew....thanks for share :D

Objek Connection,...
obyek Connection di gunakan untuk membuat koneksi database, kita dapat menggunakan Sqlconnection untuk SQL Server, Dan OleDBConnection Untuk koneksi ke accces,..

Untuk SQL Server
Import System.Data.SqlClient
Untuk sumber lain tinggal di ganti codingnya menjadi
Import System.Data.OleDb

Code Dibawah ini untuk melakukan koneksi ke SQL Server
Dim connect As New SqlClient.SqlConnection("Server = 'nama database d sql'; uid='sa'; pwd=' '; integrated security=false;database=='NCS'")

Untuk koneksi sumber yang lain misalnya acces sebagai berikut :
Dim connect As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + AppPath + "nama database;")

Untuk membuka koneksi database
Connect.open()

Untuk menutup Koneksi Database
Connect.Close()

Semoga bermanfaat,?????

len, gw mw nanya tentang bahasa pemrograman php & My SQL ???
bisa gk ??
kpn kls web lg nh ?????

masih hidupkah forum ini?

mau nanya kk2,
Dim rs As New ADODB.Recordset
kalau ada deklarasi pada coding begini ini artinya apa kk?
ADODB.Recordset itu apa?

adodb = activex data object

adodb.recordset = pengkoneksian menggunakan activex data object dengan tabel sebagai objek nya .

adodb.connection = pengkoneksian menggunakan activex data object dengan database sebagai objek nya .

kamu pake vb 6 yah ???

yayat wrote:adodb = activex data object

adodb.recordset = pengkoneksian menggunakan activex data object dengan tabel sebagai objek nya .

adodb.connection = pengkoneksian menggunakan activex data object dengan database sebagai objek nya .

kamu pake vb 6 yah ???

vb.net 2005 kk, emng recordset itu g bisa di .net ya kk?

ada g link yang membahas tentang recordset ni kk, kalau bisa yang agak detail,, ?