如何从VB的WebBrowser控件中获取网页文字

日期:2016-04-18 04:07:59 人气:1

如何从VB的WebBrowser控件中获取网页文字

Function HtmlStr$(Url$) '提取网页源码函数 Dim XmlHttp Set XmlHttp = CreateObject("Microsoft.XMLHTTP") XmlHttp.Open "GET", Url, False XmlHttp.send If XmlHttp.ReadyState = 4 Then HtmlStr = StrConv(XmlHttp.ResponseBody, vbUnicode) Set XmlHttp
    A+
热门评论