求助答案 Microsoft VBScript 编译器错误 错误 '800a0400'
网站新闻版块打开就出现这个Microsoft VBScript 编译器错误 错误 '800a0400' 缺少语句
/news.asp,行 129
=ID%
求助怎么修改?谢谢 下面是代码“:
<!--#include file="head.asp"-->
<SCRIPT src="Showjs.asp?id=<%=id%>"></SCRIPT>
<%dim title,belongcity,text,Origin,pic,username,tel,QQ,web,email,adddate,stopdate,ip
newsData%>
<script type="text/javascript" src="js/Get_Code.js"></script>
<script type="text/javascript" src="js/ajax.js"></script>
<script type="text/javascript" src="js/main.js"></script>
<SCRIPT type="text/JavaScript">
<!--//
function Page(v)
{
var Div=document.getElementById("page");
var Div1=Div.getElementsByTagName("div");
for(var i=0;i<Div1.length;i++)
{
if(!(Div1[i].style.display=='none'))
{
if(v==0)
{
if(i>0)
{
Div1[i-
1].style.display='';Div1[i].style.display='none';return;
}else{
return;
}
}else{
if(i<Div1.length-1)
{
Div1
[i+1].style.display='';Div1[i].style.display='none';return;
}else{
return;
}
}
}
}
}
//-->
</SCRIPT>
<div class="N_Top">
<p class="N_Top_Left"><img src="Skin_9/Images/New_t_1.gif"
width="43" height="38"></p>
<p class="N_Top_Cen"><%=News_Type%></p>
<p class="N_Top_Right"><img src="Skin_9/Images/New_t_3.gif"
width="10" height="38"></p>
</div>
<table width="960" border="0" align="center" cellpadding="0"
cellspacing="0">
<tr>
<td width="680" valign="top"><table width="100%" border="0"
cellspacing="0" cellpadding="0">
<tr>
<td><img src="Images/img_8/s_1.gif" width="680"
height="4"></td>
</tr>
<tr>
<td style="border-left:1px #DADADA solid; border-right:1px
#DADADA solid; border-bottom:1px #DADADA solid; padding:8px;"><table
width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="30" colspan="2" style=" border-bottom:1px
#DEDEDE solid; color:#07519A;"><img src="Images/img_8/s_2.gif"
width="5" height="13"> 您所在的位置: <a href="index.asp?<%=L_ID%>">首
页</a> > <%=belongtype%> > 正文</td>
</tr>
<tr>
<td height="75" colspan="2" style="font-size:20px; font-
weight:700; text-align:center; line-height:180%;"><%=title%></td>
</tr>
<tr>
<td height="27" colspan="2" align="center"
background="Images/img_8/s_3.gif">所属区域:<%=belongcity%> 新闻类别:{$
新闻类别} 发布时间:<%=adddate%> 人气指数:<script>document.write(hits)</SCRIPT>
新闻来源:<%=Origin%></td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td colspan="2" style="line-height:180%; font-size:14px">
<%=text%><br>
<%=Pic%></td>
</tr>
<tr>
<td width="50%" align="center" style="line-height:180%;
font-size:14px">上一篇:<%=GetPreNext(ID,"PreArticle","news")%></td>
<td width="50%" align="center" style="line-height:180%;
font-size:14px">下一篇:<%=GetPreNext(ID,"NextArticle","news")%></td>
</tr>
</table></td>
</tr>
<tr>
<td style="border-left:1px #DADADA solid; border-right:1px
#DADADA solid; border-bottom:1px #DADADA solid; padding:8px;"><table
width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25" bgcolor="D8E9FB" style="font-size:14px;
font-weight:700; text-indent:8px;">留言评论:</td>
</tr>
<tr>
<td style="padding:8px; line-height:180%;"><div
id="commBody" style="margin:0 auto;"><script>comm_body(<%=ID%
>,"news",1);</script></div></td></tr>
</table></td>
</tr>
</table></td>
<td width="10" valign="top"> </td>
<td valign="top"><table width="100%" border="0" cellpadding="0"
cellspacing="0">
<tr>
<td style="border:1px #C0CEDB solid;"><table width="100%"
border="0" cellspacing="1" cellpadding="0">
<tr>
<td height="30" background="Images/img_9/show_1.gif"
style="text-indent:8px; font-weight:700">固顶新闻</td>
</tr>
<tr>
<td style="padding:8px; line-height:170%;"><SCRIPT src="inc/topnews.asp?t=0&<%=L_ID%>&n=0&s=10&l=1&zs=30&zt=11&hg=18&d=0"></SCRIPT>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table style="margin-top:8px" width="100%" border="0"
cellpadding="0" cellspacing="0">
<tr>
<td style="border:1px #C0CEDB solid; padding:8px; text-
align:center"></td>
</tr>
</table></td>
</tr>
</table>
<!--#include file="foot.asp" -->