http://www.cwl.gov.cn/kjxx/ssq/kjgg/
以下是需要的資料：
VB如何獲取資料啊？
XMLHTPP，取不到資料。
uj5u.com熱心網友回復：
可以分析javascript,也可以通過internetexplorer.application/webbrowser的documentcomplete事件來分析網頁元素.這里給你一個vbs腳本,通過處理internetexplorer.application的documentcomplete事件來取得網頁的內容:
Set ie = wscript.createobject("internetexplorer.application","ie_")
ie.navigate "http://www.cwl.gov.cn/kjxx/ssq/kjgg/"
bQuit = False
While Not bquit
wscript.sleep 1000
Wend
Sub ie_DocumentComplete(ByVal pdisp,ByRef url)
If url = "http://www.cwl.gov.cn/kjxx/ssq/kjgg/" Then
Set colElems = pdisp.document.getelementsbytagname("span")
For Each elem In colelems
If elem.classname = "rq1" Then
result = result & elem.innertext & ","
End If
Next
msgbox result
bquit = True
End If
End Sub
運行示例:
下載地址:
鏈接：https://pan.baidu.com/s/1Mp-3mbhG4ju2yXLMaTmFMA
提取碼：vuom
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/37034.html
標籤：網絡編程
上一篇：vbs檔案隱藏后，怎么顯示啊
下一篇：求助大神大佬，看一下為什么會這樣