BpcSMScriptLibrary 13
Convert an ADO Recordset to XML and back again - BPC Library ADOXMLUnit
Author: Dmitry Lifatov
Language: Delphi 7 - 2007
////////////////////////////////////////////////////////////////////////////////////////// //////// Convert an ADO Recordset to XML and back again - BPC Library ADOXMLUnit ////////////////////////////////////////////////////////////////////////////////////////// // ALL ROUTINES IN THIS LIBRARY REQUIRE MS ADO 2.5+ to be available on the system // Author: Dmitry Lifatov interface uses Classes, ADOInt; // Convert an ADO recordset into an XML string // Use: Memo1.Lines.Text:=RecordsetToXML(ADOQuery1.Recordset); function RecordsetToXML(const Recordset: _Recordset): string; // Convert a properly form XML string into an ADO recordset // Use: ADOQuery1.Recordset:=RecordsetFromXML(Memo1.Lines.Text); function RecordsetFromXML(const XML: string): _Recordset;