pb中解析xml文件

我从服务器上下载xml格式文件,现在要解析它,但不知道怎么实现,试了一下,但要报错,请大家帮忙
lole_xml_document2  = CREATE oleobject
li_rc_2 = lole_xml_document2.ConnectToNewObject("Microsoft.XMLDOM")  
    IF li_rc_2 < 0 THEN
MessageBox("Connecting  to  COM  Object  Failed",  "Error:  "  +  String(li_rc_2))  
        DESTROY  lole_xml_document2
    else
lole_xml_document2.async = False
        lole_xml_document2.loadXML(lsResponse)
    end if

    if (lole_xml_document2.parseError.errorCode) < 0 then
messagebox("","读取数据源发生错误")
    else
integer recordCount = 0
integer i = 0
rootNode = lole_xml_document2.documentElement()
if rootNode.baseName <> "download_bmk" then
    messagebox("",'数据错误！')
end if

        nodeList = rootNode.childNodes
        for i = 0 To nodeList.length - 1
    currNode = nodeList.nextNode
    if currNode.baseName='multitable' then

if GetTableName(currNode)='t_bmk' then

end if
    end if
next
    end if