📄 tkdanxuan.asp

📁 在线考试系统

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<!---#include file="conn.asp"--->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<title>无标题文档</title>
<!--
args:	categoryid,categoryname
--->
<%
	categoryid=request.querystring("categoryid")
	categoryname=request.querystring("categoryname")
%>
<link href="main.css" rel="stylesheet" type="text/css">
</head>

<body>
<h3 align="center"><%=categoryname%>单选题</h3>
<a href="TKDanXuanAdd.asp?categoryname=<%=categoryname%>&categoryid=<%=categoryid%>"><div align="center">添加新试题</div></a> 
<hr width="100%">
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="2" bordercolor="#CCCCCC" id="tab"  datasrc="#danxuan">
  <tr align="center" bgcolor="#F3F3F3"> 
    <th width="643" > 题干</th>
    <th colspan="2" >操作</th>
  </tr>
    <%
	set rst=conn.execute("select id,question from TKDanXuan where categoryid="&categoryid)
	while not rst.eof	
	%>
  <tr align="center" bgcolor="#E0F1FC"> 
    <td ><%=rst("question")%></td>
    <td width="56" ><a href="TKDanXuanModify.asp?oper=modify&categoryname=<%=categoryname%>&categoryid=<%=categoryid%>&id=<%=rst("id")%>">修改</a></td>
    <td width="43" ><a href="TKDanXuanUpdate.asp?oper=del&categoryname=<%=categoryname%>&categoryid=<%=categoryid%>&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 + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -