<%@ LANGUAGE = VBScript.Encode %>
<!-- #include virtual = "/include/myopen.asp" -->
<%
	set RS = Server.CreateObject("ADODB.RecordSet")
	set RS1 = Server.CreateObject("ADODB.RecordSet")
%>
<%'类别填加
	'判断用户是否登陆过
	IF Request.Cookies ("Admin_name") = "" OR Request.Cookies ("Admin_Pass") ="" THEN
	'没有登陆
	Response.Redirect ("/manage/Admin_Login.ASP")
	END IF
	IF REQUEST("HOME") <> "" THEN
	Response.Redirect ("/manage/default.asp")
	END IF
	IF REQUEST("Add") <> "" THEN
	Response.Redirect ("/manage/class_add.asp")
	END IF
	'用户已经成功注册
		SQL = "SELECT * FROM CLASS WHERE CLASS_NO = '" & REQUEST("NO") & "'"
		RS.Open SQL,CONN,adOpenStatic ,adLockReadOnly
			IF RS.Recor_31@#@&@#@&~~/YIAAA==^#~@%>
  <html>
<head>
<title>类别修改</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
td {  font-size: 9pt; line-height: 16pt}
-->
</style>
</head>

<body bgcolor="#FFFFFF">
<table width="200" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td>
      <div align="center"><b><font color="#3333CC" size="3">类 别 修 改</font></b></div>
    </td>
  </tr>
</table>
<form method="post" action="class_save.asp">
  <input type="HIDDEN" name="no" value="<%=REQUEST("NO")%>">
  <table width="500" border="1" cellspacing="0" cellpadding="1" bordercolor="#CCFFFF" bordercolorlight="#3399FF" bordercolordark="#FFFFFF" align="center">
    <tr bgcolor="#D5F1FB"> 
      <td width="150"> 
        <div align="center">类别名称：</div>
      </td>
      <td width="340"> 
        <input type="text" name="class_name" value="<%=RS("CLASS_NAME")%>">
      </td>
    </tr>
    
  </table>
  <div align="center">
    <input type="submit" name="msave" value="保 存">
    <input type="reset" name="reset" value="重 填">
    <input type="submit" name="home" value="主 页">
    <input type="button" name="Button" value="返 回" onclick="history.back()">
  </div>
</form>
</body>
</html>
	<%
	ELSE
	Response.Write "没有查询到相应记录"
	END IF
	RS.ClAAA==^#~@%>