Operasi ADODB Recordset Pada MS Access

AstroDigi.com | Kamis, 9 Okt 2014 | Dalam melakukan manipulasi data pada tabel pada MS Access, user bisa melakukan dengan 2 cara yaitu secara langsung ataupun tidak langsung.

Secara langsung berarti tinggal membuka tabel, dan lanjutkan dengan manipulasi data (Add, Edit, Delete). Secara tidak langsung biasanya menggunakan query atau recordset untuk mengisi data hasil penghitungan atau operasi logika kedalam tabel.

Khusus untuk manipulasi data yang "unbound" (tidak terikat dengan tabel), akan lebih fleksibel bila dilakukan dengan operasi recordset (buka tabel dan manipulasi dengan menggunakan coding).

Berikut ini adalah contoh operasi recordset pada tabel bernama "tabel_contoh" :

'-----------------------------
Dim isiData As ADODB.Recordset
Set isiData = New ADODB.Recordset
isiData.CursorLocation = adUseClient
isiData.Open "select * from tabel_contoh;", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
'-----------------------------
    With isiData
    .AddNew
    .Fields("IDcontoh") = dataID01
    .Fields("dataContoh") = data01
    .Update
    End With
'-----------------------------            
isiData.Close
Set isiData = Nothing
'-----------------------------

Contoh coding VBA diatas saya bagi dalam 3 blok, blok pertama untuk membuka tabel, blok kedua memanipulasi tabel, blok ketiga untuk menutup tabel.

Untuk operasi update dan delete, menurut saya masih lebih enak menggunakan query. Operasi recordset akan lebih cocok digunakan untuk penambahan data.

Akhir kata, semoga tips dan tutorial singkat diatas bermanfaat, selamat mencoba, have a nice day :-)

 www.AstroDigi.com (Nino Guevara Ruwano)

AllBlogToolsFacebook comments for blogger brought to you by AllBlogTools.com , Get Yours?