ASP 怎样默认展开二级目录?
我其实不懂程序.但真是赶鸭子上架.被迫去看这些.....我想请问下面的内容.现在是默认不是显示二级目录的.怎样可以设置默认展开二级目录啊?<%setrs_big_type...
我其实不懂程序.但真是赶鸭子上架.被迫去看这些..... 我想请问下面的内容. 现在是默认不是显示二级目录的.怎样可以设置默认展开二级目录啊?
<%
set rs_big_type=conn.execute("select * from type where type_root="&request("big") &" order by id desc")
while not rs_big_type.eof
%>
<tr>
<td height="30" background="images/line_x1.gif" ><a href="product.asp?big=<%=request("big")%>&mid=<%=rs_big_type("id")%>" ><%=rs_big_type("type_name")%></a> </td>
</tr>
<%
if not rs_big_type.eof and rs_big_type("id")=pro_type_mid then
set rs_small_type=conn.execute("select * from type where type_root="&rs_big_type("id") &" order by id desc")
while not rs_small_type.eof
%>
<tr>
<td height="30" background="images/line_x1.gif"><a href="product.asp?big=<%=request("big")%>&mid=<%=rs_big_type("id")%>&small=<%=rs_small_type("id")%>" >---</a><a href="product.asp?big=<%=request("big")%>&mid=<%=rs_big_type("id")%>&small=<%=rs_small_type("id")%>" ><%=rs_small_type("type_name")%></a></td>
</tr>
<%
rs_small_type.movenext
wend
rs_small_type.close
set rs_small_type=nothing
end if
rs_big_type.movenext
wend
rs_big_type.close
set rs_big_type=nothing
%> 展开
<%
set rs_big_type=conn.execute("select * from type where type_root="&request("big") &" order by id desc")
while not rs_big_type.eof
%>
<tr>
<td height="30" background="images/line_x1.gif" ><a href="product.asp?big=<%=request("big")%>&mid=<%=rs_big_type("id")%>" ><%=rs_big_type("type_name")%></a> </td>
</tr>
<%
if not rs_big_type.eof and rs_big_type("id")=pro_type_mid then
set rs_small_type=conn.execute("select * from type where type_root="&rs_big_type("id") &" order by id desc")
while not rs_small_type.eof
%>
<tr>
<td height="30" background="images/line_x1.gif"><a href="product.asp?big=<%=request("big")%>&mid=<%=rs_big_type("id")%>&small=<%=rs_small_type("id")%>" >---</a><a href="product.asp?big=<%=request("big")%>&mid=<%=rs_big_type("id")%>&small=<%=rs_small_type("id")%>" ><%=rs_small_type("type_name")%></a></td>
</tr>
<%
rs_small_type.movenext
wend
rs_small_type.close
set rs_small_type=nothing
end if
rs_big_type.movenext
wend
rs_big_type.close
set rs_big_type=nothing
%> 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询