DEFINE CLASS SFXMLSAXParser AS session OLEPUBLIC IMPLEMENTS IVBSAXContentHandler IN "c:\winnt\system32\msxml3.dll" PROCEDURE IVBSAXContentHandler_documentLocator() AS VARIANT; HELPSTRING "Receive an object for locating the origin of SAX document events." * add user code here ENDPROC PROCEDURE IVBSAXContentHandler_startDocument() AS VOID; HELPSTRING "Receive notification of the beginning of a document." * add user code here ENDPROC *** other code removed for brevity ENDDEFINETo use this class, use code similar to the following (where lcXML is the XML you want to parse):
local loReader as msxml2.SAXXMLReader loReader = createobject('msxml2.SAXXMLReader') loParser = createobject('SFXMLSAXParser') && this is the class created above loReader.ContentHandler = loParser loReader.Parse(lcXML)Hope this helps.