http://www.xzdress.com/li_/CreateHtml/Template/NewsList.asp?InfoID=3&CurPage=1&Action=two_select&2018/1/7 19:53:21在我們公司開發的環境IIS中時正常的執行,如上傳圖片所示,但是現在我同樣的測試程序放在新購買的服務器上,程序是長時間運行,不能抓取頁面,請問你們服務器做了什么設置?導致我無法正常抓取頁面,而無法生成靜態頁面
\’抓取網頁內容的函數
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
最嚴重的問題的,這個程序一旦啟動,長時間不能影響之外,還導致asp頁面無法解析,需要重啟網站才恢復正常,請你們解決一下究竟是服務器哪里設置的問題?
,服務器設置影響網站程序執行
問:抓取頁面程序一旦啟動,長時間不能響應完成,這個導致asp所有的訪問都不能解析及響應,需要重啟服務器,網站才正常,請你們解決一下究竟是服務器哪里設置的問題?西數服務器究竟設置了什么?
問:還是不行,我把抓取的源碼發給你,你在本地試下,應該是沒有問題的,我在阿里云服務器運行也沒事,你們西數的虛擬空間也沒事,為什么云服務器就不能抓取?
源碼:<%@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>無標題文檔</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) \’得到頁面內容
response.Write(HtmlBody)
response.Write(\”<br/>\”)
\’HtmlBody = UserReplace(HtmlBody) \’用戶自定義標簽
\’抓取網頁內容的函數
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
\’用于編碼轉換的函數
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
\’系統標簽-替換函數
Function SysTags(HtmlBody)
HtmlBody = Replace(HtmlBody,\”{#Sys:Url#}\”,S_IISName) \’網站域名
HtmlBody = Replace(HtmlBody,\”{#Sys:Title#}\”,S_Title) \’網站標題
HtmlBody = Replace(HtmlBody,\”{#Sys:KeyWord#}\”,S_KeyWord) \’關鍵字
HtmlBody = Replace(HtmlBody,\”{#Sys:Desc#}\”,S_Description) \’網站標題
\’ HtmlBody = Replace(HtmlBody,\”{#Sys:tongji#}\”,S_H1) \’網站統計代碼
HtmlBody = Replace(HtmlBody,\”{#Sys:Copy#}\”,S_Copy) \’頁腳版權信息
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
問:而且最嚴重的是,一旦運行上面的抓取頁面,服務器就長時間運行,所有ASP訪問都不能打開
答:您好,
服務器您擁有完全權限,可自主調整任意設置,您的需求是要抓取http://www.xzdress.com/li_/CreateHtml/Template/NewsList.asp?InfoID=3&CurPage=1&Action=two_select&2018/1/7 19:53:21 網頁的內容么,目前您用asp代碼抓取失敗,若需我們登錄服務器更進一步協助調試,代碼執行到哪里異常,請您選擇主機租用vps、云主機–>其他設置–>免費金牌服務(超出免費范圍會單獨收費)分類提交工單,非常感謝您長期對我司的支持.由此給您帶來的不便之處,敬請原諒!謝謝!
問:我的需求不是抓取頁面,而是我的程序在你們公司虛擬空間運行正常,在阿里云服務器也正常,我在本地測試也沒有問題,但是這個云服務器是我前兩天買的,但是程序到你們西數云服務器就不能運行,是你們公司的云服務器配置的問題導致我不能正常執行
答:您好,我司測試的確在執行asp請求時會卡死,測試請求靜態文件正常,我司測試把代碼轉移到其它服務器運行正常,應該是系統上的某處設置有異常造成的,建議您保留數據重裝一下系統盤,然后再試試,非常感謝您長期對我司的支持.由此給您帶來的不便之處,敬請原諒!謝謝!