以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  提取这个网页内容怎么错误了?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=191843)

--  作者:xluoping
--  发布时间:2024/5/11 12:22:00
--  提取这个网页内容怎么错误了?
Dim url As String = "甲苯酯"
Dim http As New Object
try
    url = "https://www.chemsrc.com/searchResult/" & UrlEncode(url) & "/"
    http = CreateObject("MSXML2.XMLHTTP")
    http.Open("get", url, False)
    http.send()
    url = http.responseText    
Catch exii As Exception
    
End try

--  作者:有点蓝
--  发布时间:2024/5/11 13:57:00
--  
这里不提供网站抓数据的技术支持