网络考场(4)(转)smessage.asp

80酷酷网    80kuku.com

  网络<% Language=VBScript %>
<%
'计算考试已过时间
gotime=hour(now())*60+minute(now())-hour(session("starttime"))*60-minute(session("starttime"))
'计算考试剩余时间
lefttime=session("testtime")-gotime
%>
<HTML>
<HEAD>
<META http-equiv=refresh content=60>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<P><FONT face=幼圆 size=2>考试时间:
<%=session("testtime")%></FONT>

<FONT face=幼圆 size=2>已过时间:
<%=gotime%></FONT>

<FONT face=幼圆 size=2>剩余时间:
<%=lefttime%></FONT>

<FONT face=幼圆 size=2>考试题量:
<%=session("testnum")%></FONT>

<FONT face=幼圆 size=2>已做题目:
<%=session("page")%></FONT>

<FONT face=幼圆 size=2>剩余题目:
<%=session("testnum")-session("page")%></FONT>

<P><FONT face="" size=2>
<A href="logon.asp"  target="_top">退出网络考场</A></FONT></P>
</BODY>
</HTML>

分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: