获得WebBrowser控件中的HTML源码

    这里介绍如何用程序的方法获得WebBrowser控件中的HTML的源代码，并可以通过修改源代码内容来修改页面内容(注意:不是显示一个新的页面)。 

首先要加入WebBrowser控件，加入控件的方面我就不说了。获得源代码方法有两种： 

一、方法1（严格说，这个方法只不过是调用WebBrowser自己的菜单命令"查看源文件而已"，并非我们所希望的）

关键代码：

#include "mshtmcid.h" void CHtmlView::OnMethod1()  { CWnd* pWnd = NULL;  CWnd* pWndShell = m_browser.GetWindow(GW_CHILD); // get the webbrowser window pointer if (pWndShell)  {  pWnd = pWndShell->GetWindow(GW_CHILD); //get the child window pointer }  if (pWnd != NULL)  {  WPARAM wParam = MAKEWPARAM(IDM_VIEWSOURCE, 1); //convert to unsigned 32 bit value and pass it to wparam pWnd->SendMessage(WM_COMMAND, wParam, (LPARAM)this->m_hWnd); //cool send a message to retreive the source. }  }

二、方法2 

原理在于取得IPersistStreamInit接口指针，然后把网页写到IStream流中去。

关键代码：

#include "mshtml.h" //在SourceView中填写HtmlView中网页的源程序 void CMainFrame::OnMethod2()  { IHTMLDocument2 *pHTMLDocument=NULL; IPersistStreamInit *pPSI=NULL; IStream *pStream=NULL;  HGLOBAL hHTMLText;  if (!(pHTMLDocument = (IHTMLDocument2*)m_pHtmlView->m_browser.GetDocument())) return; if (FAILED(pHTMLDocument->QueryInterface(&pPSI))) { // pHTMLDocument->Release(); return; }  hHTMLText = GlobalAlloc(GMEM_FIXED, MAX_SIZE); CreateStreamOnHGlobal(hHTMLText, TRUE, &pStream);  pPSI->Save(pStream, FALSE);  // m_pSourceView->SetWindowText((char*)hHTMLText); long nEditLength = m_pSourceView->GetEditCtrl().GetWindowTextLength(); m_pSourceView->GetEditCtrl().SetSel(0, nEditLength); m_pSourceView->GetEditCtrl().ReplaceSel(""); char *pText = (char*)hHTMLText; long lHtmlLength = strlen(pText); CString str(""); long n = 0; for (long i=0; i < lHtmlLength; i++) { if (*pText != 0x0d && *pText != 0x0a) { str += *pText; pText++; } else { pText++; if (*pText == 0x0a) pText++; str += "\r\n"; nEditLength = m_pSourceView->GetEditCtrl().GetWindowTextLength(); m_pSourceView->GetEditCtrl().SetSel(nEditLength, nEditLength); m_pSourceView->GetEditCtrl().ReplaceSel(str); str.Empty(); } } pStream->Release(); pPSI->Release(); // pHTMLDocument->Release(); }

三、修改HTML源代码以改变网页的显示 

这部分比较有意思，可以当作是一个小的HTML编辑器，看看预演效果。特别的不是显示一个新文件，而是修改原来的HTML文件。

关键代码：

//根据SourceView里的HTML文本改变HtmlView里的显示 void CMainFrame::OnChangehtml()  { IHTMLDocument2 *pHTMLDocument=NULL; IPersistStreamInit *pPSI=NULL; IStream *pStream=NULL;  HGLOBAL hHTMLText;  if (!(pHTMLDocument = (IHTMLDocument2*)m_pHtmlView->m_browser.GetDocument())) return; if (FAILED(pHTMLDocument->QueryInterface(&pPSI))) { // pHTMLDocument->Release(); return; }  pHTMLDocument->clear(); pPSI->InitNew(); LPCTSTR strText = m_pSourceView->LockBuffer(); DWORD dwLength = strlen(strText); hHTMLText = GlobalAlloc(GMEM_FIXED, dwLength); memset(hHTMLText, 0, dwLength); memcpy(hHTMLText, strText, dwLength); m_pSourceView->UnlockBuffer(); CreateStreamOnHGlobal(hHTMLText, TRUE, &pStream);  ULARGE_INTEGER libNewSize; libNewSize.QuadPart = dwLength; pStream->SetSize(libNewSize);这一步必须要，否则显示时会有多余字符出现 pPSI->Load(pStream);  pStream->Release(); pPSI->Release();  // pHTMLDocument->Release(); }

有时侯不能显示出网页而显示的是源码文本，比如微软网站的首页就是这种情况。把源码中的这句话 < META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso8859-1" />去掉就可以了。

原文转自：http://www.ltesting.net