次の方法で共有


レコードセットの永続化に関する詳細情報

適用先: Access 2013、Office 2013

ADO Recordset オブジェクトは、Save メソッドを使用して、ファイルへの Recordset オブジェクトの内容の格納をサポートします。 永続的に保存されたファイルは、ローカル ドライブ、ネットワーク サーバー、または Web サイト上の URL として存在する可能性があります。 この永続化されたファイルは、 Recordset オブジェクトの Open メソッドまたは Connection オブジェクトの Execute メソッドのいずれかを使用して、後で復元できます。

さらに、GetString メソッドは、 Recordset オブジェクトを、ユーザーが指定した文字で列と行を区切った形式に変換します。

Recordset を永続化するには、まず、ファイルに格納できる形式に変換します。 Recordset オブジェクトは、Advanced Data TableGram (ADTG) という専用の形式、または公開されている拡張マークアップ言語 (XML) 形式で保存することができます。 ADTG の例を以下に示します。 XML 永続化の詳細については、「 レコードを XML 形式で保存する」を参照してください。

Save any pending changes in the persisted file. Doing this allows you to issue a query that returns a Recordset object, edits the Recordset, saves it and the pending changes, later restores the Recordset, and then updates the data source with the saved pending changes.

Stream オブジェクトを永続的に保存する方法については、第 10 章の「 ストリームと永続性」を参照してください。

Recordset の永続化の例については、「XML レコードセットを保存するシナリオ」を参照してください。

Recordset の保存

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

Recordset.Open を使用して永続化ファイルを開く

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

Recordset がアクティブな接続を持たない場合、次のように記述してすべての既定値を受け入れることもできます。

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

Connection.Execute を使用して永続化ファイルを開く

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

RDS.DataControl を使用して永続化ファイルを開く

この場合、 Server プロパティは設定されません。

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