怎样获取服务器时间（要精确到秒哦）

程序集 窗口程序集1

子程序 _按钮1_被单击

局部变量 XML对象, 对象

局部变量 时间文本, 文本型

按钮1禁止 ＝ 真

如果真 (XML对象创建 (“MSXML2XMLHTTP”, ) ＝ 假)

如果真 (XML对象创建 (“MicrosoftXMLHTTP”, ) ＝ 假)

返回 ()

如果真结束

如果真结束

XML对象方法 (“open”, 编辑框2内容, 编辑框1内容, 假)

XML对象方法 (“send”, )

时间文本 ＝ XML对象读文本属性 (“getResponseHeader”, “Date”)

标签1标题 ＝ “当前服务器时间为：” ＋ 到文本 (时间格式化 (时间文本))

按钮1禁止 ＝ 假

子程序 时间格式化, 日期时间型

参数 时间文本, 文本型

局部变量 临时数组, 文本型, , "0"

局部变量 临时变量, 文本型

局部变量 时间变量, 日期时间型

局部变量 临时时间, 日期时间型

局部变量 日, 文本型

局部变量 月, 文本型

局部变量 年, 文本型

局部变量 时, 文本型

局部变量 分, 文本型

局部变量 秒, 文本型

临时数组 ＝ 分割文本 (时间文本, “, ”, )

临时变量 ＝ 临时数组 [2]

临时变量 ＝ 子文本替换 (临时变量, “ GMT”, , , , 真)

清除数组 (临时数组)

临时数组 ＝ 分割文本 (临时变量, “ ”, )

日 ＝ 临时数组 [1]

判断开始 (临时数组 [2] ＝ “Jan”)

月 ＝ “01”

判断 (临时数组 [2] ＝ “Feb”)

月 ＝ “02”

判断 (临时数组 [2] ＝ “Mar”)

月 ＝ “03”

判断 (临时数组 [2] ＝ “Apr”)

月 ＝ “04”

判断 (临时数组 [2] ＝ “Mar”)

月 ＝ “05”

判断 (临时数组 [2] ＝ “Jun”)

月 ＝ “06”

判断 (临时数组 [2] ＝ “Jul”)

月 ＝ “07”

判断 (临时数组 [2] ＝ “Aug”)

月 ＝ “08”

判断 (临时数组 [2] ＝ “Sep”)

月 ＝ “09”

判断 (临时数组 [2] ＝ “Oct”)

月 ＝ “10”

判断 (临时数组 [2] ＝ “Nov”)

月 ＝ “11”

判断 (临时数组 [2] ＝ “Dec”)

月 ＝ “12”

默认

判断结束

年 ＝ 临时数组 [3]

临时变量 ＝ 临时数组 [4]

清除数组 (临时数组)

临时数组 ＝ 分割文本 (临时变量, “:”, )

时 ＝ 到文本 (到整数 (临时数组 [1]))

分 ＝ 临时数组 [2]

秒 ＝ 临时数组 [3]

时间变量 ＝ 到时间 (年 ＋ “/” ＋ 月 ＋ “/” ＋ 日 ＋ “/” ＋ 时 ＋ “/” ＋ 分 ＋ “/” ＋ 秒)

时间变量 ＝ 增减时间 (时间变量, #小时, 8) ' 转换为北京时间

返回 (时间变量)

如果想返回服务器日期，时间包括秒，请用<%=now()%>

这里附带下：<%=date()%>显示日期 例如：2006-6-30

<%=Time()%>显示时间 例如：21:12:12

微软承诺在一定的兼容平台下，Windows7的启动速度是10秒。

但就实际情况来说这个速度是不可能达到的了。

一般的家用电脑在系统完全，硬件兼容，驱程完整的情况下

从开机到进入桌面的正常启动速度是20~40秒左右（自家电脑在26~30秒左右）

在不同的硬件平台这一时间是浮动的。

如果不是你的网站，你只能查看域名注册时间和IP！有些服务器是按月购买的，什么是按年购买的检查服务器地址。您可以ping服务器的IP地址，然后检查问题2的IP地址，如果您可以检查租用时间，您必须联系服务器提供商。如果能随意查看租车时间，应该是不安全的。如果所有者租用服务器，其他人可以查看您的信息。