如何获取IE (控件)的所有链接（包括Frameset, iframe）

清泛网

来源：新浪博客

IE 顶层 body 节点通过IHTMLElement->get_all 方法无法获取iframe 里面的节点列表：

1. CComPtr<IHTMLElement> body;
   
2. ...
   
3. CComPtr<IDispatch> spDispCollection;
   
4. body->get_all(&spDispCollection);

复制代码

所以要获取iframe/frame(frameset) 里面的节点列表的话, 则需要根据body/doc 找到frames, 然后从frames -> IHTMLWindow2 -> IHTMLDocument2 . 主要有2个方法, 下面是代码片段
方法一：

1. IHTMLDocument2 *pDoc = 浏览器的Document(IWebBrowser2->IDispatch->IHTMLDocument2);
   
2. IHTMLWindow2 *pHTMLWnd = NULL;
   
3. IHTMLDocument2 *pFrameDoc=NULL;
   
4. IHTMLFramesCollection2 *pFramesCollection=NULL;
   
5. LPDISPATCH lpDispatch;
   
6. 
   
7. long p;
   
8. VARIANT varindex,varresult;
   
9. varresult.vt=VT_DISPATCH;
   
10. varindex.vt = VT_I4;
    
11. if(pDoc!=NULL)
    
12. {
    
13.      HRESULT hr=pDoc->get_frames(&pFramesCollection);
    
14.     if(SUCCEEDED(hr)&&pFramesCollection!=NULL)
    
15.      {
    
16.          hr=pFramesCollection->get_length(&p);
    
17.         if(SUCCEEDED(hr))
    
18.             for(int i=0; i<p; i++)
    
19.              {
    
20.                  varindex.lVal = i;
    
21.                 if(pFramesCollection->item(&varindex, &varresult) ==S_OK)
    
22.                  {
    
23.                      lpDispatch=(LPDISPATCH)varresult.ppdispVal;
    
24.                     if (SUCCEEDED(lpDispatch->QueryInterface(IID_IHTMLWindow2, (LPVOID *)&pHTMLWnd)))
    
25.                      {
    
26.                         if(SUCCEEDED(pHTMLWnd->get_document( &pFrameDoc)))
    
27.                          {
    
28.                             //work with the pFrameDoc获取IE (控件)的所有链接(包括Frameset, iframe) - . - Welcome to the hell
    
29.                          }
    
30.                          pHTMLWnd->Release();
    
31.                          pHTMLWnd=NULL;
    
32.                      }
    
33.                  }
    
34.              }
    
35.              pFramesCollection->Release();
    
36.      }
    
37.      pDoc->Release();
    
38. }

复制代码

方法二：

1. CComQIPtr<IHTMLElement> pElem = ; // 可以递归上面的 CComPtr<IDispatch> spDispCollectio 来得到
   
2. CComBSTR bstrTagName;
   
3. pElem->get_tagName(&bstrTagName);
   
4. if ( lstrcmpiW(L"IFRAME", bstrTagName)==0 ||
   
5.          lstrcmpiW(L"FRAME", bstrTagName)==0 )
   
6. {
   
7.      CComQIPtr<IHTMLFrameBase2>     _framebase2;
   
8.      CComPtr<IHTMLWindow2>         _framewindow;
   
9.      CComPtr<IHTMLDocument2>         _framedoc;
   
10.    
    
11.     if( (_framebase2 = spItem)
    
12.         && SUCCEEDED( _framebase2->get_contentWindow(&_framewindow) ) && _framewindow!=NULL
    
13.         && SUCCEEDED( _framewindow->get_document(&_framedoc) ) && _framedoc!=NULL )
    
14.      {
    
15.         // 对 _framedoc 节点进行处理
    
16.      }
    
17. }

复制代码

iframe 跨域访问(cross frame)   zz from : http://codecentrix.blogspot.com/ ... cument-returns.html
由于安全性限制, 为防止跨域脚本攻击, 当frames 跨域的时候, IHTMLWindow2::get_document 调用将返回 E_ACCESSDENIED .
下面函数 HtmlWindowToHtmlDocument 对于跨域的frame 通过 IHTMLWindow2 -> IID_IWebBrowserApp -> IHTMLWindow2 绕过了限制。

1. // Converts a IHTMLWindow2 object to a IHTMLDocument2. Returns NULL in case of failure.
   
2. // It takes into account accessing the DOM across frames loaded from different domains.
   
3. CComQIPtr<IHTMLDocument2> HtmlWindowToHtmlDocument(CComQIPtr<IHTMLWindow2> spWindow)
   
4. {
   
5.       ATLASSERT(spWindow != NULL);
   
6. 
   
7.       CComQIPtr<IHTMLDocument2> spDocument;
   
8.       HRESULT hRes = spWindow->get_document(&spDocument);
   
9.    
   
10.      if ((S_OK == hRes) && (spDocument != NULL))
    
11.       {
    
12.           // The html document was properly retrieved.
    
13.           return spDocument;
    
14.       }
    
15. 
    
16.      // hRes could be E_ACCESSDENIED that means a security restriction that
    
17.      // prevents scripting across frames that loads documents from different internet domains.
    
18.       CComQIPtr<IWebBrowser2>   spBrws = HtmlWindowToHtmlWebBrowser(spWindow);
    
19.      if (spBrws == NULL)
    
20.       {
    
21.           return CComQIPtr<IHTMLDocument2>();
    
22.       }
    
23. 
    
24.      // Get the document object from the IWebBrowser2 object.
    
25.       CComQIPtr<IDispatch> spDisp;
    
26.       hRes = spBrws->get_Document(&spDisp);
    
27.       spDocument = spDisp;
    
28. 
    
29.      return spDocument;
    
30. }
    
31. 
    
32. 
    
33. // Converts a IHTMLWindow2 object to a IWebBrowser2. Returns NULL in case of failure.
    
34. CComQIPtr<IWebBrowser2> HtmlWindowToHtmlWebBrowser(CComQIPtr<IHTMLWindow2> spWindow)
    
35. {
    
36.       ATLASSERT(spWindow != NULL);
    
37. 
    
38.       CComQIPtr<IServiceProvider>   spServiceProvider = spWindow;
    
39.      if (spServiceProvider == NULL)
    
40.       {
    
41.           return CComQIPtr<IWebBrowser2>();
    
42.       }
    
43. 
    
44.       CComQIPtr<IWebBrowser2> spWebBrws;
    
45.       HRESULT hRes = spServiceProvider->QueryService(IID_IWebBrowserApp, IID_IWebBrowser2, (void**)&spWebBrws);
    
46.      if (hRes != S_OK)
    
47.       {
    
48.           return CComQIPtr<IWebBrowser2>();
    
49.       }
    
50. 
    
51.      return spWebBrws;
    
52. }

复制代码