Listing A
Dim parser As New SaxXMLReader
Dim cntHandler As New ContentHandlerImpl

' Set the contentHandler property with the living
' instance of a class implementing the
' IContentHandler interface
Set parser.contentHandler = cntHandler

' Tell the parser to parse the specified XML document
parser.parseURL (App.Path & "\foo.xml")