📄 admin.asp

📁 网络程序-学生个人信息管理系统。以学生个人用户实际需要为中心

💻 ASP

字号:

<!--#include file="../login/checklogin.asp"-->
<!--#include file="../database/opendb.asp"-->
<!--#include file="../bg/css.asp"-->
<BODY>

<table width="778"  align="center" bgcolor="#FFFF66"  style="BORDER-RIGHT: #dddddd 1px dotted; BORDER-TOP: #dddddd 1px dotted; BORDER-LEFT: #dddddd 1px dotted; BORDER-BOTTOM: #dddddd 1px dotted">
  <tr>
    <td >
	  <div align="center">
	    <input type="button"  onclick="location.href='add.asp';"  value="添加栏目" >
	    </div></td>
  </tr>
</table>

<table width="778" border="1" align="center" cellspacing="1" style="BORDER-RIGHT: #dddddd 1px dotted; BORDER-TOP: #dddddd 1px dotted; BORDER-LEFT: #dddddd 1px dotted; BORDER-BOTTOM: #dddddd 1px dotted">
  <tr bgcolor="#6699FF" >
  <td ><div align="center" class="style3">ID  </div></td>
    <td > <div align="center"><span class="style3">排序</span></div></td>
    <td ><div align="center" class="style3">
      <div align="center">标题</div>
    </div></td>
    <td colspan="2"> <div align="center"><span class="style3">操作</span></div></td>
  </tr>


<%
    	     sql="select ID,name,sortid from menu order by ID "  
              rst.Open sql,my_conn,1,1   
	      if rst.EOF and  rst.BOF then

       %>
	     <font color="#FF0000"><%Response.Write "没有记录"%></font>
   <%             
       else
          rst.movefirst
         do while not rst.EOF or rst.BOF
       %>
        <tr>
		  <td><div align="center"> </div>		    <div align="left" class="style3">
            <div align="center"><%=rst("ID")%> </div>
            </div></td>
       <td ><div align="center" class=" style3"><%=rst("sortid")%> </div></td>
          <td ><div align="center" class=" style3"><%=rst("name")%> </div></td>
          <td width="9%"><div align="center">
           <input type="button" name="edit" onClick="location.href='edit.asp?id=<%=rst("ID")%>'"  value="编辑" >
         </div></td>
         <td width="9%"><div align="center">
           <input type="button" name="DEL" onClick="{if(confirm('彻底删除该栏目及其所有文章,确认要删除?')){location.href='del.asp?id=<%=rst("ID")%>';}return false;}"  value="删除" >
         </div></td>
      </tr>  
	  
       <%
         rst.movenext  
         loop  
       end if
	   
	<!--#include file="../database/closedb.asp"-->   
	   
       %>
	   
</table>


</body>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -