⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 adminclass.asp

📁 手机网址导航网站手机网址导航网站手机网址导航网站
💻 ASP
字号:
<!-- #include file="conn.asp" -->
<!-- #include file="se.asp" -->
<html>
<title>资料更改</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="7thcss.css" rel=stylesheet>
</head>
<body background=images/zhbg.gif>
 
<table width="610" border="0" cellspacing="0" cellpadding="3" align="center">
<tr><td>
        
      <table border="1" width="100%" cellpadding="1" cellspacing="0" bordercolordark="#FFFFFF" bordercolorlight="#999999" align="center">
        <tr align=center> 
          <td height="25" colspan="4" background="images/iebg.gif"><strong><font color="#FFFFFF" size="4" face="wingdings">:</font> 
            <font color="#FFFFFF">分 类 修 改</font></strong></td>
        </tr>
        <tr> 
          <td width="15%" align="right" bgcolor="#eff7ff">删除分类</td>
          <td rowspan="2" align="left"><form name="delclass" method="post" action="del.asp" target="_blank" >
              <input type="hidden" name="action" value="delclass">
              <select name="id" size="1">
                <option selected>选择分类</option>
                <%
	set rs=server.CreateObject("ADODB.RecordSet")
	sql="select * from class"
	rs.open sql,conn,1,1
	response.Write(rs.recordcount)
	for i=1 to rs.recordcount
	%>
                <option value="<%=rs("id")%>" ><%=rs("class_name")%></option>
                <%
	rs.movenext
	next
	rs.close
	Set rs=nothing
	%>
              </select>
              <input type="submit" name="Submit" value="删除">
            </form></td>
          <td width="15%" align="right" bgcolor="#eff7ff">添加分类</td>
          <td rowspan="2" align="left">   <form action="addclass.asp" method="post" name="addclass" target="_blank">
              <div align="center"> 
                <input name="action" type="hidden" value="addclass">
                <input name="class_name" type="text"  value="分类名">
                <input name="Submit" type="submit"  value="添加">
              </div>
            </form> </td>
        </tr>
        <tr> 
          <td align="right" bgcolor="#eff7ff">&nbsp; </td>
          <td align="right" bgcolor="#eff7ff">&nbsp;</td>
        </tr>
        <tr> 
          <td width="15%" align="right" bgcolor="#eff7ff"> 修改分类</td>
          <td width="35%" align="left"><font color="#333333">
            <%
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="Select * From class"
rs.open sql,conn,1,1
for i=1 to rs.RecordCount
%>
            <%=rs("class_name")%> <a href="classedit.asp?id=<%=rs("id")%>"><font color="#FF0000">改名字</font></a><br>
            <span class="font"> 
            <%
rs.movenext
next
rs.close
Set rs=nothing
conn.close
Set conn=nothing
%>
            </span></font> </td>
          <td width="15%" align="right" bgcolor="#eff7ff">说明:</td>
          <td width="35%" align="left">删除分类要注意,删除了分类就会删除分类下的网站。请慎重选择。</td>
        </tr>
        <tr> 
          <td colspan="4" align="center"> 
            <input type="submit" name="Submit" value="提交" class=input>
            &nbsp;&nbsp; 
            <input type="reset" name="Submit2" value="清除" class=input>
          </td>
        </tr>
      </table>
    </td></tr></table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -