林文龙 尹志平:请问这段代码哪里错了?

来源:百度文库 编辑:中科新闻网 时间:2024/04/29 03:23:39
<script language="javascript">
<!--
function showLay(divId){
var objDiv = eval(divId);
if (objDiv.style.display=="none"){
eval("sp"+divId+".innerHTML='-'");
objDiv.style.display="";
}else{
eval("sp"+divId+".innerHTML='+'");
objDiv.style.display="none";
}
}
// -->
</script>
<%if rsBigClass.bof and rsBigClass.eof then
response.Write "The column is under construction……" 'The column is under construction 栏目正在建设中
else
dim sqlClass,rsClass,strTree,BigClassNum,i,j
rsBigClass.movefirst
BigClassNum=rsBigClass.recordcount
i=1
do while not rsBigClass.eof
if i<BigClassNum then
strTree=""
else
strTree=""
end if
sqlClass="select * from SmallClass where BigClassName='" & rsBigClass("BigClassName") & "' Order by SmallClassID"
Set rsClass= Server.CreateObject("ADODB.Recordset")
rsClass.open sqlClass,conn,1,1
strTree= strTree & "<table width=160 border=0 cellpadding=0 cellspacing=0>"
strTree= strTree & "<tr>"
strTree= strTree & "<a href='#' onclick='showlay(layer"&i&")'><span id='spLayer"&i&"'>+</span></a>"
strTree= strTree & "<a class=bb href='Product.asp?BigClassName=" & rsBigClass("BigClassName") & "'>"
strTree=strTree & rsBigClass("BigClassName")
strTree=strTree & "</a>"
do while not rsClass.eof
strTree= strTree & "<div id='layer"&i&"' style='display:none;'>"
strTree= strTree &"<a class=bb href='Product.asp?BigClassName=" & rsBigClass("BigClassName") & "&SmallClassName=" &rsClass ("SmallClassName")&"'>|-"
strTree=strTree & rsClass("SmallClassName")
strTree=strTree & "</a></div>"
rsClass.MoveNext
loop
strTree=strTree & "<TD height=1 colspan=2 background=img/naSzarym.gif>"
strTree=strTree & "<IMG height=1 src=img/1x1_pix.gif width=10></TD>"
strTree=strTree & "</TR>"
strTree=strTree & "</table>"
SmallClassNum=rsClass.recordcount
j=1
do while not rsClass.eof
rsClass.movenext
j=j+1
loop
response.write strTree
rsBigClass.movenext
i=i+1
loop
rsClass.close
set rsClass=nothing
end if
%>

可能是“栏目正在建设中”错了