使用WebBrowser控件得到HTML源代码

使用WebBrowser控件
Dim doc, objhtml As Object
Set doc = WebBrowser1.Document
Set objhtml = doc.body.createTextRange()
RichTextBox1.Text = objhtml.htmlText
或：
WebBrowser1.Document.body.innerHTML

相关日志

WebBrowser获得浏览器信息
判断WebBrowser页面是否可以前进后退
WebBrowser 控件概述

This entry was posted on 星期四, 07月 3rd, 2008 at 9:27 am and is filed under 编　程|VisualBasic. You can follow any responses to this entry through the RSS 2.0 feed. You can leave a response, or trackback from your own site.