set xml = server.CreateObject("Microsoft.XMLDOM") xml.async = "false" xml.load(server.MapPath("/Contract/tree/ContractDraftOut.xml")) set nodelist = xml.documentElement.selectNodes("//root/entity") For i=0 To (nodelist.Length-1) name=nodelist.Item(i).getAttribute("className") classid=nodelist.Item(i).getAttribute("classId") NList=NList&" <node className="""&trim(name)&""" classId="""&classid&""" url="""&baseurl&"Contract/ContractCN_List.asp?ClassID="&classid&""">"&vbcrlf set childlist = xml.documentElement.selectNodes("//root/entity[@classId="""&classid&"""]/entity") For j=0 To (childlist.Length-1) name1=childlist.Item(j).getAttribute("className") classid1=childlist.Item(j).getAttribute("classId") NList=NList&" <node className="""&trim(name1)&""" classId="""&classid1&""" url="""&baseurl&"Contract/ContractCN_List.asp?ClassID="&classid1&""" />"&vbcrlf Next NList=NList&" </node>"&vbcrlf Next set xml = nothing