用VB怎么读取网站的HTML代码?

来源:百度知道 编辑:UC知道 时间:2024/05/26 01:22:21
我用Inet1.OpenURL 试过了,但是返回的数据只是网页的一部分,不知道还有没有其它的方法?

这是我用Inet1.OpenURL写的
Inet1.Cancel
Inet1.Protocol = icHTTP
Inet1.URL = "http://d.baidu.com/rs.php?q=" + baidukey
string1 = " "
string1 = Inet1.OpenURL

Text1.Text = string1
inet1只能显示部分代码,超过一定长度就不行了,好象是12K或者是64K

Dim urlstr$
urlstr = "http://www.sina.com"

Text1= Inet1.OpenURL(urlstr)

用个按扭来实现吧。
部件你应该是添加了吧。
代码如下:
Private Sub Command1_Click()
Text1.Text = Inet1.OpenURL("mail.163.com", icString)
End Sub