<%if session("admin")="" then
response.Write "<script language='javascript'>alert('网络超时或您还没有登陆！');window.location.href='login.asp';</script>"
response.End
end if
%>
<!--#include file="ljconn.asp"-->
<html><head><title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
.style1 {
	font-size: 12px;
	font-weight: bold;
}
.style2 {font-size: 12px}
-->
</style>
</head>
<body>

<table class="tableBorder" width="100%" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#FFFFFF">

<tr> 
<td align="center" background="img/admin_bg_1.gif"><span class="style1"><font color="#ffffff">综合管理</font></span></td>
</tr>
<%
set rs=server.CreateObject("adodb.recordset")
rs.Open "select anclassid,anclass from shop_anclass order by anclassidorder",conn,1,3
%>
<%if rs.recordcount=0 then%>
<%else%>
<%while not rs.eof%>
<tr bgcolor="#E8F1FF"> 
<td align="left" bgcolor="#E8F1FF">&nbsp;<span class="style2"><%=rs("anclass")%></span></td>
</tr>
<%
set rs_1=server.CreateObject("adodb.recordset")
rs_1.Open "select nclassid,nclass,anclassid from shop_nclass where anclassid="&rs("anclassid")&" order by nclassidorder",conn,1,3
%>
<%if rs_1.recordcount=0 then%>
<%else%>
<tr bgcolor="#E8F1FF"> 
<td align="left" bgcolor="#F7FAFF">
<%while not rs_1.eof%>
&nbsp;&nbsp;<a href="gywm_2.asp?anclassid=<%=rs_1("anclassid")%>&nclassid=<%=rs_1("nclassid")%>"><span class="style2 style2"><%=rs_1("nclass")%></span></a>
<%rs_1.movenext
wend
rs_1.close
set rs_1=nothing
%></td>
</tr>
<%end if%>
<%
rs.movenext
wend
%>
<%
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</table>
<!--#include file="copyright.asp"-->
</body>
</html>