Salvar no objeto DOM XML
Você pode salvar um Conjunto de Registros no formato XML em uma instância de um objeto DOM MSXML, conforme mostrado no seguinte código do 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.
...