test1.asp
来自「ASP 网页数据库短训教程源码」· ASP 代码 · 共 20 行
ASP
20 行
<%@ Language=VBScript%>
<HTML>
<HEAD><TITLE>考试答题页面</TITLE></HEAD>
<SCRIPT LANGUAGE=vbscript> ' 定义显示剩余时间的子程序
Public m
Sub tick(k)
m=k-1
t1.value = TimeSerial(0,0,m) ' 在文本框中显示剩余时间
if m =0 then exit sub
window.settimeout "tick(m)",1000 ' 设定执行函数tick()的定时间隔为1秒
End Sub
</SCRIPT>
</HEAD>
<BODY onload =tick(30*60) bgcolor=LightYellow>
<Center><FONT size=6 face=方正舒体 color= blue>网 上 考 试</FONT><HR>
<FONT size=3 color= blue>考生编号:<%=Session("User")%></FONT>
剩余时间:<INPUT type=text name=t1 size=10>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?