📄 iheeo_class.asp
字号:
<TABLE cellSpacing=0 cellPadding=0 width=185 border=0 bgcolor="#FAFAFA" class="wenbenkuang">
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width=185 border=0>
<TBODY>
<TR>
<TD class=title_01 style="PADDING-LEFT: 10px" height=30>产品分类</TD>
</TR>
</TBODY>
</TABLE>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * FROM BJX_class1 order by anclassidorder",conn,1,1
if rs.recordcount=0 then
response.write "<br>目前没有商品分类"
else
while not rs.eof
%><TABLE cellPadding=5 width=185 border=0 cellspacing="3"><TBODY><TR><TD height="22"> <font style="font-size: 11pt; font-weight: 700" color="#008080"><a href="Class_view.asp?lx=big&anid=<%=rs("anclassid")%>"><%=rs("anclass")%></a></font></TD>
</TR><TR><TD><%
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * FROM BJX_class2 where anclassid="&rs("anclassid")&" order by nclassidorder",conn,1,1
if rs1.recordcount=0 then
%><font color="#919191">无子分类</font><%
else
i=0
while not rs1.eof
%><a href="Class_view.asp?lx=small&anid=<%=rs("anclassid")%>&nid=<%=rs1("nclassid")%>"><font color="#919191"><%=rs1("nclass")%></font></a><font color="#919191"> | </font><%
rs1.movenext
wend
end if
rs1.close
set rs1=nothing
%></TD>
</TR>
</TBODY>
</TABLE>
<%
rs.movenext
wend
end if
rs.close
set rs=nothing
%>
<TABLE cellSpacing=0 cellPadding=0 width=185
background=images/sub_menu_01_02.gif border=0>
<TBODY>
<TR>
<TD></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -