曾經有一段時間我用以下VBA程式能訪問到這個“http://xueqiu.com/cubes/rebalancing/history.json?cube_symbol=ZH651290&count=20&page=1”網站的資料。代碼如下：
With CreateObject("MSXML2.serverXMLHTTP")
.Open "post", "http://xueqiu.com/cubes/rebalancing/history.json?cube_symbol=" & ws1.Cells(1, 8) & "&count=20&page=1", False
.Send
While .readystate <> 4
DoEvents
Wend
web_content = .responseText
End With//////////////////但是現在訪問卻只得到“403 Forbidden. Your IP Address: 112.82.160.** .”
而我用瀏覽器輸入網址還是能回傳資料“{"count":20,"page":1,"totalCount":813,"list":。。。后面的省略了。”
這是什么情況呢？難道網站能監測出我訪問它的方式，阻止我用程式訪問，請求高人指點。
uj5u.com熱心網友回復：
工具、選項、安全性、宏安全性、安全級：低、確定。試試看。
uj5u.com熱心網友回復：
工具、選項、安全性、宏安全性、可靠發行商、信任對于“Visual Basic 專案”的訪問。試試看。
uj5u.com熱心網友回復：
不是宏的問題， 運行其它宏軟體正常。 我程式采集新浪網頁資料無任何問題uj5u.com熱心網友回復：
這個是用XMLHTTP的他的訪問格式是和普通的不一樣的
因為沒有一些瀏覽器資訊的
所以服務器可以很容易的辨別出來
你可以自己偽造瀏覽器資訊
或者直接用WEBBROWER來采集
uj5u.com熱心網友回復：
我登錄了下你這個網頁發現錯誤
{"error_description":"遇到錯誤，請重繪頁面或者重新登錄帳號后再試","error_uri":"/cubes/rebalancing/history.json","error_code":"400016"}
你給個能用的我給你看下
估計是要模擬瀏覽器的refer
uj5u.com熱心網友回復：
有些網站是不支持非網頁訪問的，那就要模擬添加一些HEADER,參考頁,UA等轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/68608.html
標籤：網絡編程
上一篇：VB 如何使用Inet控制元件 Post方式上傳檔案？
下一篇：做一個access錄入界面