Selengkapnya Tentang Persistensi Perangkat Rekam

Artikel
06/02/2023

Objek ADO Recordset mendukung penyimpanan konten objek Recordset dalam file dengan menggunakan metode Simpan . File yang disimpan secara persisten mungkin ada di drive lokal, server, atau sebagai URL pada situs Web. Nantinya, file dapat dipulihkan dengan metode Buka objek Recordset atau metode Jalankan objek Koneksi .

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

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

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

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

Untuk contoh persistensi Recordset , lihat Skenario Persistensi Recordset XML.

Contoh

Simpan Recordset:

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

Buka file yang bertahan 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 bisa menerima semua default dan kode berikut:

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

Buka file yang bertahan 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 bertahan 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)
Objek Recordset (ADO)
Aliran dan Persistensi

Bagikan melalui