Lebih Lanjut tentang Persistensi Recordset

Objek ADO Recordset mendukung penyimpanan isi dari objek Recordset ke dalam file dengan menggunakan metode Simpan . File yang disimpan secara terus-menerus mungkin ada di drive lokal, server, atau sebagai URL pada situs Web. Nantinya, file dapat dipulihkan dengan metode Open dari objek Recordset atau metode Execute dari objek Koneksi.

Selain itu, metode GetString mengonversi Recordset objek ke formulir di mana kolom dan baris dibatasi dengan karakter yang Anda tentukan.

Untuk mempertahankan Recordset, mulailah dengan mengonversinya ke formulir yang dapat disimpan dalam file. Recordset objek dapat disimpan dalam format Advanced Data TableGram (ADTG) yang eksklusif atau format Extensible Markup Language (XML) yang terbuka. Contoh ADTG ditampilkan di bagian berikutnya. Untuk informasi selengkapnya tentang persistensi XML, lihat Rekaman Bertahan dalam format XML.

Simpan perubahan yang tertunda dalam file yang dipertahankan. Melakukan ini memungkinkan Anda untuk mengeluarkan kueri yang mengembalikan objek Recordset, mengedit Recordset, menyimpannya beserta perubahan yang tertunda, kemudian memulihkan Recordset tersebut, dan akhirnya memperbarui sumber data dengan perubahan tertunda yang telah disimpan.

Untuk informasi tentang menyimpan objek Stream secara terus-menerus, lihat Stream dan Persistensi.

Untuk contoh persistensi Recordset, lihat Skenario Persistensi Himpunan Catatan XML.

Contoh

Simpan Kumpulan Rekaman:

Dim rs as New ADODB.Recordset  
rs.Save "c:\yourFile.adtg", adPersistADTG  

Buka file yang tersimpan dengan Recordset.Open:

Dim rs as New ADODB.Recordset  
rs.Open "c:\yourFile.adtg", "Provider=MSPersist",,,adCmdFile  

Secara opsional, jika Recordset tidak memiliki koneksi aktif, Anda dapat menerima semua default dan kode berikut:

Dim rs as New ADODB.Recordset  
rs.Open "c:\yourFile.adtg"  

Buka file yang disimpan secara permanen dengan Connection.Execute:

Dim conn as New ADODB.Connection  
Dim rs as ADODB.Recordset  
conn.Open "Provider=MSPersist"  
Set rs = conn.execute("c:\yourFile.adtg")  

Buka file yang disimpan dengan RDS.DataControl:

Dalam hal ini, properti Server tidak diatur.

Dim dc as New RDS.DataControl  
dc.Connection = "Provider=MSPersist"  
dc.SQL = "c:\yourFile.adtg"  
dc.Refresh  

Lihat Juga

Metode GetString (ADO)
Penyedia Persistensi Microsoft OLE DB (Penyedia Layanan ADO)
Recordset Object (ADO)
Aliran dan Persistensi