oRecordset = NewObject("adodb.recordset") oConnection = NewObject("adodb.connection") oStream = NewObject("adodb.stream") xDOM = NEWOBJECT('MSXML.DOMDocument') With oConnection .ConnectionString = 'Provider=SQLOLEDB.1;User Id=sa;Data Source=cetin\cetin;Trusted_connection=Yes' .Open Endwith oRecordset.Open("SELECT * from pubs.dbo.titles", oConnection ) *Works too *oRecordSet.Save(oStream, 1) *XMLTOCURSOR(oStream.ReadText, "MyCursorName", 1028) oRecordSet.Save(xdom, 1) XMLTOCURSOR(xdom.xml, "MyCursorName", 1028) SELECT MyCursorName browseCetin