28,409
社区成员




<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Response.Charset="utf-8"%>
<%Session.CodePage=65001%>
<%
if not Rs.eof then
%>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=utf-8">
<%@language="vbscript"%>
<%
Response.Status = "500 Internal Server Error"
Response.Buffer = True
Response.ContentType = "text/html"
Response.Charset = "UTF-8"
Response.CacheControl = "no-cache"
Response.Expires = 0
Response.AddHeader "Pragma", "no-cache"
Dim MyError
Set MyErr = Server.GetLastError()
%>
<html>
<head>
<title>HTTP 500 - Internal server error</title>
<style>body, td {font-family: arial,sans-serif}</style>
</head>
<body text="#000000" bgcolor="#FFFFFF">
<blockquote>
<H2>HTTP 500 - Internal server error</H2>
</blockquote>
<hr color="#5C5DA3" />
<table width="100%" border="0" cellpadding="2" cellspacing="0">
<tr><td width="120">ASP Code</td><td><%=MyErr.ASPCode%></td></tr>
<tr><td width="120">Number</td><td>0x<%=Hex(MyErr.Number)%></td></tr>
<tr><td width="120">Source</td><td><%=MyErr.Source%></td></tr>
<tr><td width="120">Category</td><td><%=MyErr.Category%></td></tr>
<tr><td width="120">File</td><td><%=MyErr.File%></td></tr>
<tr><td width="120">Line</td><td><%=MyErr.Line%></td></tr>
<tr><td width="120">Column</td><td><%=MyErr.Column%></td></tr>
<tr><td width="120">Description</td><td><%=MyErr.Description%></td></tr>
<tr><td width="120">ASPDescription</td><td><%=MyErr.ASPDescription%></td></tr>
</table>
</body>
</html>
<%
Set MyErr = Nothing
%>