服务器端利用xmlhttp生成网页静态文件时假死

Equn 2009-03-07 05:28:45
Function getHTTPPage(url)
dim objXML
set objXML=server.createobject("MSXML2.XMLHTTP")'定义
objXML.open "POST",url,false'打开
objXML.send()'发送
If objXML.readystate<>4 then '判断文档是否已经解析完,以做客户端接受返回消息
exit function
End If
getHTTPPage=BytesToBstr(objXML.responseBody)'返回信息,同时用函数定义编码
set objXML=nothing'关闭
if err.number<>0 then err.Clear
End Function

使用以上函数来把动态网页转化为静态的html页面,但经常随机性的加载某个页面时假死,只有重新启动IIS才能恢复正常。
就好像是MSXML2.XMLHTTP组件被堵死了一样。

这是在windows2003的服务器端运行的。
...全文
186 8 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
搬运工865 2009-03-09
  • 打赏
  • 举报
回复
on error resume next 加一个错误处理吧~~
Equn 2009-03-09
  • 打赏
  • 举报
回复
up
Equn 2009-03-08
  • 打赏
  • 举报
回复
[Quote=引用 3 楼 ttt2 的回复:]
if err.number <>0 then err.Clear 把这句去啦,在看看有没有on error resume next语句注释掉试试
[/Quote]

调试时,注释掉on error resume next语句后。这句就无用了。
Equn 2009-03-08
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 zhuyongzhao 的回复:]
Function getHTTPPage(url)
dim objXML
set objXML=server.createobject("MSXML2.XMLHTTP")'定义
objXML.open "POST",url,false'打开
objXML.send()'发送
If objXML.readystate =4 then '判断文档是否已经解析完,以做客户端接受返回消息
if objXML.status=0 or objXML.status=200 then
getHTTPPage=BytesToBstr(objXML.responseBody)'返回信息,同时用函数定义编码

[/Quote]

一样的。
Equn 2009-03-08
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 zhuyongzhao 的回复:]
是不是服务器升级过?
[/Quote]

服务器不是我管理,不大清楚。请问是否有这种情况?使用xmlhttp访问网站假死后,整个网站打不开,必需重启IIS才行。
ttt2 2009-03-07
  • 打赏
  • 举报
回复
if err.number <>0 then err.Clear 把这句去啦,在看看有没有on error resume next语句注释掉试试
zhuyongzhao 2009-03-07
  • 打赏
  • 举报
回复
Function getHTTPPage(url)
dim objXML
set objXML=server.createobject("MSXML2.XMLHTTP")'定义
objXML.open "POST",url,false'打开
objXML.send()'发送
If objXML.readystate =4 then '判断文档是否已经解析完,以做客户端接受返回消息
if objXML.status=0 or objXML.status=200 then
getHTTPPage=BytesToBstr(objXML.responseBody)'返回信息,同时用函数定义编码
end if
else
exit function
End If

set objXML=nothing'关闭
if err.number <>0 then err.Clear
End Function
zhuyongzhao 2009-03-07
  • 打赏
  • 举报
回复
是不是服务器升级过?

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