問(wèn):ASP調(diào)用 WinHttp.WinHttpRequest.5.1遠(yuǎn)程抓取https://www.chixiao123.com,之前一年都一直好好的,昨天開(kāi)始突然無(wú)法用了。是不是組件出問(wèn)題了呢,網(wǎng)站程序功能突然這兩天無(wú)法使用了
答:您好,遠(yuǎn)程抓取的方法麻煩詳細(xì)說(shuō)明下,并提供下相關(guān)信息,以便我司核實(shí),非常感謝您長(zhǎng)期對(duì)我司的支持!
問(wèn):寫(xiě)了一個(gè)問(wèn)題案例http://www.jiaoyugu.com/0.asphttp://www.hnsyyczp.com/0.asp相同的文件代碼,放在不同空間,發(fā)現(xiàn)放在B007型號(hào)不行
問(wèn):<%
Function GetHttpPage(HttpUrl,Cset)
Dim Http
Set Http=server.createobject(\”WinHttp.WinHttpRequest.5.1\”)
Http.Option(6)=0
Http.SetTimeouts 65000, 65000, 65000, 65000
Http.open \”GET\”,HttpUrl,False
\’Http.setRequestHeader \”ACCEPT-LANGUAGE\”,\”zh-CN\”
\’Http.setRequestHeader \”USER-AGENT\”,getAgent()
Http.Send()
GetHTTPPage=bytesToBSTR(Http.responseBody,Cset)
Set Http=Nothing
End Function
Function BytesToBstr(Body,Cset)
Dim Objstream
Set Objstream = Server.CreateObject(\”adodb.stream\”)
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function
response.write GetHttpPage(\”https://www.chixiao123.com/api/webupdate.asp?action=updateinfo&updateurl=&type=cxcms&siteVersion=\”,\”utf-8\”)
%>
問(wèn):這個(gè)代碼還放在有阿里云的空間,這兩天發(fā)現(xiàn)也不行了。問(wèn)題應(yīng)該是出現(xiàn)在西部數(shù)碼www.chixiao123.com的空間上,但是為什么有的空間可以,有的又不行呢
答:您好,測(cè)試抓取http正常的,但有的抓https也正常,目前排查不到問(wèn)題原因。
問(wèn):能不能給我重新部署下SSL試試呢,因?yàn)樾薷哪莻€(gè)接口,有幾百個(gè)網(wǎng)站呢
答:您好,這邊幫您換了一個(gè)ssl節(jié)點(diǎn),稍等20分鐘左右測(cè)試下,如還是存在問(wèn)題您再反饋給我司,非常感謝您長(zhǎng)期對(duì)我司的支持!
問(wèn):http://www.jiaoyugu.com/0.asp還是不行
答:您好,核實(shí)到是程序存在問(wèn)題,需要調(diào)整下程序代碼,非常感謝您長(zhǎng)期對(duì)我司的支持!
問(wèn):能告知下是調(diào)整哪里嗎?之前用了一兩年了都沒(méi)出現(xiàn)這種情況。
答:您好,服務(wù)器沒(méi)有調(diào)整什么的,這邊也聯(lián)系資深技術(shù)核實(shí)了不是服務(wù)器問(wèn)題,核實(shí)是程序有問(wèn)題,需要調(diào)整下程序,非常感謝您長(zhǎng)期對(duì)我司的支持!