学步园

清空html的内容函数:

 BOOL ClearHtml()
{
 CComPtr<IHTMLDocument2> pDoc( NULL );
 if( !SUCCEEDED( GetDHtmlDocument( &pDoc ) ) )
 {
  return FALSE;
 }
 CComPtr<IHTMLElement> pElemBody( NULL );

 if( !SUCCEEDED( pDoc->get_body( &pElemBody ) ) )
 {
  return FALSE;
 }
 
 CComQIPtr<IHTMLDOMNode> pNode = pElemBody;
 if (pNode)
 {
  CComPtr<IHTMLDOMNode> pchildNode = NULL;
  CComPtr<IHTMLDOMNode> pLchildNode = NULL;
  while(SUCCEEDED(pNode->get_firstChild(&pchildNode)))
  {
   HRESULT hr = pNode->removeChild(pchildNode, &pLchildNode);
   pchildNode = NULL;
   pLchildNode = NULL;
   if(FAILED(hr))
    break;
  }            
 }
 return FALSE;
}