易语言怎么取网络时间

2024-11-28 21:34:06
推荐回答(1个)
回答(1):

需要一个客户组件 客户1.连接 (“time-a.timefreq.bldrdoc.gov”, 13) '他的返回时间是英国格林威治时间反馈代码如下.版本 2.子程序 _客户1_数据到达
.局部变量 取回数据, 文本型
.局部变量 时间, 文本型, , "0"
.局部变量 日期, 文本型, , "3"
.局部变量 sj1, 日期时间型取回数据 = 取字节集数据 (客户1.取回数据 (), #文本型, )
时间 = 分割文本 (取回数据, “ ”, )
日期 = 分割文本 (时间 [2], “-”, )
日期 [1] = “20” + 日期 [1]
sj1 = 增减时间 (到时间 (日期 [1] + “/” + 日期 [2] + “/” + 日期 [3] + “/” + 时间 [3]), #小时, 8)
信息框 (sj1, 0, )
客户1.断开连接 ()