注册 登录
编程论坛 VB6论坛

请问一下在什么情况下会计算出现189912300000

oreoleo 发布于 2012-10-16 11:54, 460 次点击
这是一个获得网络时间,然后进行对比验证的脚本,现在想知道189912300000是怎么得出的? 就是我有2太联网的机器,不知道为什么1台可以过验证,一台就显示未连接,既是189912300000。求助,附上源码,请大侠解决我的问题

Sub 时间限制
     VBSBegin
        ' //获取百度原始时间
         Set XmlHttp = CreateObject("Microsoft.XMLHTTP")
         XmlHttp.Open "Get", "http://www., False
         XmlHttp.send
         datetxt=XmlHttp.getResponseHeader("Date")
         Set XmlHttp = Nothing
         ' //将获取到的原始时间进行格式化 2010年03月11日 03:09:52
         temdate = Split(datetxt, ",")
         tempvar = Replace(temdate(1), "GMT", "")
         temptim = Split(tempvar, " ")
         Select Case temptim(2)
         Case "Jan":
         mon = "01"
         Case "Feb":
         mon = "02"
         Case "Mar":
         mon = "03"
         Case "Apr":
         mon = "04"
         Case "May":
         mon = "05"
         Case "Jun":
         mon = "06"
         Case "Jul":
         mon = "07"
         Case "Aug":
         mon = "08"
         Case "Sep":
         mon = "09"
         Case "Oct":
         mon = "10"
         Case "Nov":
         mon = "11"
         Case "Dec":
         mon = "12"
         End Select
         '//将获取到的时间转换为北京时间+8小时
         timeGMT = CDate(temptim(3) & "年" & mon & "月" & temptim(1) & "日" & temptim(4))
         GetNetTime = DateAdd("h",8, timeGMT)
     VBSEnd
    ShiJian = (Year(GetNetTime) & Right("0" & Month(GetNetTime),2) & Right("0" & Day(GetNetTime),2) & Right("0" & Hour(GetNetTime),2) & Right("0" & Minute(GetNetTime),2))
     If ShiJian=189912300000
         MessageBox "未连接到服务器"
         EndScript
//以下数字就是脚本到期时间
     ElseIf ShiJian<201211121630
         Delay 100
     Else
        MessageBox "服务器升级维护 "
        Delay 100
        
       EndScript
6 回复
#2
Artless2012-10-16 12:20
datetxt=XmlHttp.getResponseHeader("Date")
结果是什么
#3
oreoleo2012-10-16 12:36
应该是一个返回值
#4
bczgvip2012-10-16 14:18
debug.print typename(datetxt),datetxt '看看立即窗口。
#5
oreoleo2012-10-16 14:59
If ShiJian=189912300000
我想知道 这里的189912300000是怎么得来的
#6
Artless2012-10-16 15:00
以下是引用oreoleo在2012-10-16 14:59:21的发言:

If ShiJian=189912300000
我想知道 这里的189912300000是怎么得来的

#7
风吹过b2012-10-16 16:21
189912300000

为什么不是  190001010000 呢?????

要知道 189912300000 比 190001010000 早 48 小时,
时间表示不是以后面这个时间为基准吗???
1