?? stry_test.asp
字號:
<!--#INCLUDE FILE="conn.asp" -->
<%
sql="select *from test"
rs.open sql,conn,3,3
do while not rs.eof
RANDOMIZE
RandomValue = INT(10*RND)+1
rs("count")=rs("count")+RandomValue
rs.update
rs.movenext
loop
rs.close
sql="select top 100 * from test order by count desc"'提取試題
Set rs = conn.Execute(sql)
%><head>
<style type="text/css">
<!--
td {
font-size: 12px;
color: #000000;
text-decoration: none;
}
.style1 {color: #FF0000}
a {
font-size: 12px;
color: #000000;
text-decoration: none;
}
-->
</style><title>25175.com學生考試系統v1.5</title></head>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25">首頁 <a href="add.asp">添加試題</a> <a href="delete_all.asp">刪除試題</a> <a href="SEARCH.ASP">列出試題答案</a> <a href="change_password.asp">修改密碼</a> <a href="login.asp">登入</a> <a href="20050130_logout.asp">退出</a> <a href="http://www.25175.com">powered by 25175</a></td>
</tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25">
<form action="time.asp" method="post" name=forms>
考試時間:
<input type=text name=input1 size=9>
<script language=javascript>
var sec=0;var min=0;var hou=0;flag=0;idt=window.setTimeout("update();",1000);
function update(){sec++;if(sec==60){sec=0;min+=1;}if(min==60){min=0;hou+=1;}if((min>0)&&(flag==0)){flag=1;}
document.forms.input1.value=hou+"時"+min+"分"+sec+"秒";idt=window.setTimeout("update();",1000);}
</script>
</form> </td>
</tr>
</table>
<%if Request.Form("sec")=5 then
Response.Write "時間已到。"
end if%>
<FORM action="stry_result.asp" id=FORM1 method=post name=FORM1>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><P><span>
以下試題隨機抽取:(考試請務刷新本頁面)
<%
i=1
rs.movefirst
do while not rs.eof
%>
</span><TABLE width="760" border="0" cellpadding="0" cellspacing="0">
<TR>
<TD height="20" bgcolor="#EFEFEF"><span class="unnamed1"><span class="style1"> 第</span><%=rs("id")%><span class="style1">題：</span><%=rs("question")%></span></TD>
</TR>
<TR>
<TD height="20">
<table width="760" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="190" height="30">
<input name=ans<%=i%>
type=radio value="A" checked>
<br>
<%=rs("A")%> </td>
<td width="190">
<input name=ans<%=i%>
type=radio value="B">
<%=rs("B")%> </td>
<td width="190">
<input name=ans<%=i%>
type=radio value="C">
<%=rs("C")%> </td>
<td width="190">
<input name=ans<%=i%>
type=radio value="D" >
<%=rs("D")%> </td>
</tr>
</table>
<table width="760" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="1" bgcolor="#666666"><div align="center"></div></td>
</tr>
</table></TD>
</TR>
</TABLE>
<div align="left">
<%
i=i+1
rs.movenext
loop
%>
</div></td>
</tr>
<tr>
<td height="50"> <table width="760" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="2" bgcolor="#999999"><div align="center"></div></td>
</tr>
<tr>
<td height="48">
<input id=submit1 name=submit1 type=submit value="交卷">
<input id=reset1 name=reset1 type=reset value="重填">
</td>
</tr>
<tr>
<td height="2" bgcolor="#9C9A9C"><div align="center"></div></td>
</tr>
</table> </td>
</tr>
</table>
</FORM>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -