设为首页收藏本站
切换到宽版

 找回密码
 注册
搜索
批处理之家»论坛 › 批处理专区: BAT CMD DOS › BAT求助&讨论 › 内网时间服务器设置与同步
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发新帖
查看: 1127|回复: 4

[日期时间] 内网时间服务器设置与同步

[复制链接]
cutebe
发表于 2026-1-22 18:00:27 | 显示全部楼层 |阅读模式
时间服务器，时间准确或可通过北斗校时等
  1. ::内网时间服务器，IP10.123.0.77
  2. @echo off
  3. set "WinTime=HKLM\SYSTEM\CurrentControlSet\Services\W32Time"

  5. ::服务W32Time
  6. ::停止服务net stop w32time
  7. ::清注册表reg delete "%WinTime%" /f
  8. ::卸载服务w32tm /unregister
  9. ::注册服务w32tm /register

  11. ::启动类型自动，延迟启动
  12. reg add "%WinTime%" /v "Start" /t REG_DWORD /d 2 /f
  13. reg add "%WinTime%" /v "DelayedAutostart" /t REG_DWORD /d 1 /f

  15. ::启用NTP服务器，可靠时间源
  16. reg add "%WinTime%\TimeProviders\NtpServer" /v "Enabled" /t REG_DWORD /d 1 /f
  17. reg add "%WinTime%\Config" /v "AnnounceFlags" /t REG_DWORD /d 5 /f

  19. ::重启时间服务以应用更改
  20. net stop w32time && net start w32time
复制代码
客户端，需要校正时间的
  1. ::内网时间客户端
  2. @echo off
  3. set "WinTime=HKLM\SYSTEM\CurrentControlSet\Services\W32Time"

  5. ::服务W32Time
  6. ::停止服务net stop w32time
  7. ::清注册表reg delete "%WinTime%" /f
  8. ::卸载服务w32tm /unregister
  9. ::注册服务w32tm /register

  11. ::启动类型自动，延迟启动
  12. reg add "%WinTime%" /v "Start" /t REG_DWORD /d 2 /f
  13. reg add "%WinTime%" /v "DelayedAutostart" /t REG_DWORD /d 1 /f

  15. ::设置时间源（域名/IP）指向时间服务器
  16. reg add "%WinTime%\Parameters" /v "NtpServer" /t REG_SZ /d "10.123.0.77" /f
  17. ::同步间隔秒数
  18. reg add "%WinTime%\TimeProviders\NtpClient" /v "SpecialPollInterval" /t REG_DWORD /d 7200 /f

  20. ::时间服务器列表
  21. set "tsList=HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\DateTime\Servers"
  22. reg add "%tsList%" /ve /t REG_SZ /d "0" /f
  23. reg add "%tsList%" /v "0" /t REG_SZ /d "10.123.0.77" /f

  25. ::重启时间服务以应用更改
  26. net stop w32time && net start w32time
复制代码
回复

举报

宁处理
发表于 2026-1-22 18:12:40 | 显示全部楼层
感谢，研究研究。看看好不好实现。
回复

举报

cutebe
 楼主| 发表于 2026-1-23 09:30:43 | 显示全部楼层
内网时间服务器，可同时上外网，自身校时
  1. ::内网时间服务器，IP10.123.0.77
  2. @echo off
  3. set "WinTime=HKLM\SYSTEM\CurrentControlSet\Services\W32Time"

  5. ::服务W32Time
  6. ::停止服务net stop w32time
  7. ::清注册表reg delete "%WinTime%" /f
  8. ::卸载服务w32tm /unregister
  9. ::注册服务w32tm /register

  11. ::启动类型自动，延迟启动
  12. reg add "%WinTime%" /v "Start" /t REG_DWORD /d 2 /f
  13. reg add "%WinTime%" /v "DelayedAutostart" /t REG_DWORD /d 1 /f

  15. ::启用NTP服务器，作为可靠时间源
  16. reg add "%WinTime%\TimeProviders\NtpServer" /v "Enabled" /t REG_DWORD /d 1 /f
  17. reg add "%WinTime%\Config" /v "AnnounceFlags" /t REG_DWORD /d 5 /f

  19. ::外部时间源（域名/IP）
  20. reg add "%WinTime%\Parameters" /v "NtpServer" /t REG_SZ /d "time.edu.cn" /f
  21. ::同步间隔秒数
  22. reg add "%WinTime%\TimeProviders\NtpClient" /v "SpecialPollInterval" /t REG_DWORD /d 36000 /f

  24. ::外部时间服务器列表
  25. set "tsList=HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\DateTime\Servers"
  26. reg add "%tsList%" /ve /t REG_SZ /d "0" /f
  27. reg add "%tsList%" /v "0" /t REG_SZ /d "time.edu.cn" /f

  29. ::重启时间服务以应用更改
  30. net stop w32time && net start w32time
复制代码
回复

举报

cutebe
 楼主| 发表于 2026-1-23 09:46:27 | 显示全部楼层
