源码网,源码论坛,源码之家,商业源码,游戏源码下载,discuz插件,棋牌源码下载,精品源码论坛

 找回密码
 立即注册
查看: 750|回复: 40

[编程10000问] 如何制作一个倒计时的程序?

[复制链接]

7万

主题

861

回帖

32万

积分

论坛元老

Rank: 8Rank: 8

积分
329525
发表于 2006-11-16 00:00:00 | 显示全部楼层 |阅读模式

<%
CountdownDate = #1/1/2008 00:00:00AM#
If Date >= CountdownDate Then
    Response.Write "2008  北京"
    Response.End
End If

theDate    = Now
DaysLeft    = DateDiff("d",theDate,CountdownDate) - 1
theDate    = DateAdd("d",DaysLeft,theDate)
HoursLeft  = DateDiff("h",theDate,CountdownDate) - 1
theDate    = DateAdd("h",HoursLeft,theDate)
MinutesLeft = DateDiff("n",theDate,CountdownDate) - 1
theDate    = DateAdd("n",MinutesLeft,theDate)
SecondsLeft = DateDiff("s",theDate,CountdownDate) - 1
%>

<html>
<body>
现在时间: <%= Now %>
<p>
距离2008年还有 <%= DaysLeft%>天<%= HoursLeft %> 小时<%= MinutesLeft %>分 <%= SecondsLeft %>秒.走得最急的,都是最美的时光.
</body></html>

[1]

回复

使用道具 举报

29

主题

2万

回帖

194

积分

注册会员

Rank: 2

积分
194
发表于 2022-10-28 10:46:21 | 显示全部楼层
的沙发水电费水电费
回复 支持 反对

使用道具 举报

0

主题

2万

回帖

66

积分

注册会员

Rank: 2

积分
66
发表于 2023-2-11 13:40:54 | 显示全部楼层
啪啪啪生怕PSP怕
回复 支持 反对

使用道具 举报

5

主题

2万

回帖

69

积分

注册会员

Rank: 2

积分
69
发表于 2023-6-23 23:50:13 | 显示全部楼层
刷屏刷屏刷屏
回复 支持 反对

使用道具 举报

0

主题

1万

回帖

0

积分

中级会员

Rank: 3Rank: 3

积分
0
发表于 2023-9-15 17:59:13 | 显示全部楼层
可以,看卡巴
回复 支持 反对

使用道具 举报

0

主题

1万

回帖

0

积分

中级会员

Rank: 3Rank: 3

积分
0
发表于 2024-2-29 09:54:04 | 显示全部楼层
激动人心,无法言表!
回复 支持 反对

使用道具 举报

4

主题

2万

回帖

303

积分

中级会员

Rank: 3Rank: 3

积分
303
发表于 2024-5-12 15:08:29 | 显示全部楼层
额风风风微风微风违法
回复 支持 反对

使用道具 举报

匿名  发表于 2024-5-12 15:13:28

Экскурсионные Туры В Самарканд


Наличие ресторана https://letstrip.uz/ru/tours

Проживание включено https://letstrip.uz/ru/transfer/15

Проживание включено https://letstrip.uz/ru/tours/3

Туроператор ВАНД поможет вам открыть интересные места, где бывает не так много путешественников https://letstrip.uz/ru/transfer/12

Очень давно хотела побывать в Узбекистане https://letstrip.uz/ru/transfer/9
  Вот решилась взять тур на начало января по маршруту Ташкент-Самарканд-Бухара https://letstrip.uz/ru/transfer/11
  Нас было двое, так как не сезон и тур получился индивидуальным https://letstrip.uz/ru/tours/5
  Я не буду опи https://letstrip.uz/ru/tours/4

87 отзывов https://letstrip.uz/ru/transfer/4

回复 支持 反对

使用道具

匿名  发表于 2024-5-12 15:14:02

Экскурсия В Горы Ташкент


Наличие Wi-fi https://letstrip.uz/ru/transfer/4

Религия https://letstrip.uz/ru/transfer/3
  Язык https://letstrip.uz/ru/tours/6

Климат https://letstrip.uz/ru/transfer/9

Питание включено https://letstrip.uz/ru/transfer

С 29 https://letstrip.uz/ru/transfer/10
02 https://letstrip.uz/ru/transfer
2024 на 6 ночей https://letstrip.uz/ru/tours/6

С 29 https://letstrip.uz/ru/transfer/16
02 https://letstrip.uz/ru/tours/6
2024 на 6 ночей https://letstrip.uz/ru/transfer/4

回复 支持 反对

使用道具

匿名  发表于 2024-5-12 15:15:19

Экскурсии В Бухаре На Русском Языке

0608fv3 ·±нУЪ 2024-2-29 09:54
¤ИЛРДОЮ·ЁСФ±н

Гастрономические туры в Узбекистан https://letstrip.uz/ru/transfer/8

Были в Узбекистане со 2 по 8 ноября 2018 года https://letstrip.uz/ru/transfer/17
  Хива-Бухара-Самарканд https://letstrip.uz/ru/tours/3
  Великолепный тур https://letstrip.uz/ru/transfer/12
  Море впечатлений https://letstrip.uz/ru/transfer/4
  Гостеприимные люди https://letstrip.uz/ru
  Великолепный гид Рустам https://letstrip.uz/ru/transfer/4
  Хорошие гостиницы (3*),с вкусными завтраками https://letstrip.uz/ru/transfer/12
  Вс https://letstrip.uz/ru/tours/5

Наличие Wi-fi https://letstrip.uz/ru/transfer/8

Перелет включен https://letstrip.uz/ru/tours/2

Перелет включен https://letstrip.uz/ru/transfer/7

Наличие Wi-fi https://letstrip.uz/ru/tours/1

回复 支持 反对

使用道具

高级模式
B Color Image Link Quote Code Smilies

本版积分规则

手机版|小黑屋|网站地图|源码论坛 ( 海外版 )

GMT+8, 2024-11-23 22:43 , Processed in 0.167779 second(s), 26 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表