問：抓取頁面程序一旦啟動，長時間不能響應(yīng)完成，這個導(dǎo)致asp所有的訪問都不能解析及響應(yīng)，需要重啟服務(wù)器，網(wǎng)站才正常，請你們解決一下究竟是服務(wù)器哪里設(shè)置的問題？西數(shù)服務(wù)器究竟設(shè)置了什么？
問：還是不行，我把抓取的源碼發(fā)給你，你在本地試下，應(yīng)該是沒有問題的，我在阿里云服務(wù)器運(yùn)行也沒事，你們西數(shù)的虛擬空間也沒事，為什么云服務(wù)器就不能抓?。?/p>
源碼：<%@LANGUAGE=\”VBSCRIPT\” CODEPAGE=\”65001\”%>
<!DOCTYPE html PUBLIC \”-//W3C//DTD XHTML 1.0 Transitional//EN\” \”http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\”>
<html xmlns=\”http://www.w3.org/1999/xhtml\”>
<head>
<meta http-equiv=\”Content-Type\” content=\”text/html; charset=utf-8\” />
<title>無標(biāo)題文檔</title>
</head>
<body>
<%
dim pageUrl
WebPath =Server.MapPath(\”/\”)&\”\\\”
pageUrl = \”http://www.xzdress.com/li_/CreateHtml/Template/NewsList.asp?InfoID=3&CurPage=1&Action=two_select&2018/1/7 19:53:21\”
response.Write(pageUrl)
response.Write(\”<br/>\”)
HtmlBody = getPageContent(pageUrl) \’得到頁面內(nèi)容
response.Write(HtmlBody)
response.Write(\”<br/>\”)
\’HtmlBody = UserReplace(HtmlBody) \’用戶自定義標(biāo)簽
\’抓取網(wǎng)頁內(nèi)容的函數(shù)
Function getPageContent(Url)
Set objXMLHTTP = CreateObject(\”Microsoft.XMLHTTP\”)
objXMLHTTP.Open \”Get\”, Url, False, \”\”, \”\”
objXMLHTTP.Send
getPageContent = BytesToBstr(objXMLHTTP.ResponseBody,\”utf-8\”)
Set objXMLHTTP = Nothing
End Function
\’用于編碼轉(zhuǎn)換的函數(shù)
Function BytesToBstr(body,Cset)
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
\’系統(tǒng)標(biāo)簽-替換函數(shù)
Function SysTags(HtmlBody)
HtmlBody = Replace(HtmlBody,\”{#Sys:Url#}\”,S_IISName) \’網(wǎng)站域名
HtmlBody = Replace(HtmlBody,\”{#Sys:Title#}\”,S_Title) \’網(wǎng)站標(biāo)題
HtmlBody = Replace(HtmlBody,\”{#Sys:KeyWord#}\”,S_KeyWord) \’關(guān)鍵字
HtmlBody = Replace(HtmlBody,\”{#Sys:Desc#}\”,S_Description) \’網(wǎng)站標(biāo)題
\’ HtmlBody = Replace(HtmlBody,\”{#Sys:tongji#}\”,S_H1) \’網(wǎng)站統(tǒng)計(jì)代碼
HtmlBody = Replace(HtmlBody,\”{#Sys:Copy#}\”,S_Copy) \’頁腳版權(quán)信息
HtmlBody = Replace(HtmlBody,\”{#Sys:Addr#}\”,S_Addr) \’公司地址
HtmlBody = Replace(HtmlBody,\”{#Sys:CompanyName#}\”,S_CompanyName) \’公司全稱
SysTags = HtmlBody
End Function
%>
</body>
</html>
問：抓取的頁面是
http://www.xzdress.com/li_/CreateHtml/Template/NewsList.asp?InfoID=3&CurPage=1&Action=two_select&2018/1/7 19:53:21
問：而且最嚴(yán)重的是，一旦運(yùn)行上面的抓取頁面，服務(wù)器就長時間運(yùn)行，所有ASP訪問都不能打開
答：您好，
服務(wù)器您擁有完全權(quán)限，可自主調(diào)整任意設(shè)置，您的需求是要抓取http://www.xzdress.com/li_/CreateHtml/Template/NewsList.asp?InfoID=3&CurPage=1&Action=two_select&2018/1/7 19:53:21 網(wǎng)頁的內(nèi)容么，目前您用asp代碼抓取失敗，若需我們登錄服務(wù)器更進(jìn)一步協(xié)助調(diào)試，代碼執(zhí)行到哪里異常，請您選擇主機(jī)租用vps、云主機(jī)–>其他設(shè)置–>免費(fèi)金牌服務(wù)(超出免費(fèi)范圍會單獨(dú)收費(fèi))分類提交工單,非常感謝您長期對我司的支持.由此給您帶來的不便之處,敬請?jiān)?謝謝!
問：我的需求不是抓取頁面，而是我的程序在你們公司虛擬空間運(yùn)行正常，在阿里云服務(wù)器也正常，我在本地測試也沒有問題，但是這個云服務(wù)器是我前兩天買的，但是程序到你們西數(shù)云服務(wù)器就不能運(yùn)行，是你們公司的云服務(wù)器配置的問題導(dǎo)致我不能正常執(zhí)行
答：您好，我司測試的確在執(zhí)行asp請求時會卡死，測試請求靜態(tài)文件正常，我司測試把代碼轉(zhuǎn)移到其它服務(wù)器運(yùn)行正常，應(yīng)該是系統(tǒng)上的某處設(shè)置有異常造成的，建議您保留數(shù)據(jù)重裝一下系統(tǒng)盤，然后再試試,非常感謝您長期對我司的支持.由此給您帶來的不便之處,敬請?jiān)?謝謝!
