生贴：Edanmo 的olelib.lib组件 与webbrowser 配合得到IFAME源码！！！
估计知道的人不多，我也授了半天，找不到资料，
http://www.mvps.org/emorcillo/download/vb6/tl_ole.zip 这是组件下载地址

有牛人是写出来过，这是实现的成果图，哎，我就是实现不行，不知道CSDN里有人能解不，不能回来也来顶，顶起也有分，一年不回，两年不回，我等三年~开玩笑


[解决办法]
用不着那么复杂

[code=VB]

Dim objDoc As MSHTML.HTMLDocument
Dim tmpDoc As MSHTML.HTMLDocument
Dim objFrame As MSHTML.HTMLFrameElement
'取浏览器的文档接口
Set tmpDoc = Webbrowser.document
'枚举所有框架
For Each objFrame In tmpDoc.frames
'获取该框架的文档
Set objDoc = objFrame.document
'获取该框架文档的HTML代码
Debug.Print objDoc.body.outerHTML

Set objDoc = Nothing
Next
Set tmpDoc = Nothing

[code]