动态显示服务器时间的时钟

来源：互联网发布：什么是020商业模式知乎编辑：程序博客网时间：2024/04/26 18:53

现在的B/S项目里面有一个要求：在浏览器里面实现显示服务器时间的时钟。如果是显示客户端的时钟倒是很简单了，但是显示服务器段时钟就……。肯定是不能每秒刷新页面了，首先的想法就是取得客户端和服务器端的时间差，然后在客户端用Js脚本显示，这显示的自然就是客户端当前时间加上这个时间差了。

以前一直用的是JS，好像没有什么太容易的办法简单的实现诸如" 计算时间差", "加上一个时间间隔"这样的任务。好在 JS 没有但是 VBS 有啊， DataDiff 和 DateAdd 两个函数可以很轻松的完成上述任务。下面就是实现的 HTML 代码。

<!doctype html public "-//w3c//dtd html 4.01 transitional//en">

<html>

<head>

<title>Server Time</title>

Dim secondDiff

Sub UpdateTime()

clientTime.innerText = Now()

serverTime.innerText = DateAdd("s", secondDiff, Now())

End Sub

Sub SetTime(serverDateTime)

' 客户端时间

clientDateTime = Now()

' 秒差

secondDiff = DateDiff("s", clientDateTime, serverDateTime)

' 每秒更新

oInterval = setInterval("UpdateTime()", 1000)

End Sub

</script>

</head>

<body>

客户端时间：<label id="clientTime"></label><br>

服务器时间：<label id="serverTime"></label>

</body>

</html>