连接NTP服务器，获取网络时间，请赐教 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 连接NTP服务器，获取网络时间，请赐教

标题：连接NTP服务器，获取网络时间，请赐教

只看楼主

sych

等　级：论坛游侠
威　望：6
帖　子：179
专家分：183
注　册：2019-10-11

第 21 楼

得分:0

上面的代码是这个网址https://blog.里的
我先按你的代码改改试试

2022-09-25 16:57

sych

等　级：论坛游侠
威　望：6
帖　子：179
专家分：183
注　册：2019-10-11

第 22 楼

得分:0

DECLARE LONG WSAStartup  IN "Ws2_32" LONG, STRING@
DECLARE LONG WSACleanup  IN "Ws2_32"
#INCLUDE vfp2c.h
SET LIBRARY TO vfp2c32.fll ADDITIVE

stWsaData  = REPLICATE(0h00, 398)
WSAStartup(0x202, @stWsaData)

?synctosntpserver("128.138.140.44",123)

WSACleanup()
RETURN
这个代码更简单

2022-09-29 09:56

吹水佬

等　级：版主
威　望：432
帖　子：10064
专家分：41463
注　册：2014-5-20

第 23 楼

得分:0

以下是引用sych在2022-9-29 09:56:47的发言：

DECLARE LONG WSAStartup  IN "Ws2_32" LONG, STRING@
DECLARE LONG WSACleanup  IN "Ws2_32"
#INCLUDE vfp2c.h
SET LIBRARY TO vfp2c32.fll ADDITIVE

stWsaData  = REPLICATE(0h00, 398)
WSAStartup(0x202, @stWsaData)

?synctosntpserver("128.138.140.44",123)

WSACleanup()
RETURN
这个代码更简单

问题是vfp2c32.fll这个不简单了

2022-09-29 11:46

吹水佬

等　级：版主
威　望：432
帖　子：10064
专家分：41463
注　册：2014-5-20

第 24 楼

得分:0

要简单就用CMD的w32tm，如：
w32tm /stripchart /computer:128.138.140.44 /dataonly /samples:1 /packetinfo

2022-09-29 15:13

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-510100-1-1.html