<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
'****************************************************************
'**   版权所有：烈火工作室  演示网站http://www.strongfire.cn   **
'**   QQ:839225572   邮箱：strongfire2008@163.com              **
'**   非正版用户不得擅自非法修改用于商业用途！查出必究。       **
'****************************************************************
%>
<!--#include file="islogin.asp"-->
<!--#include file="Check_SqlIn.asp"-->
<!--#include file="admin_conn.asp"-->

<html>
<head>
<LINK href="admin_Css.css" type=text/css rel=stylesheet>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>修改信息</title>

</head>
<body>
<p>&nbsp;</p>
<table width="200" border=0 align=center cellspacing=1 class=list1>
	<tr>
	  <th>请选择修改信息的类别</th>
	</tr>
    <%  
    set rs =server.createobject("adodb.recordset")	
	sql="select * from class order by ID desc" 
	rs.open sql,conn,1,1 
	if rs.bof and rs.eof then 
		response.write "<tr><td><div align='center'>没有任何分类</div></td></tr>" 
	else 
		do while not rs.eof 
	%>
	
	<tr>
      <td width="15%"><div align="center"><a href="ArticleModifylist.asp?ClassName=<%=rs("ClassName")%>"><%=rs("ClassName")%></a></div></td>
    </tr>
    <% 
	rs.movenext 
	loop 
	end if 
	rs.close 
	conn.close
	set conn=nothing
	%>
</table>

</body>

</html>
