网络<% 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>
网络考场(4)(转)smessage.asp
80酷酷网 80kuku.com