问：我们的网站要生成静态，需要抓取页面，我们的测试路径如下，
测试路径：
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请求时会卡死，测试请求静态文件正常，我司测试把代码转移到其它服务器运行正常，应该是系统上的某处设置有异常造成的，建议您保留数据重装一下系统盘，然后再试试,非常感谢您长期对我司的支持.由此给您带来的不便之处,敬请原谅!谢谢!
