求好手！VB写DLL读取网页内容

2013-01-07

求高手！！VB写DLL读取网页内容。用VB6写个DLL，读取网页内容，并且返回。如读取 http://www.baidu.com/duqu.asp

求高手！！VB写DLL读取网页内容。
用VB6写个DLL，读取网页内容，并且返回。
如读取 http://www.baidu.com/duqu.asp?x1=1&x2=2&x3=3
然后这个网页会返回某一个值，DLL把它读出来，再判断
求高手，求思路（或代码）
[解决办法]

引用:

访问系统注册表错误
问题已经解决
但是经测试返回不了值
Inet1是哪一个控件呀，还需要什么操作呀

给你一个绿色版的吧。

Private Function getHtmlStr(strUrl As String) As String
    Dim XmlHttp As Object
    Set XmlHttp = CreateObject("Microsoft.XMLHTTP")
    XmlHttp.Open "GET", strUrl, False
    XmlHttp.send
    getHtmlStr = StrConv(XmlHttp.ResponseBody, vbUnicode)
    Set XmlHttp = Nothing
End Function