| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 592 人关注过本帖
标题:求助,请高手帮忙
只看楼主 加入收藏
格猪
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2005-7-12
收藏
 问题点数:0 回复次数:0 
求助,请高手帮忙
请高手帮我看看,为什么这个代码调用不出二级栏目,那里出错了,还有,一级栏目的也显示不全









'=================================================
'过程名:ShowSmallClass_Tree
'作  用:树形目录方式显示栏目
'参  数:无
'=================================================
Sub ShowSmallClass_Tree()
%>
<SCRIPT language=javascript>
function opencat(cat,img){
 if(cat.style.display=="none"){
 cat.style.display="";
 img.src="../img/class2.gif";
 } else {
 cat.style.display="none";
 img.src="../img/class1.gif";
 }
}
</Script>
<TABLE cellSpacing=0 cellPadding=0 width="99%" border=0>
<%
dim i
if rsBigClass.eof and rsBigClass.bof then
 Response.Write "栏目正在建设中……"
else
 i=1
 do while not rsBigClass.eof
%>
 <TR>
  <TD language=javascript onmouseup="opencat(cat10<%=i%>000,
 img10<%=i%>000);" id=item$pval[catID]) style="CURSOR: hand" width=32 height=24 align=center><IMG id=img10<%=i%>000 src="../img/class1.gif" width=20 height=20></TD>
  <TD class='ML_Tdbg'><a href='Product.asp?BigClassName=<%=rsBigClass("BigClassName")%>'><%=rsBigClass("BigClassName")%></a></TD>
 </TR>
 <TR>
  <TD id=cat10<%=i%>000 style="DISPLAY: none" bgColor=#fefdf5 colspan="2">
<%
dim rss,sqls,j
set rss = server.CreateObject ("adodb.recordset")
sqls="select * from Bs_PrSmallClass where BigClassName='" & rsBigClass("BigClassName") & "' order by SmallClassID"
rss.open sqls,conn,1,1
if rss.eof and rss.bof then
 Response.Write "没有小分类"
else
 j=1
 do while not rss.eof
%>
 <IMG height=20 src="../img/class3.gif" width=26 align=absMiddle border=0><a href="Product.asp?BigClassName=<%=rss("BigClassName")%>&Smallclassname=<%=rss("BigClassName")%>"><%=rss("BigClassName")%></a><BR>
<%
 rss.movenext
 j=j+1
 loop
end if
rss.close
set rss=nothing
%>
  </TD>
 </TR>
<%
 rsBigClass.movenext
 i=i+1
 loop
end if
%>
</TABLE>
<%
end Sub
2005-07-12 16:25
快速回复:求助,请高手帮忙
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.014560 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved