HTTP 错误 500.100 - 内部服务器错误 - ASP 错误（在线等回答啊）
错误类型：
Microsoft JScript 运行时错误 (0x800A138F)
缺少对象
/onews2.asp, 第 56 行
浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
网页：
GET /onews2.asp
时间：
2007年7月24日, 11:24:12
:mad: :mad: :mad:
我的代码是
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
sub content_js();
Response.Write "<SCRIPT language=javaScript src=""inc/code.js"" type=text/javascript></SCRIPT>" & vbCrLf
Response.Write "<table width=""100%"" align=""center"" cellspacing=""0"" cellpadding=""0""" & vbCrLf
Response.Write "style=""word-break:break-all;table-layout:fixed;text-align:left"">" & vbCrLf
Response.Write "<tr><td valign=""top"">" & vbCrLf
Response.Write "<br><div align=""center""><font style=""font-size:16px""><b>"&rsnews("title")&"</b></font></div><br><br>" & vbCrLf
Response.Write "<table width=""90%"" align=""center"" class=""table-top"">" & vbCrLf
Response.Write "<tr><td width=""100""></td><td align=""center"">[日期："&rsnews("infotime")&"]</td>" & vbCrLf
Response.Write "<td width=""100"" align=""right"">[浏览指数："&rsnews("hits")&"]</td></tr>" & vbCrLf
Response.Write "</table><BR>"
Response.Write "<FORM method=post name=pad><table width='700' border='0' cellspacing='1' align='center'>" & vbCrLf
Response.Write "<tr>" & vbCrLf
Response.Write "<td Valign='TOP' style=""LINE-HEIGHT: 150%;padding: 5;"" align='center'>" & vbCrLf
Response.Write "<TEXTAREA cols=95 name=text rows=25>"&CODEStr(rsnews("content"))&"</TEXTAREA></td>" & vbCrLf
Response.Write "</tr>" & vbCrLf
Response.Write "<tr>" & vbCrLf
Response.Write "<td align='center'>" & vbCrLf
Response.Write "<INPUT name=view onclick=preview() type=button value=运行 onmouseover=""this.className='boton'"" onmouseout=""this.className='botoff'"" class=""botoff"">" & vbCrLf
Response.Write "<INPUT onClick=""window.open('showjs.asp?action=view&js_id="&rsnesws("js_id")&"')"" type=button value=查看 onmouseover=""this.className='boton'"" onmouseout=""this.className='botoff'"" class=""botoff"">" & vbCrLf
Response.Write "<INPUT name=retur onclick=savetxt() type=button value=保存 onmouseover=""this.className='boton'"" onmouseout=""this.className='botoff'"" class=""botoff"">" & vbCrLf
Response.Write "<INPUT name=clear type=reset value=还原 onmouseover=""this.className='boton'"" onmouseout=""this.className='botoff'"" class=""botoff""><BR><BR>" & vbCrLf
Response.Write "</td>" & vbCrLf
Response.Write "</tr>" & vbCrLf
Response.Write "<tr>" & vbCrLf
Response.Write "<td valign='bottom'>" & vbCrLf
Response.Write "<font color=red>特别说明：</font>如文本框里含有upjs/***.js内容的，请用查看按钮查看演示！" & vbCrLf
Response.Write "</td>" & vbCrLf
Response.Write "</tr>" & vbCrLf
Response.Write "</table></FORM>" & vbCrLf
Response.Write "</td>" & vbCrLf
Response.Write "</tr>" & vbCrLf
Response.Write "</table>" & vbCrLf
end sub
</SCRIPT>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<td Valign='TOP' style=""LINE-HEIGHT: 150%;padding: 5;"" align='center'><table width="569" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="6" rowspan="2" align="center" valign="top"> </td>
<td width="760" align="right" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="37"> </td>
</tr>
</table>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="100%"><br />
<div style='font-size:10.5pt'>
<p><%call (content_js())%>
</p>
<p> </p>
</div></td>
</tr>
<tr align="right">
<td> </td>
</tr>
</table></td>
</tr>
<tr>
<td height="40" align="right" width="760"><table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="right"><img src="file:///C|/Documents and Settings/Administrator.LUOLU/桌面/images/printer.gif" alt="`" width="16" height="14" align="absmiddle" /> <a href="javascript:window.print()">打印本页</a> | <img src="file:///C|/Documents and Settings/Administrator.LUOLU/桌面/images/close.gif" alt="`" width="14" height="14" align="absmiddle" /> <a href="javascript:window.close()">关闭窗口</a></td>
</tr>
</table></td>
</tr>
</table></td>
<p> </p>
<p>
<label></label>
</p>
</body>
</html>
哪位大哥帮个忙啊，我在线等啊
