// This calls the BuildTree method with m_pDocRoot as an IXMLDOMElementPtr

// Initialize root pointer
m_pDocRoot = m_plDomDocument -> documentElement;

// Delete previous tree structure
VERIFY(m_Tree.DeleteAllItems());
// Display new tree structure
HTREEITEM hxmlRoot = TVI_ROOT;
this -> BuildTree(this -> m_pDocRoot, &(this -> m_Tree), hxmlRoot);
------------------------------------------------------------------------------------------------------------
// Construct XML tree structure
void View_Tree::BuildTree(IXMLDOMNodePtr pParent, CTreeCtrl *m_Tree, HTREEITEM hParent) {

// Insert node into tree
HTREEITEM hChild;
InsertNode(pParent, m_Tree, hParent, hChild);

// Recursive call to insert each node into the tree in turn
for (IXMLDOMNodePtr pChild = pParent -> firstChild; NULL != pChild; pChild = pChild -> nextSibling) {

BuildTree(pChild, m_Tree, hChild);

}

} // End of BuildTree()
--------------------------------------------------------------------------------------------------------
// Insert specified node into tree structure
void View_Tree::InsertNode(IXMLDOMNodePtr pParent, CTreeCtrl *m_Tree, HTREEITEM hParent, HTREEITEM &hChild) {

// Leaf node
if (NODE_TEXT == pParent -> nodeType) {

// Enter child node into the tree
m_Tree -> InsertItem(pParent -> text, hParent, TVI_LAST);

// Parent node
} else {

// Enter parent node into the tree and define its children
hChild = m_Tree -> InsertItem(pParent -> nodeName, hParent, TVI_LAST);

}

} // End of InsertNode()

// TElem -- a simple class to wrap up IXMLDomElement and iterat its children.
//   name()    - in <item>stuff</item> it returns "item"
//   val()     - in <item>stuff</item> it returns "stuff"
//   attr(s)   - in <item s=L"hello">stuff</item> it returns "hello"
//   subnode(b)- in <item><a>hello</a><b>there</b></item> it returns the TElem <b>there</b>
//   subval(b) - in <item><a>hello</a><b>there</b></item> it returns "there"
//   for (TElem c=e.begin(); c!=e.end(); c++) {...} - iterators over the subnodes
struct TElem
{ 
	
  CComPtr<IXMLDOMElement> elem;
  CComPtr<IXMLDOMNodeList> nlist; int pos; long clen;
  //
  TElem() : elem(0), nlist(0), pos(-1), clen(0) {}
  TElem(int _clen) : elem(0), nlist(0), pos(-1), clen(_clen) {}
  TElem(CComPtr<IXMLDOMElement> _elem) : elem(_elem), nlist(0), pos(-1), clen(0) {get();}
  TElem(CComPtr<IXMLDOMNodeList> _nlist) : elem(0), nlist(_nlist), pos(0), clen(0) {get();}
  void get()
  { if (pos!=-1)
    { elem=0;
      CComPtr<IXMLDOMNode> inode;
      nlist->get_item(pos,&inode);
      if (inode==0) return;
      DOMNodeType type; inode->get_nodeType(&type);
      if (type!=NODE_ELEMENT) return;
      CComQIPtr<IXMLDOMElement> e(inode);
      elem=e;
    }
    clen=0; if (elem!=0)
    { CComPtr<IXMLDOMNodeList> iNodeList;
      elem->get_childNodes(&iNodeList);
      iNodeList->get_length(&clen);  
    }
  }
  //
  wstring name() const
  { if (!elem) return L"";
    CComBSTR bn; elem->get_tagName(&bn);
    return wstring(bn);
  }
  wstring attr(const wstring name) const
  { if (!elem) return L"";
    CComBSTR bname(name.c_str());
    CComVariant val(VT_EMPTY);
    elem->getAttribute(bname,&val);
    if (val.vt==VT_BSTR) return val.bstrVal;
    return L"";
  }
  bool attrBool(const wstring name,bool def) const
  { wstring a = attr(name);
    if (a==L"true" || a==L"TRUE") return true;
    else if (a==L"false" || a==L"FALSE") return false;
    else return def;
  }
  int attrInt(const wstring name, int def) const
  { wstring a = attr(name);
    int i, res=swscanf(a.c_str(),L"%i",&i);
    if (res==1) return i; else return def;
  }
  wstring val() const
  { if (!elem) return L"";
    CComVariant val(VT_EMPTY);
    elem->get_nodeTypedValue(&val);
    if (val.vt==VT_BSTR) return val.bstrVal;
    return L"";
  }
  TElem subnode(const wstring name) const
  { if (!elem) return TElem();
    for (TElem c=begin(); c!=end(); c++)
    { if (c.name()==name) return c;
    }
    return TElem();
  }
  wstring subval(const wstring name) const
  { if (!elem) return L"";
    TElem c=subnode(name);
    return c.val();
  }
  TElem begin() const
  { if (!elem) return TElem();
    CComPtr<IXMLDOMNodeList> iNodeList;
    elem->get_childNodes(&iNodeList);
    return TElem(iNodeList);
  }
  TElem end() const
  { return TElem(clen);
  }
  TElem operator++(int)
  { if (pos!=-1) {pos++; get();}
    return *this;
  }
  bool operator!=(const TElem &e) const
  { return pos!=e.clen;
  }
};