| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 460 人关注过本帖
标题:请问一下在什么情况下会计算出现189912300000
只看楼主 加入收藏
oreoleo
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2012-10-16
结帖率:0
收藏
已结贴  问题点数:20 回复次数:6 
请问一下在什么情况下会计算出现189912300000
这是一个获得网络时间,然后进行对比验证的脚本,现在想知道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
搜索更多相关主题的帖子: False 百度 
2012-10-16 11:54
Artless
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:103
帖 子:4211
专家分:28888
注 册:2009-4-8
收藏
得分:0 
datetxt=XmlHttp.getResponseHeader("Date")
结果是什么

无知
2012-10-16 12:20
oreoleo
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2012-10-16
收藏
得分:0 
应该是一个返回值
2012-10-16 12:36
bczgvip
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:66
帖 子:1310
专家分:5312
注 册:2009-2-26
收藏
得分:7 
debug.print typename(datetxt),datetxt '看看立即窗口。
2012-10-16 14:18
oreoleo
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2012-10-16
收藏
得分:0 
If ShiJian=189912300000
我想知道 这里的189912300000是怎么得来的
2012-10-16 14:59
Artless
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:103
帖 子:4211
专家分:28888
注 册:2009-4-8
收藏
得分:7 
以下是引用oreoleo在2012-10-16 14:59:21的发言:

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


无知
2012-10-16 15:00
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:7 
189912300000

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

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

授人于鱼,不如授人于渔
早已停用QQ了
2012-10-16 16:21
快速回复:请问一下在什么情况下会计算出现189912300000
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017102 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved