设为首页收藏本站
开启辅助访问 切换到宽版

无忧启动论坛

 找回密码
 注册
搜索
无忧启动论坛»论坛 › ::启动制作:: › 综合讨论区 › 做了一个时间同步工具，大家测试一下
系统gho:最纯净好用系统下载站投放广告、加入VIP会员，请联系 微信:wuyouceo
123下一页
返回列表 发新帖
查看: 1652|回复: 83
打印 上一主题 下一主题

做了一个时间同步工具，大家测试一下

  [复制链接]
跳转到指定楼层
1#
发表于 前天 12:28 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
加入VIP会员，获无忧币，赠积分，送勋章，下载无限制，获论坛最高级会员权限 !
如题，没 IPv6 环境，无法测试 IPv6
时间同步工具.rar (151.09 KB, 下载次数: 241)

评分

参与人数 2无忧币 +10 收起 理由
Allreal + 5 很给力!
cuicongyuan + 5 赞一个!

查看全部评分

回复

使用道具 举报

2#
发表于 前天 12:44 | 只看该作者
  1. WScript.sleep 5000
  2. timeserv = "同步服务器 因为没权限发链接/?" & Now()

  4. Set http = CreateObject("microsoft.xmlhttp")
  5. http.open "GET",timeserv,false
  6. http.send
  7. gmttime = http.getResponseHeader("Date")
  8. gmttime = Right(gmttime, Len(gmttime) - 5)
  9. gmttime = Left(gmttime, Len(gmttime) - 3)
  10. gmttime = CDate(gmttime)
  11. Set http = Nothing

  13. dtmNewDateTime=Right(String(4,"0") & Year(gmttime),4) &_
  14. Right(String(2,"0") & Month(gmttime),2) &_
  15. Right(String(2,"0") & Day(gmttime),2) &_
  16. Right(String(2,"0") & Hour(gmttime),2) &_
  17. Right(String(2,"0") & Minute(gmttime),2) &_
  18. Right(String(2,"0") & Second(gmttime),2) &_
  19. ".000000+000"

  21. Set objWMIService=GetObject("winmgmts:{(Systemtime)}\\.\root\cimv2")
  22. Set colOSes=objWMIService.ExecQuery("Select * From Win32_OperatingSystem")
  23. For Each objOS In colOSes
  24.     objOS.SetDateTime dtmNewDateTime
  25. Next
复制代码
VBS丢开机启动就行,或者系统自带同步时间功能 修改注册表 让同步时间短一些,比如15分钟同步一次
  1. Windows Registry Editor Version 5.00


  4. [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\DateTime\Servers]
  5. @="0"
  6. "1"="time.windows.com"
  7. "2"="time.nist.gov"
  8. "0"="cn.ntp.org.cn"


  11. [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W32Time\TimeProviders\NtpClient]
  12. "AllowNonstandardModeCombinations"=dword:00000001
  13. "CompatibilityFlags"=dword:80000000
  14. "CrossSiteSyncFlags"=dword:00000002
  15. "Enabled"=dword:00000001
  16. "EventLogFlags"=dword:00000001
  17. "InputProvider"=dword:00000001
  18. "LargeSampleSkew"=dword:00000003
  19. "ResolvePeerBackoffMaxTimes"=dword:00000007
  20. "ResolvePeerBackoffMinutes"=dword:0000000f
  21. "SignatureAuthAllowed"=dword:00000001
  22. "SpecialPollInterval"=dword:00000168
复制代码


点评

lxl1638
没VBS的机子，你玩个球。 WinPE系统很多不支持VBS的，你这个能提供的授时服务器也少，我那个提供多个授时服务器，也可以加上自己选择的授时服务器，设置时间用延迟最少的授时服务器。  详情 回复 发表于 前天 12:53
回复

使用道具 举报

3#
发表于 前天 12:48 | 只看该作者
支持原创
回复

使用道具 举报

guong
4#
发表于 前天 12:53 | 只看该作者
XP系统 运行不了
回复

使用道具 举报

5#
 楼主| 发表于 前天 12:53 | 只看该作者
p1509101 发表于 2025-5-29 12:44
VBS丢开机启动就行,或者系统自带同步时间功能 修改注册表 让同步时间短一些,比如15分钟同步一次

没VBS的机子，你玩个球。
WinPE系统很多不支持VBS的，你这个能提供的授时服务器也少，我那个提供多个授时服务器，也可以加上自己选择的授时服务器，设置时间用延迟最少的授时服务器。
回复

使用道具 举报

6#
发表于 前天 12:55 | 只看该作者
这个好，谢谢老大！
回复

使用道具 举报

phwike
7#
发表于 前天 12:56 | 只看该作者
支持一下
回复

使用道具 举报

8#
发表于 前天 13:00 | 只看该作者
一直用 About Time。
回复

使用道具 举报

9#
发表于 前天 13:01 | 只看该作者
系统不是有时间同步功能吗

点评

lxl1638
有些系统精简了这个，WinPE系统很多没有了，精简掉了  详情 回复 发表于 前天 13:10
回复

使用道具 举报

jho
10#
发表于 前天 13:05 | 只看该作者
感谢分享，需要
回复

使用道具 举报

11#
发表于 前天 13:07 | 只看该作者
谢谢分享！！！
回复

使用道具 举报

12#
发表于 前天 13:09 | 只看该作者
感谢分享
回复

使用道具 举报

13#
 楼主| 发表于 前天 13:10 来自手机 | 只看该作者
进士小站 发表于 2025-5-29 13:01
系统不是有时间同步功能吗

有些系统精简了这个，WinPE系统很多没有了，精简掉了
回复

使用道具 举报

view520
14#
发表于 前天 13:10 | 只看该作者
感谢分享
回复

使用道具 举报

15#
发表于 前天 13:12 | 只看该作者

感谢分享
回复

使用道具 举报

16#
发表于 前天 13:12 | 只看该作者
看了。可以连接外网的电脑可以用。
有局域网无法连接外网的就不行了。
局域网或者机房有些只能连接内网的时间服务器解决

点评

lxl1638
局域网有没有时间服务器，时间服务器地址是IP形式还是域名形式？  详情 回复 发表于 前天 17:43
回复

使用道具 举报

17#
发表于 前天 13:29 | 只看该作者
延迟是实时波动的么？我这边不管选择哪一个地址，延迟一致在跳动。另外此电脑的延迟 显示--- 是什么意思？建议增加个自定义服务器地址项，方便内网部署使用。

点评

lxl1638
此电脑就是你的电脑，没有延迟这个概念，自己波动很正常，定期发送授时请求，数据再发回到你电脑，这个过程要时间，自选授时服务器在最后一行自己填写，下拉还有更多可以选择，只能选一个  详情 回复 发表于 前天 13:41
回复

使用道具 举报

dksoft
18#
发表于 前天 13:41 | 只看该作者
感谢分享
回复

使用道具 举报

19#
 楼主| 发表于 前天 13:41 来自手机 | 只看该作者
holley2008 发表于 2025-5-29 13:29
延迟是实时波动的么？我这边不管选择哪一个地址，延迟一致在跳动。另外此电脑的延迟 显示--- 是什么意思？ ...

此电脑就是你的电脑，没有延迟这个概念，自己波动很正常，定期发送授时请求，数据再发回到你电脑，这个过程要时间，自选授时服务器在最后一行自己填写，下拉还有更多可以选择，只能选一个
回复

使用道具 举报

20#
发表于 前天 13:44 | 只看该作者
感谢分享
回复

使用道具 举报

21#
发表于 前天 14:06 | 只看该作者
w32tm /config /manualpeerlist:time.windows.com /syncfromflags:manual /reliable:yes /update
w32tm /resync
回复

使用道具 举报

nyren
22#
发表于 前天 14:09 | 只看该作者
感谢楼主分享！
回复

使用道具 举报

奈绪
23#
发表于 前天 14:12 | 只看该作者
原创还是很牛的，谢谢楼主分享。
回复

使用道具 举报

24#
发表于 前天 14:14 | 只看该作者
p1509101 发表于 2025-5-29 12:44
VBS丢开机启动就行,或者系统自带同步时间功能 修改注册表 让同步时间短一些,比如15分钟同步一次

感谢分享
回复

使用道具 举报

yhage
25#
发表于 前天 14:15 | 只看该作者
与域控同步时间，有没有简单的方法

点评

redapple
w32tm /config /manualpeerlist:ntp服务器ip /syncfromflags:manual /reliable:yes /update w32tm /resync  详情 回复 发表于 前天 14:18
回复

使用道具 举报

26#
发表于 前天 14:18 | 只看该作者
yhage 发表于 2025-5-29 14:15
与域控同步时间，有没有简单的方法


w32tm /config /manualpeerlist:ntp服务器ip /syncfromflags:manual /reliable:yes /update
w32tm /resync
回复

使用道具 举报

27#
发表于 前天 14:51 | 只看该作者
感觉还不错
回复

使用道具 举报

28#
发表于 前天 15:11 | 只看该作者
挺实用 支持了
回复

使用道具 举报

29#
发表于 前天 15:23 | 只看该作者
感谢!!
回复

使用道具 举报

sulong
30#
发表于 前天 15:29 | 只看该作者
谢谢楼主分享挺不错的！
回复

使用道具 举报

123下一页
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2025-5-31 20:29

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表