请高手看看这个ASP代码
红色部分出错，本人初学，不清楚怎样修改，请高手指导，谢谢！<script language = "JavaScript">
aclass=new Array();
</script>
<table width=221 border="0" align="center" cellpadding="0" cellspacing="0" background="images/left_menu_bg.jpg">
<tr>
<TD bgColor=#ffffff> </TD>
</tr>
<tr>
<TD><IMG height=26 src="images/left_menu_top.jpg"
width=221></TD>
</tr>
<tr>
<td><TABLE width="100%" border=0 cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<%
set Rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SystemSite where id=1"
Rs.open sql,conn,1,1
leftjpg=Rs("leftjpg")
leftjpgd=Rs("leftjpgd")
Rs.close
set Rs=nothing
%>
<TD align=middle height=120 style="PADDING-TOP: 5px;PADDING-Right: 2px"><div align="center" ><img src="<%=leftjpg%>" width="161" height="134"></DIV></TD>
</TR>
<TR>
<td><div align="center" ><img src="images/left_menu_text_product.jpg" width="210" height="31" align="middle"></DIV></td>
</TR>
<TR>
<TD align=middle height="2"></TD></TR></TBODY></TABLE></td>
</tr>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<%
set RsA = server.createobject("adodb.recordset")
RsA.source = "select id,parentid,content from deeptree where parentid=0 order by sorid"
RsA.open RsA.source,conn,1,1
if RsA.eof then response.write"»¹Ã»ÓÐÏà¹ØÄÚÈÝ£¡"
countone =0
while not RsA.eof
Pid=RsA("id")
c1 = RsA("content")
%>
<tr onMouseOver="javascript:showorhide('s'+<%=rsa("id")%>);">
<td width="23" height="36"></td>
<td width="25"><img src="images/bullet.jpg" width="13" height="13"></td>
<td width="173" align="left" class='Td.Top1'><a href="ProductsList.asp?deep=1&id=<%=RsA("id")%>&Str=<%=server.URLEncode(RsA("content"))%>"><%=c1%></a></td>
</tr>
<tr>
<td colspan="3"><img src="images/left_line.jpg" width="221" height="1"></td>
</tr>
<tr><td id="<%="s" & pid%>" name="sclass" style="display:none;" colspan="3"><table border="0" cellpadding="0" cellspacing="0" width="100%">
<%
set RsB = server.createobject("adodb.recordset")
RsB.source = "select id,parentid,content from deeptree where parentid="&Pid&""
RsB.open RsB.source,conn,1,1
while not RsB.eof
Cid=RsB("id")
c2 = RsB("content")
%>
<tr onMouseOver="javascript:showorhide('s'+<%=rsb("id")%>);">
<td width="23" height="36" border="0"></td>
<td width="25" border="0"></td>
<td width="173" align="left"><a href="ProductsList.asp?deep=2&id=<%=RsB("id")%>&Str=<%=server.URLEncode(RsB("content"))%>&Pid=<%=Pid%>&PStr=<%=server.URLEncode(RsA("content"))%>"><%=c2%></a></td>
</tr>
<tr>
<td colspan="3"><img src="images/left_line.jpg" width="221" height="1"></td>
</tr>
<tr><td id="<%="s" & Cid%>" name="ssclass" style="display:none;" colspan="3"><table border="0" cellpadding="0" cellspacing="0" width="100%">
<%
set RsC = server.createobject("adodb.recordset")
RsC.source = "select id,parentid,content from deeptree where parentid="&Cid&""
RsC.open RsC.source,conn,1,1
while not RsC.eof
c3 = RsC("content")
%>
<tr>
<td width="23" height="36" border="0"></td>
<td width="25" border="0"></td>
<td width="173" align="left"><a href="ProductsList.asp?deep=3&id=<%=RsC("id")%>&ctr=<%=server.URLEncode(RsC("content"))%>&Cid=<%=Cid%>&ppStr=<%=server.URLEncode(RsB("content"))%>"> <%=c3%></a></td>
</tr>
<tr>
<td colspan="3"><img src="images/left_line.jpg" width="221" height="1"></td>
</tr>
<%
RsC.movenext
wend
RsC.close
set RsC=nothing %></table></td></tr>
<%
RsB.movenext
wend
RsB.close
set RsB=nothing %></table></td></tr><%
'========
RsA.movenext
wend
RsA.close
set RsA=nothing
%>
</table></td>
</tr>
<tr>
<td height="25" background="images/left_menu_bg.jpg"></td>
</tr>
<tr>
<td height="25" background="images/left_menu_bg.jpg"></td>
</tr>
<tr>
<td height="25" background="images/left_menu_bg.jpg"></td>
</tr>
<tr>
<td height="25" background="images/left_menu_bg.jpg"></td>
</tr>
<tr>
<td height="25" background="images/left_menu_bg.jpg"></td>
</tr>
<tr>
<td height="25" background="images/left_menu_bg.jpg"></td>
</tr>
<tr>
<td><a href="Company.asp-id=2.html"><div align="center" ><img src="<%=leftjpgd%>" width="185" height="63" border="0"></DIV></a></td>
</tr>
<tr>
<TD><IMG height=26 src="images/left_menu_top1.jpg"
width=221></TD>
</tr>
</table>
<script>
function showorhide(name){
hideall()
var obj= document.getElementById(name);
if (obj.style.display==""){
//obj.style.display="none"
}
else
{
obj.style.display=""
}
}
function hideall(){
var i=0
var patrn = /^s(\d)+$/;
for(i;i<=aclass.length-1;i++)
{
document.getElementById(aclass[i]).style.display="none"
}
}
</script>
