很奇怪的问题,第一次见~~~~~~~~~~

linj 2002-08-16 12:21:17
我打开一个ASP页面,却抱这种错:
错误类型:
Active Server Pages, ASP 0115 (0x80004005)
外部对象中发生一个可捕捉的错误(C0000005)。脚本无法继续执行。
/syslog/syslog.asp

这是什么意思?
...全文
44 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
freezwy 2002-08-16
  • 打赏
  • 举报
回复
一般是你的脚本没有结束或者出现类型错误。
linj 2002-08-16
  • 打赏
  • 举报
回复
<table border="0" cellpadding="0" cellspacing="0" bgcolor="#ECEAE6" class="font12">
<tr>
<td align="right" valign="bottom"><table width="66" border="0" cellpadding="0" cellspacing="0" bgcolor="#ECEAE6" class="littlefont" >
<tr>
<td height="60" align="right" valign="top">
<%if mark1=0 then
else
response.write mark1%>-
<%end if%></td>
</tr>
<tr>
<td height="66" align="right" valign="top">
<%if mark1=0 then
else
response.write mark1/2%>-
<%end if%>
</td>
</tr>
<tr>
<td height="6" valign="top" bgcolor="#ECEAE6"></td>
</tr>
</table></td>
<td valign="bottom"><table border="0" cellpadding="0" cellspacing="0" class="font12">
<tr>
<td> </td>
<td><img src="../../images/icon/table/arrow1.gif" width="5" height="22"></td>
<td valign="bottom">当前流量(单位:bits/s)</td>
</tr>
<tr>
<td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> </tr>
</table></td>
<td valign="bottom" background="../../images/icon/table/vlinebg.gif"><table width="100%" height="18" border="0" cellpadding="0" cellspacing="0" bordercolor="#ECEAE6">
<tr>
<td valign="bottom"><img src="../../images/icon/table/blocka.gif" width="5" height="6"></td>
</tr>
</table></td>
<td height="120" valign="bottom" background="../../images/icon/table/bgline.gif" >
<table border="0" cellspacing="0" cellpadding="0">
<tr valign="bottom">
<%
for i=0 to 59
currate=array1(i)
if mark1=0 then
currate1=0
else
currate1=currate/mark1*120
end if
%>
<td><table border="0" cellpadding="0" cellspacing="0" >
<tr>
<td width="8" align="center" valign="bottom" class="bottomlineblack">
<img src="../../images/column.gif" alt="<%if currate=0.0 then response.write "不可用" else response.write changecurrate(currate) end if%>" width="8" height="<%=currate1%>" border="0"></td>
</tr>
<tr>
<td height="5" align="center" valign="top" ><%if i=0 or i=14 or i=29 or i=44 or i=59 then%><img src="../../images/icon/table/dot3.gif" width="1" height="3"><%end if%></td>
</tr>
</table></td>
<%next%>
</tr>
</table></td>
</tr>
</table></td>
<td width="32" valign="bottom"><img src="../../images/icon/table/arrow2a.gif" width="32" height="8"></td>
<td valign="bottom">时间</td>
</tr>
</table>

<table width="600" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table border="0" cellpadding="0" cellspacing="0" class="littlefont">
<tr>
<td width="40"> </td>
<td width="80"><%=changedate11(time0)%></td>
<td width="42"> </td>
<td width="80"><%=changedate11(dateadd("s",-15*interval,time0))%></td>
<td width="40"> </td>
<td width="80"><%=changedate11(dateadd("s",-30*interval,time0))%></td>
<td width="40"> </td>
<td width="80"><%=changedate11(dateadd("s",-45*interval,time0))%></td>
<td width="40"> </td>
<td width="80"><%=changedate11(dateadd("s",-60*interval,time0))%></td>
</tr>
</table></td>
</tr>
</table>

<table width="100%" border="1">
<tr>
<td width="45%"><form name="form1" method="post" action="syslog.asp?interval=<%=interval%>">
请选择查看的年和月:
<%
yselect=yselect*1
howyear=cint(year(now()))
%>
<script language="JavaScript">
var date1=new Date();
var y=date1.getFullYear();
document.write("<select name='yselect'");
document.write("<option value='"+(y-5)+"'<%if yselect=year(datetime1) then%> selected<%end if%>>"+(y-5)+"年</option>");
document.write("<option value='"+(y-4)+"'<%if yselect=(howyear-4) then%> selected<%end if%>>"+(y-4)+"年</option>");
document.write("<option value='"+(y-3)+"'<%if yselect=(howyear-3) then%> selected<%end if%>>"+(y-3)+"年</option>");
document.write("<option value='"+(y-2)+"'<%if yselect=(howyear-2) then%> selected<%end if%>>"+(y-2)+"年</option>");
document.write("<option value='"+(y-1)+"'<%if yselect=(howyear-1) then%> selected<%end if%>>"+(y-1)+"年</option>");
document.write("<option value='"+y+"'<%if yselect=howyear then%> selected<%end if%>>"+y+"年</option>");
document.write("</select>");
</script>

待续~~~~~~~~~~~~
linj 2002-08-16
  • 打赏
  • 举报
回复
这是下一段~~~~

<table border="0" cellpadding="0" cellspacing="0" bgcolor="#ECEAE6" class="font12">
<tr>
<td align="right" valign="bottom"><table width="66" border="0" cellpadding="0" cellspacing="0" bgcolor="#ECEAE6" class="littlefont" >
<tr>
<td height="60" align="right" valign="top">
<%if mark=0 then
else
response.write mark%>-
<%end if%></td>
</tr>
<tr>
<td height="66" align="right" valign="top">
<%if mark=0 then
else
response.write formatnumber(mark/2,0)%>-
<%end if%></td>
</tr>
<tr>
<td height="6" valign="top" bgcolor="#ECEAE6"></td>
</tr>
</table></td>
<td valign="bottom"><table border="0" cellpadding="0" cellspacing="0" class="font12">
<tr>
<td> </td>
<td><img src="../../images/icon/table/arrow1.gif" width="5" height="22"></td>
<td valign="bottom">当前连接数(单位:人)</td>
</tr>
<tr>
<td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> </tr>
</table></td>
<td valign="bottom" background="../../images/icon/table/vlinebg.gif"><table width="100%" height="18" border="0" cellpadding="0" cellspacing="0" bordercolor="#ECEAE6">
<tr>
<td valign="bottom"><img src="../../images/icon/table/blocka.gif" width="5" height="6"></td>
</tr>
</table></td>
<td height="120" valign="bottom" background="../../images/icon/table/bgline.gif" >
<table border="0" cellspacing="0" cellpadding="0">
<tr valign="bottom">
<%
for i=0 to 59
if array(i)<>0.0 and array(i)<>0 then '判断是否可用
curcon=formatnumber(array(i),0) '取整
end if
'response.write array(1)
if mark=0 then
curcon1=0
else
curcon1=curcon/mark*120
end if
%>
<td><table border="0" cellpadding="0" cellspacing="0" >
<tr>
<td width="8" align="center" valign="bottom" class="bottomlineblack">
<img src="../../images/column.gif" alt="<%if curcon=0.0 then response.write "不可用" else response.write curcon end if%>" width="8" height="<%=curcon1%>" border="0"></td>
</tr>
<tr>
<td height="5" align="center" valign="top" ><%if i=0 or i=14 or i=29 or i=44 or i=59 then%><img src="../../images/icon/table/dot3.gif" width="1" height="3"><%end if%></td>
</tr>
</table></td>
<%next%>
</tr>
</table></td>
</tr>
</table></td>
<td width="32" valign="bottom"><img src="../../images/icon/table/arrow2a.gif" width="32" height="8"></td>
<td valign="bottom">时间</td>
</tr>
</table>

<table width="600" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table border="0" cellpadding="0" cellspacing="0" class="littlefont">
<tr>
<td width="40"> </td>
<td width="80"><%=changedate11(time0)%></td>
<td width="42"> </td>
<td width="80"><%=changedate11(dateadd("s",-15*interval,time0))%></td>
<td width="40"> </td>
<td width="80"><%=changedate11(dateadd("s",-30*interval,time0))%></td>
<td width="40"> </td>
<td width="80"><%=changedate11(dateadd("s",-45*interval,time0))%></td>
<td width="40"> </td>
<td width="80"><%=changedate11(dateadd("s",-60*interval,time0))%></td>
</tr>
</table></td>
</tr>
</table>

linj 2002-08-16
  • 打赏
  • 举报
回复
谢谢,可是我看了上面的文章还是不知道什么错误,我把源码帖过来,请大家帮忙看看~~~~~~~

<!--#include file="conn.asp"-->
<!--#include file="../../checkdata.asp"-->
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../../images/css.css" rel="stylesheet" type="text/css">
</head>
<body>
<%
if session("type")="admin" or session("type")="writesys" or session("type")="readsys" then
hutuitime=request("hutuitime")
if hutuitime<>"" then
time0=hutuitime
yselect=year(time0)
mselect=right("0"&month(time0),2)
else
yselect=request("yselect")
mselect=request("mselect")
if yselect="" or mselect="" then
time0=now() '显示记录的起始时间
yselect=year(time0)
mselect=right("0"&month(time0),2)
else
time0=yselect&"-"&mselect&"-"&"31 23:59:59"
end if
end if
interval=request("interval") '时间间隔
if interval="" then
interval=60
end if
dim array(59),array1(59)
dim mark,mark1
mark=0 '记录总连接数的最大值
mark1=0 '记录总流量的最大值
set rs=server.CreateObject("adodb.recordset")
for i=0 to 59
if i=0 then
time1=time0
time2=dateadd("s",-interval,time1)
else
time1=dateadd("s",-i*interval,time0)
time2=dateadd("s",-interval,time1)
end if
time1=replace(time1," ","|")
time1=changedata3(time1) '终止时间
time2=replace(time2," ","|")
time2=changedata3(time2) '起始时间
sql="select sysstatflowlog_tolcon,sysstatflowlog_tolrate,sysstatflowlog_starttime,sysstatflowlog_stoptime from tb_sysstatflowlog where sysstatflowlog_stoptime<='ts_"&time1&"'or sysstatflowlog_starttime>='ts_"&time2&"'"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
array(i)=0.0 '标记是否有记录
array1(i)=0.0 '标记是否有记录
else
while not rs.eof
rstime1=rs("sysstatflowlog_stoptime") '记录的终止时间
rstime2=rs("sysstatflowlog_starttime") '记录的起始时间
time1=right(time1,(len(time1)-3)) '去掉前面的前缀ts_
time2=right(time2,(len(time2)-3))
rstime1=right(rstime1,(len(rstime1)-3))
rstime2=right(rstime2,(len(rstime2)-3))
if rstime1<=time1 and rstime2>=time2 then '记录完全包含在时间段里,则可简单相加
array(i)=array(i)+right(rs("sysstatflowlog_tolcon"),(len(rs("sysstatflowlog_tolcon"))-3))*1
array1(i)=array1(i)+right(rs("sysstatflowlog_tolrate"),(len(rs("sysstatflowlog_tolrate"))-3))*1
elseif rstime1<time1 and rstime<time2 then '终止时间符合要求,但起始时间不符合
time2=replace(time2,"|"," ") '化成时间格式好记算时间差
rstime1=replace(rstime1,"|"," ")
rstime2=replace(rstime2,"|"," ")
v1=datediff("s",time2,rstime1)
v2=datediff("s",rstime2,rstime1)
v=v1/v2
array(i)=array(i)+right(rs("sysstatflowlog_tolcon"),(len(rs("sysstatflowlog_tolcon"))-3))*1*v
array1(i)=array1(i)+right(rs("sysstatflowlog_tolrate"),(len(rs("sysstatflowlog_tolrate"))-3))*1*v
elseif rstime1>time1 and rstime2>time2 then '终止时间不符合要求,但起始时间符合
time1=replace(time1,"|"," ")
rstime1=replace(rstime1,"|"," ")
rstime2=replace(rstime2,"|"," ")
v1=datediff("s",rstime2,time1)
v2=datediff("s",rstime2,rstime1)
v=v1/v2
array(i)=array(i)+right(rs("sysstatflowlog_tolcon"),(len(rs("sysstatflowlog_tolcon"))-3))*1*v
array1(i)=array1(i)+right(rs("sysstatflowlog_tolrate"),(len(rs("sysstatflowlog_tolrate"))-3))*1*v
elseif rstime2<time2 and rstime1>rstime1 then '记录集时间包含了要求时间段
time1=replace(time1,"|"," ")
time2=replace(time2,"|"," ")
rstime1=replace(rstime1,"|"," ")
rstime2=replace(rstime2,"|"," ")
v1=datediff("s",time2,time1)
v2=datediff("s",rstime2,rstime1)
v=v1/v2
array(i)=array(i)+right(rs("sysstatflowlog_tolcon"),(len(rs("sysstatflowlog_tolcon"))-3))*1*v
array1(i)=array1(i)+right(rs("sysstatflowlog_tolrate"),(len(rs("sysstatflowlog_tolrate"))-3))*1*v
end if
rs.movenext
wend
end if
'response.write array(i)
'response.end
if array(i)<>0.0 or array(i)<>0 then
array(i)=formatnumber(array(i),2) '连接数记录的统计值
end if
if array1(i)<>0.0 or array1(i)<>0 then
array1(i)=formatnumber(array1(i),2) '流量记录的统计值
end if
if array(i)>mark then
mark=array(i) '得到连接数的最大值
end if
if array1(i)>mark1 then
mark1=array1(i) '得到流量的最大值
end if
rs.close
next
set rs=nothing
set conn=nothing
if mark<>0 then
mark=formatnumber(mark,0) '取整
end if
%>
MeXP 2002-08-16
  • 打赏
  • 举报
回复
http://www.csdn.net/Expert/FAQ/FAQ_Index.asp?id=2489
FAQ有
spgoal 2002-08-16
  • 打赏
  • 举报
回复
是不是对象没关闭?
linj 2002-08-16
  • 打赏
  • 举报
回复
我把程序分段,发现错误在我帖的第一段代码里~~~~~~~~~

28,391

社区成员

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

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