lx6_1.htm

来自「ASP 网页数据库短训教程源码」· HTM 代码 · 共 30 行

HTM
30 行
字号 
<%@ Language=VBScript%>
<HTML>
  <HEAD><TITLE>计时器</TITLE></HEAD>
    <SCRIPT LANGUAGE=vbscript>
      ' 定义一个显示剩余时间的子程序
      Public m,q
      q=1
      Sub tick(k)
        m=k-1
        t1.value = TimeSerial(0,0,m)
        if m =0 or q=0 then
          exit sub
        end if
        window.settimeout "tick(m)",1000		' 设定执行函数tick()的定时间隔为1秒
      End Sub
    </SCRIPT>
  </HEAD>
     <!--定义Window对象的load事件（加载该网页时）执行函数tick()，
         继而引发函数tick()中的window.setTimeout("tick();",1000)
         语句，从而使网页能在1秒内刷新一次时间-->
  <BODY onload =tick(1*60) bgcolor=LightYellow>		<!--' 设定时间为1分钟-->
    <Center><FONT size=6 face=方正舒体 color= blue>计时器</FONT><HR>
        剩余时间：<INPUT type=text name=t1 size=10>
    <INPUT Type=button value=停止 id=a0>
    <script for=a0 event=onclick Language=VBScript>
      q=0
    </script>
  </BODY>
</HTML>

lx6_1.htm - 源码说明

本页面展示了「ASP 网页数据库短训教程源码」中的 lx6_1.htm 源码文件，采用 HTM 编程语言编写，共 30 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与ASP相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?