<%@language=vbscript codepage=936 %>
<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<!-- #include file="Inc/Head.asp" -->
<%
dim sql,rsBigClass,ErrMsg
set rsBigClass=server.CreateObject("adodb.recordset")
rsBigClass.open "Select * From BigClass_New where BigClassName<>'精品兰苑' and BigClassName<>'兰家风采'",conn,1,3
%>
<script language="JavaScript" type="text/JavaScript">
function checkBig()
{
  if (document.form1.BigClassName.value=="")
  {
    alert("大类名称不能为空！");
    document.form1.BigClassName.focus();
    return false;
  }
}
function checkSmall()
{
  if (document.form2.BigClassName.value=="")
  {
    alert("请先添加大类名称！");
	document.form1.BigClassName.focus();
	return false;
  }
}
function ConfirmDelBig()
{
   if(confirm("确定要删除此类吗？删除此类下包括的有所信息，并且不能恢复！"))
     return true;
   else
     return false;
	 
}

</script>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td align="center" valign="top"><table width="500" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td align="center" valign="top"><br> 
          <a href="News_ClassAddBig.asp"><strong><font color="#FF0000"><u>添加分类</u></font></strong></a><br> 
            <br> 
            <table width="500" border="0" cellpadding="0" cellspacing="1" class="table_bk4">
              <tr bgcolor="#A4B6D7" class="back_southidc"> 
                <td width="64%" height="30" align="center"><strong>栏目名称</strong></td>
                <td width="36%" height="30" align="center"><strong>操作选项</strong></td>
              </tr>
              <%
	do while not rsBigClass.eof
%>
              <tr bgcolor="#F2F8FF" class="tdbg"> 
                <td width="64%" height="22">&nbsp;<img src="Image/tree_folder4.gif" width="15" height="15"><%=rsBigClass("BigClassName")%></td>
                <td align="center" style="padding-right:10"><a href="News_ClassModifyBig.asp?BigClassID=<%=rsBigClass("BigClassID")%>">修 改</a> | <a href="news_ClassDelBig.asp?BigClassID=<%=rsBigClass("BigClassID")%>" onClick="return ConfirmDelBig();">删 除</a>
			  </tr>
              
<%
	  rsBigClass.movenext
	loop
%>
            </table>
            <br> </td>
        </tr>
      </table>
      <%
rsBigClass.close
set rsBigClass=nothing
%> </td>
  </tr>
</table>
<!-- #include file="Inc/Foot.asp" -->