Koneksi Visual basic 6 (VB6) dengan Access 2007

Cara koneksi VB6 dengan ms access 2007 sama dengan ms access versi sebelumnya , perpedaanya pada connectionstringnya saja:

ini contoh menyimpan data melalui VB6  ke access 2007  :

Private Sub Command1_Click()
Dim Koneksi2007 As New ADODB.Connection
Dim RecordSetTabel As New ADODB.Recordset

'konection string untuk ms acces 2007

Koneksi2007.Open "Provider=Microsoft.ACE.OLEDB.12.0;  Data
Source=D:\dataaccess2007.accdb;Persist Security Info=False;"

RecordSetTabel.Open "TabelBarcode",Koneksi2007, adOpenStatic, adLockOptimistic

If  RecordSetTabel.Supports(adAddNew) Then
With  RecordSetTabel
.AddNew
.Fields("Barcode") = Me.txtBarcode.Text
.Fields("Date") = Me.txtDate.Text
.Fields("Time") = Me.txtTime.Text
.Fields("Mesin_No") = Me.txtStcNum.Text
.Fields("Status") = Me.txtStatus.Text         '  OK or NG
.Update
End With

Label1.Caption =  " data has been added to database successfully"
End If

RecordSetTabel.Close
Set  RecordSetTabel = Nothing
Koneksi2007 .Close
Set Koneksi2007 = Nothing
End Sub
About these ads

About pccontrol

Berisi Tutorial Menggunakan PC untuk mengontrol Peralatan dengan cara mudah & praktis.

Posted on 19 July 2011, in Dasar Basisdata (Database), Tips & Trik. Bookmark the permalink. 5 Comments.

  1. agan ane ms bingung dah,,, ini buat dimana ya???
    cz setau gw yg brusan gw bc2 ini dipake buat di modul, ko itu pake privat sub command1_click

    • modul itu gunanya supaya program lebih rapi/terstruktur dan mudah digunakan kembali oleh kita atau orang lain. jadi silahkan saja di buat dimodul itu lebih baik. yang saya berikan cuman contoh sederhana saja.

  1. Pingback: Modul Dasar Pemrograman Visual Basic | Terbaru 2015

  2. Pingback: Modul Pemrograman Visual Basic 6 | Terbaru 2015

  3. Pingback: Modul Dasar Pemrograman 2 Dengan Visual Basic | Terbaru 2015

Komentar ,Saran atau Pertanyaan

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

Follow

Get every new post delivered to your Inbox.

Join 67 other followers

%d bloggers like this: