设为首页收藏本站订阅更新

无忧脚本

 找回密码
 加入无忧

QQ登录

只需一步,快速开始

查看: 3504|回复: 9

[其他] 求一个如奥运倒计时牌那样显示的倒计时程序 [复制链接]

Rank: 3Rank: 3

升级  60.67%

注册时间
2005-10-8
威望
174
阅读权限
30
积分
382
帖子
163
精华
0
UID
38933
状态
当前离线
发表于 2007-10-31 14:32:04 |显示全部楼层 |串个门|加好友|打招呼|发消息 |
查看详细资料
一键分享 一键分享
突然想到这样的一个小程序,不知道能不能做,比如我要在我的主页上挂一个页面,上面只显示这样的一个东西,就是像奥运倒计时牌那样显示的倒计时。比如设定180天倒计时。包括天,时,分,秒,跑秒。不知道这样的程序(ASP/VBS)怎么写。请求赐教。另外这个似乎FLASH也可以做,不知道有没有,谢谢大家!

Rank: 8Rank: 8

注册时间
2005-8-27
威望
3920
阅读权限
150
积分
7274
帖子
3962
精华
0
UID
36069
状态
当前离线
发表于 2007-11-1 00:25:29 |显示全部楼层 |串个门|加好友|打招呼|发消息 |
查看详细资料
  1. <Script Language="VBScript">
  2. <!--
  3. SetTimeOut "clock",1000
  4. sub clock()
  5. n=cdate("2008-8-8 20:0:0")
  6. sn=datediff("s",now(),n)
  7. days=sn\3600*24
  8. hours=(sn mod (3600*24))\3600
  9. minutes=((sn mod (3600*24)) mod 3600)\60
  10. seconds=((sn mod (3600*24)) mod 3600) mod 60
  11. times="离北京奥运会 2008年8月8日 20:00:00还有:" & days & "天" & hours & "小时" & minutes & "分" & seconds & "秒"
  12. nowt.innerhtml=times
  13. SetTimeOut "clock",1000
  14. End sub
  15. -->
  16. </script>

  17. <center id="nowt"></center>
复制代码运行代码另存代码
四十岁以后,不滞于物,B,C,D,J皆可编程,自此精修,渐入无代码胜有代码之境。
我什么时候讲过我是高手?

使用道具 举报

Rank: 3Rank: 3

升级  60.67%

注册时间
2005-10-8
威望
174
阅读权限
30
积分
382
帖子
163
精华
0
UID
38933
状态
当前离线
发表于 2007-11-1 17:47:16 |显示全部楼层 |串个门|加好友|打招呼|发消息 |
查看详细资料
斑竹真的是太有才了 而且愿意分享  谢谢!

使用道具 举报

Rank: 3Rank: 3

升级  60.67%

注册时间
2005-10-8
威望
174
阅读权限
30
积分
382
帖子
163
精华
0
UID
38933
状态
当前离线
发表于 2007-11-1 17:48:06 |显示全部楼层 |串个门|加好友|打招呼|发消息 |
查看详细资料
能不能实现跑秒!斑竹大大!

使用道具 举报

Rank: 8Rank: 8

注册时间
2005-8-27
威望
3920
阅读权限
150
积分
7274
帖子
3962
精华
0
UID
36069
状态
当前离线
发表于 2007-11-1 18:05:50 |显示全部楼层 |串个门|加好友|打招呼|发消息 |
查看详细资料
已经是跑秒啦
四十岁以后,不滞于物,B,C,D,J皆可编程,自此精修,渐入无代码胜有代码之境。
我什么时候讲过我是高手?

使用道具 举报

Rank: 3Rank: 3

升级  60.67%

注册时间
2005-10-8
威望
174
阅读权限
30
积分
382
帖子
163
精华
0
UID
38933
状态
当前离线
发表于 2007-11-2 08:09:12 |显示全部楼层 |串个门|加好友|打招呼|发消息 |
查看详细资料
呵呵  谢谢

我说的跑秒是秒后面的那个单位,好象一秒是99跑秒吧!  那种比赛计时器上用的!

使用道具 举报

Rank: 8Rank: 8

注册时间
2005-8-27
威望
3920
阅读权限
150
积分
7274
帖子
3962
精华
0
UID
36069
状态
当前离线
发表于 2007-11-8 18:23:33 |显示全部楼层 |串个门|加好友|打招呼|发消息 |
查看详细资料
跑秒

  1. <Script Language="VBScript">
  2. <!--
  3. pseconds=99
  4. SetTimeOut "clock",1000
  5. sub clock()
  6. n=cdate("2008-8-8 20:0:0")
  7. sn=datediff("s",now(),n)
  8. days=sn\3600*24
  9. hours=(sn mod (3600*24))\3600
  10. minutes=((sn mod (3600*24)) mod 3600)\60
  11. seconds=((sn mod (3600*24)) mod 3600) mod 60
  12. pseconds=pseconds-1
  13. if pseconds=0 then
  14. pseconds=99
  15. End if
  16. times="离北京奥运会 2008年8月8日 20:00:00还有:" & days & "天" & hours & "小时" & minutes & "分" & seconds & "秒" & pseconds
  17. nowt.innerhtml=times
  18. SetTimeOut "clock",10
  19. End sub
  20. -->
  21. </script>

  22. <center id="nowt"></center>
复制代码运行代码另存代码
四十岁以后,不滞于物,B,C,D,J皆可编程,自此精修,渐入无代码胜有代码之境。
我什么时候讲过我是高手?

使用道具 举报

Rank: 3Rank: 3

升级  11%

注册时间
2005-4-25
威望
151
阅读权限
30
积分
233
帖子
106
精华
0
UID
28286
状态
当前离线
发表于 2007-12-26 16:08:42 |显示全部楼层 |串个门|加好友|打招呼|发消息 |
查看详细资料 查看个人网站
有没有JS版的呀

VB在FF都不行

使用道具 举报

Rank: 8Rank: 8

注册时间
2005-8-27
威望
3920
阅读权限
150
积分
7274
帖子
3962
精华
0
UID
36069
状态
当前离线
发表于 2007-12-26 18:10:48 |显示全部楼层 |串个门|加好友|打招呼|发消息 |
查看详细资料
你去js版块看看吧
四十岁以后,不滞于物,B,C,D,J皆可编程,自此精修,渐入无代码胜有代码之境。
我什么时候讲过我是高手?

使用道具 举报

Rank: 3Rank: 3

升级  70%

注册时间
2005-3-17
威望
219
阅读权限
30
积分
410
帖子
226
精华
0
UID
25319
状态
当前离线
发表于 2008-6-11 07:42:21 |显示全部楼层 |串个门|加好友|打招呼|发消息 |
查看详细资料 QQ

使用道具 举报

您需要登录后才可以回帖 登录 | 加入无忧

Archiver|手机版|无忧脚本 ( 苏ICP备05080427号 )|值班电话:027-62300445  

GMT+8, 2012-2-7 21:42 , Processed in 0.070245 second(s), 14 queries , Gzip On, Memcache On.

Powered by Discuz! X2

© 1999-2011 无忧脚本

回顶部