📄 kaoshi.asp
字号:
rsno8.open sqlno8,conn,1,3
if rsno8("datano")<>0 then
sqlyued="SELECT top "&rsno8("datano")&" tbtk.tmid, tbtk.title,tbtk.category, tbkc.kcid, tbkc.kcm, tbtk.chapter,tbtk.level,photo FROM tbkc, userdata, tbtk WHERE username='"&username&"' and userdata.tmid=tbtk.tmid and tbtk.kcid=tbkc.kcid and tbkc.kcid="&kcid&" and kao=1 and category=8 and paperno="&paperno&" order by tbtk.tmid;"
set rsyued=server.createobject("adodb.recordset")
rsyued.open sqlyued,conn,3,2
if not rsyued.eof then
%>
</p>
<table border="1" cellspacing="1" style="border-collapse: collapse" bordercolor="#799AE1" width="760" height="98">
<tr class="trh">
<td width="34" align="center" bgcolor="#799AE1" height="21">
<font color="#FFFFFF"><b>序号</b></font></td>
<td align="center" bgcolor="#799AE1" width="716" height="21">
<p align="center"><font color="#FFFFFF"><b>阅读理解<span lang="en-us">(</span>共<%=rsno8("datano")%>题,<%=rsno8("datano")*rsno8("datavalue")%>分<span lang="en-us">)</span></b></font></td>
</tr>
<%
iyued=1
For yuedno = 1 To rsno8("datano")
%> <tr>
<td align="center" bgcolor="#FFFDE8" height="50" width="33" bordercolor="#4D79D7"><%=iyued%></td>
<td align="center" bgcolor="#FFFDE8" height="50" width="714" bordercolor="#4D79D7">
<table border="0" cellpadding="0" width="95%" height="137">
<tr>
<td height="94"><%=htmlencode(rsyued("title"))%>——(难度:<%
if rsyued("level")=1 then
response.write "容易"
end if
if rsyued("level")=2 then
response.write "中等"
end if
if rsyued("level")=3 then
response.write "较难"
end if
if rsyued("level")=4 then
response.write "最难"
end if
%>) <br><% if len(rsyued("photo")) > 1 then
%> <center>
<img border="0" src="examimage/<%=rsyued("photo")%>">
</center>
<br><% end if %><br><hr color="#000000">
</td>
</tr>
<%
sqlyued1="SELECT * FROM tbread WHERE tmid="&rsyued("tmid")&" order by readno"
set rsyued1=server.createobject("adodb.recordset")
rsyued1.open sqlyued1,conn,3,2
do while not rsyued1.eof
sqlyued3="SELECT * FROM userdataread WHERE username='"&username&"' and noid="&rsyued1("noid")&" and readno="&rsyued1("readno")&" and paperno="&paperno&" and tmid="&rsyued("tmid")
set rsyued3=server.createobject("adodb.recordset")
rsyued3.open sqlyued3,conn,3,2
textyued1="text"&cstr(rsyued("tmid"))&cstr(rsyued1("readno"))
if Request.ServerVariables("http_method")="POST" then
sqlyued2="SELECT * FROM userdataread where username='"&username&"' and noid="&rsyued1("noid")&" and readno="&rsyued1("readno")&" and tmid="&rsyued("tmid")&" and paperno="&paperno
set rsyued2=server.createobject("adodb.recordset")
rsyued2.open sqlyued2,conn,3,2
textyued2=request(""&textyued1&"")
rsyued2("ruans")=cstr(trim(textyued2))
if trim(rsyued2("rans"))=textyued2 then
rsyued2("fen")=rsno8("datavalue")
else
rsyued2("fen")=0
end if
rsyued2.update
rsyued2.close
end if
%>
<tr>
<td>(<%=rsyued1("readno")%>)、<%=rsyued1("xiaoti")%>——(难度:<%
if rsyued1("slevel")=1 then
response.write "容易"
end if
if rsyued1("slevel")=2 then
response.write "中等"
end if
if rsyued1("slevel")=3 then
response.write "较难"
end if
if rsyued1("slevel")=4 then
response.write "最难"
end if
%>) <br><% if len(rsyued1("pic")) > 1 then
%> <center>
<img border="0" src="examimage/<%=rsyued1("pic")%>">
</center>
<br><% end if %>答：
<% if rsyued1("a")<>"" then %> <input type="radio" value="A" name="<%=textyued1%>" <%if rsyued3("ruans")="A" then%> checked <%end if %> onblur="this.className='radio'" onfocus="this.className='inputedit';this.select()" class="radio">A.<%=rsyued1("a")%><br><%end if%>
<% if rsyued1("b")<>"" then %> <input type="radio" name="<%=textyued1%>" <%if rsyued3("ruans")="B" then%> checked <%end if %> value="B" onblur="this.className='radio'" onfocus="this.className='inputedit';this.select()" class="radio">B.<%=rsyued1("b")%><br><%end if%>
<% if rsyued1("c")<>"" then %> <input type="radio" value="C" <%if rsyued3("ruans")="C" then%> checked <%end if %> name="<%=textyued1%>" onblur="this.className='radio'" onfocus="this.className='inputedit';this.select()" class="radio">C.<%=rsyued1("c")%><br><%end if%>
<% if rsyued1("d")<>"" then %> <input type="radio" value="D" <%if rsyued3("ruans")="D" then%> checked <%end if %> name="<%=textyued1%>" onblur="this.className='radio'" onfocus="this.className='inputedit';this.select()" class="radio">D.<%=rsyued1("d")%><br><%end if%>
<% if rsyued1("e")<>"" then %> <input type="radio" value="E" <%if rsyued3("ruans")="E" then%> checked <%end if %> name="<%=textyued1%>" onblur="this.className='radio'" onfocus="this.className='inputedit';this.select()" class="radio">E.<%=rsyued1("e")%><br><%end if%>
<% if rsyued1("f")<>"" then %> <input type="radio" value="F" <%if rsyued3("ruans")="F" then%> checked <%end if %> name="<%=textyued1%>" onblur="this.className='radio'" onfocus="this.className='inputedit';this.select()" class="radio">F.<%=rsyued1("f")%><br><%end if%>
<br><hr color="#4455AA">
</td>
</tr>
<% rsyued1.movenext
loop
%>
</table>
</td>
</tr>
<%
rsyued.MoveNext
If rsyued.EOF Then Exit For
iyued=iyued+1
Next
%>
<tr>
<td align="center" bgcolor="#FFFFFF" height="25" width="33" bordercolor="#FFFFFF">
</td>
<td align="center" bgcolor="#FFFFFF" height="25" width="714" bordercolor="#FFFFFF">
<input class="s02" type="submit" value="保存阅读理解" name="B5" style="float: middle"></td>
</tr>
</table> <br>
<% end if%><% end if%>
<table border="1" cellspacing="1" style="border-collapse: collapse" bordercolor="#799AE1" width="100%" height="1">
<tr>
<td align="center" bgcolor="#FFFFFF" height="1" width="640" bordercolor="#FFFFFF">
<span lang="en-us">
</span>
<input type="submit" value="我要交卷" name="B4" class="s02" onclick="submitit(<%=kcid%>)" style="color: #FF0000" ></td>
</tr>
</table>
<p align="center"><br>
<br><%ss=DateDiff("s", time, etime)
%>
</p>
<%
%><!-- PersistentLayer--><input type="hidden" name="kcid" value="<%=kcid%>" size="20"><input type="hidden" name="paperno" value="<%=paperno%>" size="20"><input type="hidden" name="starttime" value="<%=stime%>" size="20"><input type="hidden" name="endtime" value="<%=etime%>" size="20"><input type="hidden" name="hourtime" value="<%
response.write ss\3600
%>" size="20"><input type="hidden" name="minutetime" value="<%
response.write (ss/60) mod 60
%>" size="20"><input type="hidden" name="secondtime" value="<%
response.write ss mod 60
%>" size="20"><input type="hidden" name="nowtime" value="<%
response.write time
%>" size="20"><div id="persistMenu" style="position: absolute; height:153; width:166; left:600; top:106;z-index: 100; visibility: hidden" >
<table border="1" cellspacing="0" style="border-collapse: collapse; border-width: 1" width="158" id="AutoNumber1" cellpadding="0" height="20">
<tr>
<td width="157">
<table border="1" cellspacing="0" style="border-collapse: collapse" width="159" id="AutoNumber5" height="20" bgcolor="#799AE1" bordercolor="#799AE1" cellpadding="0">
<tr>
<td width="92" class=menu_title onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title'; bgcolor="#799AE1" onclick="switchSysBar1()" style="height: 25" background="images/admin_left_4.gif" >
<b><font size="2" color="#215DC6"><span id="switchPoint1">计时器</span></font></b></td>
</tr>
</table>
</td>
</tr>
</table>
<table border="1" cellspacing="0" style="border-collapse: collapse" bgcolor="#799AE1" width="161" id="AutoNumber2" cellpadding="0" height="122">
<tr>
<td width="159" height="122">
<div align="center">
<center>
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" id="AutoNumber3" width="143" height="111" bgcolor="#799AE1">
<tr>
<td height="28" width="61">
<p align="center"><font color="#FFFFFF">开始时间</font></td>
<td width="78" height="28">
<input type="text" name="mystarttime" size="11" class="s01" readonly ></td>
</tr>
<tr>
<td height="28" width="61">
<p align="center"><font color="#FFFFFF">结束时间</font></td>
<td width="78" height="28">
<input type="text" name="myendtime" size="11" class="s01" readonly ></td>
</tr>
<tr>
<td height="34" width="61">
<p align="center"><font color="#FFFFFF">剩余时间</font></td>
<td width="78" height="34"><input type="text" name="lefttime" size="11" class="s01" readonly ></td>
</tr>
<tr>
<td height="13" width="61">
<p align="center"><font color="#FF0000">请先保存</font></td>
<td width="78" height="13">
<input type="submit" value="我要交卷" name="B3" class="s02" onclick="submitit(<%=kcid%>)" ></td>
</tr>
</table>
</center>
</div>
</td>
</tr>
</table>
</div>
<!--End PersistentLayer-->
<script language="javascript">
MM_showHideLayers('persistMenu','','show');
ScrollMenu();
document.all.mystarttime.value=document.all.starttime.value;
document.all.myendtime.value=document.all.endtime.value;
var myh=document.all.hourtime.value;
var mym=document.all.minutetime.value;
var mys=document.all.secondtime.value;
var kcid=document.all.kcid.value
var et=document.all.endtime.value
var nt=document.all.nowtime.value;
function lefttime(){
mys--;
if (mys<0)
{
mys=59;
mym--;
}
if (mym<0)
{
mym=59;
myh--;
if (myh<0)
{
testform.submit();
alert("考试时间到，请提交您的试卷！");
testform.action="iamok_ks.asp?kcid="+kcid
}
}
document.all.lefttime.value=myh+":"+mym+":"+mys;
setTimeout("lefttime(myh)",1000);
}
lefttime();
function submitit(id)
{
testform.submit();
if (confirm("未到交卷时间，您确定要提前交卷么？"))
{
testform.action="iamok_ks.asp?kcid="+id
}
}
</script>
</form>
<%end if
end if
end if
end if %>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -