category.asp

来自「在线考试系统」· ASP 代码 · 共 42 行

ASP
42
字号
<?xml version="1.0" encoding="gb2312"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<!---#include file="conn.asp"--->
<link href="main.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<h3 align="center">科目管理</h3>
<div align="center"><a href="CategoryAdd.asp">添加新科目</a></div>
<hr width="100%">
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="2">
  <tr align="center" bgcolor="#F3F3F3"> 
    <th >科目名称</th>
    <th colspan="2">操作</th>
  </tr>
  <%
  set rst=conn.execute("select * from category")
  while not rst.eof
  %>
  <tr align="center" bgcolor="#E0F1FC"> 
    <td><%=rst("Name")%></td>
    <td width="69"><a href="CategoryModify.asp?id=<%=rst("id")%>">修改</a></td>
    <td width="68"><a href="CategoryUpdate.asp?oper=del&id=<%=rst("id")%>" onclick="return confirm('确定要删除吗?');">删除</a></td>
  </tr>
  <%
  rst.movenext
  wend
    rst.close()
  conn.close()
  set rst=nothing
  set conn=nothing
  %>
</table>


</body>
</html>

⌨️ 快捷键说明

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