此代码适用于IE8及更早版本。对于IE9,似乎IPersistStreamInit :: Save()返回E_NOTIMPL。非常感谢任何帮助!
HRESULT CHtmlCtrl::GetDocumentHTML(CString& strHTML) const
{
HRESULT hr = E_NOINTERFACE;
CComPtr<IHTMLDocument2> spHTMLDocument;
GetHtmlDocument()->QueryInterface(IID_IHTMLDocument2, (LPVOID*)&spHTMLDocument);
if (spHTMLDocument)
{
CComQIPtr<IPersistStreamInit> spPSI;
spPSI = spHTMLDocument;
if (spPSI)
{
CStreamOnCString stream;
hr = spPSI->Save(static_cast<IStream*>(&stream), FALSE);
if (hr == S_OK)
{
if (!stream.CopyData(strHTML))
hr = E_OUTOFMEMORY;
}
}
}
return hr;
}