NTP网络时间同步器(可增删NTP列表)

renhe2018

前两天在本版块看到易友发布的NTP时间同步程序，很是喜欢。受它的启发，结合部分易友提供的代码模块 及精易模块。做了以下更新：
1.可以对NTP服务器进行添加和删除
2.可同步北京时间(精易模块，稳定，长期有效。)
——————‘
可以解决的尴尬场景：
主板电池没有电，关机再开机就要重新设置时间。有了它，完美省下一颗电池的钱。
——————————
祝大家使用愉快。

【对于删除NTP记录代码段，作如下更正】


.子程序 _delser_被单击
.局部变量 delitem, 整数型
.局部变量 delok, 整数型


打开 (“ntp.edb”, , , , , , )
置当前库 (“ntp.edb”)
delitem ＝ timeser.现行选中项 ＋ 1  ' 选定的项目索引
跳到 (delitem)  ' 跳转到选中并欲执行删除操作的项目上
delok ＝ 信息框 (“要删除 ” ＋ timeser.取项目文本 (timeser.现行选中项) ＋ “  服务器吗？”, 4, “重要提示：”, )
.如果 (delok ＝ #是钮)
    删除 ()  ' 为选中项标记删除
    彻底删除 ()  ' 彻底从数据库中删除选定的项目
    timetips.标题 ＝ “删除成功！服务器数据有变动，请重新选择！”
    showdata ()  ' 刷新记录列表
.否则

renhe2018

大早起来，对程序进行了代码整理优化：
1.优化 删除NTP 的代码，可选择是否预留至少一条记录。
2.优化 添加NTP 代码，重名的NTP服务器，不可加入列表中。
3. 实现对NTP数据库的备份，恢复功能。(点击 服务器 图标）
______
更新的源码附件已经上传。
NTP网络时间服务器新.zip (2.32 MB, 下载次数: 38)

2024-8-20 06:37 上传

点击文件名下载附件

renhe2018

木子心 发表于 2024-11-25 23:57
拿走了，修改了一下时间代码   通过时间戳精确到了毫秒级别

这才是高手啊。可以分享出来吗？学习一下。

木子心

拿走了，修改了一下时间代码   通过时间戳精确到了毫秒级别   

renhe2018

sr1018 发表于 2024-9-21 09:47
能不能精确到毫秒呢

这个没关注过，基本上不会有太大误差，毕竟同步的是北京时间啊。

sr1018

能不能精确到毫秒呢

renhe2018

yuanyhongy 发表于 2024-9-20 03:10
不准，和其他同步软件相差800毫秒

哈哈，行吧。时间观念很强啊。

yuanyhongy

renhe2018 发表于 2024-8-20 06:28
大早起来，对程序进行了代码整理优化：
1.优化 删除NTP 的代码，可选择是否预留至少一条记录。
2.优化 添加 ...

不准，和其他同步软件相差800毫秒

renhe2018

yuanyhongy 发表于 2024-9-19 19:31
好用吗？？？

好用啊。特别是同步北京时间，用的精易模块，挺准呢。

yuanyhongy

好用吗？？？

renhe2018

海杰易之旅 发表于 2024-8-22 15:11

不错啊。精简了不少。