有阴也有阳 发表于 2019-6-17 11:27:16

[原创工具] 自动校准时间工具 献给我亲爱的吾爱大家庭

本帖最后由 有阴也有阳 于 2019-6-18 10:01 编辑


      从吾爱破解论坛搬运而来，原帖地址：https://www.52pojie.cn/thread-975193-1-1.html。

      最近公司服务器时间老是跑偏，而且我看了下 微软自带的校时工具是间隔一礼拜......

      大家有可能不知道 我这小脾气，这种事能忍？ 绝壁不OK

      一气之下，写了这个自动校时工具。

      工具是小工具，关键能解决问题就是好的， 有需要的朋友拿去吧.....

      


      链接：https://pan.baidu.com/s/1ieaJK9fL8YG-JZSSPz_Heg
      
      提取码：2wtj

      

      转贴者的使用效果——这个软件很不错，给大家推荐一下：

      




窄口牛 发表于 2019-6-17 11:37:10

一个批处理就行了，关键是找你系统最快的nt服务器。

chishingchan 发表于 2019-6-17 11:41:37

VBScript 版
timeserv = "http://time.windows.com/?" & Now()

Set http = CreateObject("microsoft.xmlhttp")
http.open "GET",timeserv,false
http.send
gmttime = http.getResponseHeader("Date")
gmttime = Right(gmttime, Len(gmttime) - 5)
gmttime = Left(gmttime, Len(gmttime) - 3)
gmttime = CDate(gmttime)
Set http = Nothing

dtmNewDateTime=Right(String(4,"0") & Year(gmttime),4) &_
Right(String(2,"0") & Month(gmttime),2) &_
Right(String(2,"0") & Day(gmttime),2) &_
Right(String(2,"0") & Hour(gmttime),2) &_
Right(String(2,"0") & Minute(gmttime),2) &_
Right(String(2,"0") & Second(gmttime),2) &_
".000000+000"

Set objWMIService=GetObject("winmgmts:{(Systemtime)}\\.\root\cimv2")
Set colOSes=objWMIService.ExecQuery("Select * From Win32_OperatingSystem")
For Each objOS In colOSes
    objOS.SetDateTime dtmNewDateTime
Next

scu 发表于 2019-6-17 12:47:12

留着备用。谢谢转帖。

nttwqz 发表于 2019-6-18 00:07:40

一礼拜？难道楼主不知道搜一下注册表怎么改？还有计划任务，w32tm了解一下

董大 发表于 2019-6-18 00:08:09

谢谢楼主的分享，辛苦啦

995070995 发表于 2019-6-18 06:59:13

感谢分享！收藏

renchmin 发表于 2019-6-18 08:18:09

现在一直在使用红叶校时软件，感觉效果还是很不错的。

445112826 发表于 2019-6-18 09:32:45

收藏一个玩，谢谢分享。

gblgbl 发表于 2019-6-18 09:42:42

感谢分享！

wxgwxg 发表于 2019-6-18 09:48:52

建议你上GPS时钟。

大话足球 发表于 2019-6-18 09:51:33

这个工具挺好的

chinaren12 发表于 2019-6-18 10:26:30

renchmin 发表于 2019-6-18 08:18
现在一直在使用红叶校时软件，感觉效果还是很不错的。

我也用红叶校时。还行

七色鱼 发表于 2019-6-18 11:59:12

谢谢楼主分享，太棒了

promrhxq 发表于 2019-6-18 13:30:04

自动校准时间工具，好工具收藏了

魅力舞兵 发表于 2019-6-18 15:10:23

20110225 发表于 2019-6-19 07:32:14

楼主辛苦了，非常感谢分享!

hzjyswf 发表于 2019-6-19 08:05:29

感谢分享。

追风 发表于 2019-6-19 21:31:17

有时时间不准，有这个方便多了，谢谢分享

mooning 发表于 2019-6-19 23:06:31

下载备用，谢谢。

ziyerain 发表于 2019-6-20 00:07:55

        很给力

20121010168 发表于 2019-6-20 09:34:52

用的自带的校时功能，只是换了个服务器并改了下同步周期
页: [1]
查看完整版本: [原创工具] 自动校准时间工具 献给我亲爱的吾爱大家庭