📄 err500.asp
字号:
<!--#include file="errconn.asp"-->
<%
'防刷新=====================================
If Request.Cookies("terry.jsjt")("norefresh")<>"" Then
If DateDiff("s",Request.Cookies("terry.jsjt")("norefresh"),Now())<5 Then
'If Request.ServerVariables("QUERY_STRING")="" Then
'Response.Write("<meta http-equiv=""refresh"" content=""3;URL="&Request.ServerVariables("URL")&""">")
'Else
' Response.Write("<meta http-equiv=""refresh"" content=""3;URL="&Request.ServerVariables("URL")&"?"&Request.ServerVariables("QUERY_STRING")&""">")
Response.Write("<meta http-equiv=""refresh"" content=""5;URL="">")
'End If
Response.Write("防刷新,请等待五秒...")
Response.End
End IF
End if
Response.Cookies("terry.jsjt")("norefresh")=Now()
'防刷新=========end===============================
dim objasperror,errstr
set objasperror=server.getlasterror()
errstr="错误码:"&objasperror.aspcode&"<br />"
errstr=errstr&"错误代号"&objasperror.number&"<br />"
errstr=errstr&"错误程序代码:"&objasperror.source&"<br />"
errstr=errstr&"错误文件:"&objasperror.file&"<br />"
errstr=errstr&"错误行数:"&objasperror.line&"<br />"
errstr=errstr&"错误column:"&objasperror.column&"<br />"
errstr=errstr&"错误类型:"&objasperror.category&"<br />"
errstr=errstr&"错误描述:"&objasperror.description&"<br />"
errstr=errstr&"错误描述:"&objasperror.aspdescription&"<br />"
set rs=server.createobject("adodb.recordset")
sql="select * from wo_err"
rs.open sql,conn,3,3
rs.addnew
rs("errcontent")=errstr
rs("dateandtime")=now()
rs("comeurl")=GetUrl()
rs.update
rs.close
set rs=nothing
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0028)http://a.zon.cn/iis/test.htm -->
<HTML><HEAD><TITLE>程序错误-智网-Zhinet.com</TITLE>
<META http-equiv=Content-Type content="text/html; charset=GB2312">
<STYLE type=text/css></STYLE>
<LINK type=text/css rel=stylesheet>
<STYLE type=text/css>BODY {
FONT-SIZE: 9pt; COLOR: #842b00; LINE-HEIGHT: 16pt; FONT-FAMILY: "Tahoma", "宋体"; TEXT-DECORATION: none
}
TABLE {
FONT-SIZE: 9pt; COLOR: #842b00; LINE-HEIGHT: 16pt; FONT-FAMILY: "Tahoma", "宋体"; TEXT-DECORATION: none
}
TD {
FONT-SIZE: 9pt; COLOR: #842b00; LINE-HEIGHT: 16pt; FONT-FAMILY: "Tahoma", "宋体"; TEXT-DECORATION: none
}
BODY {
SCROLLBAR-HIGHLIGHT-COLOR: buttonface; SCROLLBAR-SHADOW-COLOR: buttonface; SCROLLBAR-3DLIGHT-COLOR: buttonhighlight; SCROLLBAR-TRACK-COLOR: #eeeeee; BACKGROUND-COLOR: #ffffff
}
A {
FONT-SIZE: 9pt; COLOR: #842b00; LINE-HEIGHT: 16pt; FONT-FAMILY: "Tahoma", "宋体"; TEXT-DECORATION: none
}
A:hover {
FONT-SIZE: 9pt; COLOR: #0188d2; LINE-HEIGHT: 16pt; FONT-FAMILY: "Tahoma", "宋体"; TEXT-DECORATION: underline
}
H1 {
FONT-SIZE: 9pt; FONT-FAMILY: "Tahoma", "宋体"
}
</STYLE>
<META content="MSHTML 6.00.2800.1543" name=GENERATOR></HEAD>
<BODY topMargin=20>
<TABLE id=Table1 cellSpacing=0 width=600 align=center border=0 cepadding="0">
<TBODY>
<TR colspan="2">
<TD vAlign=top align=middle><IMG height=100
src="http://www.zhinet.com/images/404.jpg" width=100 border=0>
<TD>
<TD><!--------System Return Begin------------>
<H1>无法运行程序</H1>HTTP 错误 500：您正在访问的文件出现程序运行错误。
<HR noShade SIZE=0>
<P>☉错误信息如下：</P>
<UL>
<LI>错误代号:<%=objasperror.number%> </li>
<LI>也许是因为网络故障造成的暂时现象!</li>
<LI>您可以试着<a href="javascript:location.reload()" target="_self"><font color="#ff0000">点此重新刷新本页</font></a>!</LI></UL>
<P>☉ <a href="http://www.zhinet.com">登录智网首页</a>
<HR noShade SIZE=0>
<P>☉ 如果问题依然存在，请致信管理员<br>
TEL:010-51669930 QQ:1705363 Email:chuan@zhinet.com </P>
<!------------End this!---------------></TD></TR></TBODY></TABLE></BODY></HTML>
<%
Function GetUrl()
On Error Resume Next
Dim strTemp
If LCase(Request.ServerVariables("HTTPS")) = "off" Then
strTemp = "http://"
Else
strTemp = "https://"
End If
strTemp = strTemp & Request.ServerVariables("SERVER_NAME")
If Request.ServerVariables("SERVER_PORT") <> 80 Then strTemp = strTemp & ":" & Request.ServerVariables("SERVER_PORT")
strTemp = strTemp & Request.ServerVariables("URL")
If Trim(Request.QueryString) <> "" Then strTemp = strTemp & "?" & Trim(Request.QueryString)
GetUrl = strTemp
End Function
%>
<script language="JavaScript">
var __cc_uid="err500";
</script><script language="JavaScript"
src="http://count.zhinet.com/count.js">
</script> ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -