通过

保存到 XML DOM 对象

适用于：Access 2013、Office 2013

保存到 XML DOM 对象

可以将 Recordset 以 XML 格式保存到 MSXML DOM 对象实例中，如以下 Visual Basic 代码所示：

 
Dim xDOM As New MSXML.DOMDocument 
Dim rsXML As New ADODB.Recordset 
Dim sSQL As String, sConn As String 
     
sSQL = "SELECT customerid, companyname, contactname FROM customers" 
sConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Program Files" & _ 
        "\Common Files\System\msadc\samples\NWind.mdb" 
rsXML.Open sSQL, sConn 
rsXML.Save xDOM, adPersistADO   'Save Recordset directly into a DOM tree. 
...