用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
这是我用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