内部服务端，有外网时可开机校对一次时间
  1. @echo off
  2. ::网络通则时间同步，不通则延时再检查。
  3. set "cn=0"
  4. set sync_flag=
  5. set/a ct=%random%%%4+5

  7. ::检测网络通断。成功%errorlevel%=0，失败1
  8. :chk_Net_status
  9. if "%cn%" gtr "%ct%" goto :eof
  10. echo 检查网络
  11. ping -n 1 -w 200 baidu.com&&call :SYNC_TIME||call :delay_qm
  12. if "%sync_flag%"=="1" goto :eof
  13. goto :chk_Net_status

  15. ::延时15秒
  16. :delay_qm
  17. echo 网络不通……
  18. timeout /t 15 /nobreak
  19. set/acn+=1
  20. goto :eof

  22. ::外部时间源（域名/IP）
  23. w32tm /monitor /computers:ntp.aliyun.com
  24. w32tm /config /syncfromflags:manual /manualpeerlist:"time.edu.cn" /update
  25. ::强制同步时间。成功err=0
  26. :SYNC_TIME
  27. echo 网络通
  28. echo 同步时间
  29. w32tm /resync /force
  30. set "sync_flag=1"
  31. goto :eof
复制代码
拖入下面图标加入开机启动
  1. ::拖入添加开机启动.BAT
  2. @echo off
  3. if "%~1"=="" goto :eof

  5. ::检查
  6. set HKLM_Run="HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
  7. set HKCU_Run="HKCU\Software\Microsoft\Windows\CurrentVersion\Run"
  8. reg query %HKLM_Run%|find /i "_s$Time$"&&set _run_sTime=1
  9. reg query %HKCU_Run%|find /i "_s$Time$"&&set _run_sTime=1

  11. ::存入目录
  12. set "PF=D:\Program Files"
  13. if not exist "%PF%\" md "%PF%"
  14. set "stFile=%PF%\同步时间_服务器.BAT"
  15. if not exist "%PF%\" md "%PF%"
  16. if not exist "%stFile%" copy/b/y "%~1" "%stFile%"

  18. ::添加注册表启动项
  19. if not "%_run_sTime%"=="1" (%_没有注册表启动项时才添加_%
  20.         reg add %HKCU_Run% /v _s$Time$ /d "%stFile%" /f
  21. )
  22. ::删除reg delete %HKCU_Run% /v _s$Time$ /f
复制代码
回复

举报

cutebe
 楼主| 发表于 2026-1-23 09:49:09 | 显示全部楼层
客户端开机校对一次时间

  2. @echo off
  3. ::网络通则时间同步，不通则延时再检查。
  4. set "cn=0"
  5. set sync_flag=
  6. set/a ct=%random%%%4+5

  8. ::检测网络通断。成功%errorlevel%=0，失败1
  9. :chk_Net_status
  10. if "%cn%" gtr "%ct%" goto :eof
  11. echo 检查网络
  12. ::校时服务器10.123.0.77
  13. ping -n 1 -w 200 10.123.0.77&&call :SYNC_TIME||call :delay_qm
  14. if "%sync_flag%"=="1" goto :eof
  15. goto :chk_Net_status

  17. ::延时15秒
  18. :delay_qm
  19. echo 网络不通……
  20. timeout /t 15 /nobreak
  21. set/acn+=1
  22. goto :eof

  24. ::内部时间源（域名/IP）
  25. w32tm /config /syncfromflags:manual /manualpeerlist:"10.123.0.77" /update
  26. ::强制同步时间。成功err=0
  27. :SYNC_TIME
  28. echo 网络通
  29. echo 同步时间
  30. w32tm /resync /force
  31. set "sync_flag=1"
  32. goto :eof
复制代码
拖放加入开机启动
  1. ::拖入添加开机启动.BAT
  2. @echo off
  3. if "%~1"=="" goto :eof

  5. ::检查
  6. set HKLM_Run="HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
  7. set HKCU_Run="HKCU\Software\Microsoft\Windows\CurrentVersion\Run"
  8. reg query %HKLM_Run%|find /i "_c$Time$"&&set _run_cTime=1
  9. reg query %HKCU_Run%|find /i "_c$Time$"&&set _run_cTime=1

  11. ::存入目录
  12. set "PF=D:\Program Files"
  13. if not exist "%PF%\" md "%PF%"
  14. set "ctFile=%PF%\同步时间_客户端.BAT"
  15. if not exist "%PF%\" md "%PF%"
  16. if not exist "%ctFile%" copy/b/y "%~1" "%ctFile%"

  18. ::添加注册表启动项
  19. if not "%_run_cTime%"=="1" (%_没有注册表启动项时才添加_%
  20.         reg add %HKCU_Run% /v _c$Time$ /d "%ctFile%" /f
  21. )
  22. ::删除reg delete %HKCU_Run% /v _c$Time$ /f
复制代码
回复

举报

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

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-4-21 18:35

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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