易语言取北京时间 取网络时间

Engeng

  

子程序名	返回值类型	公开	备 注
取北京时间	文本型

变量名	类 型	静态	数组	备 注
返回文本	文本型
取出的时间	文本型
时间	日期时间型

返回文本 ＝ 到文本 (网页_访问 (“http://time1903.beijing-time.org/time.asp”, , , , , #常量1 ))
返回 (文本_取出中间文本 (返回文本, “nyear=”, “;”) ＋ “-” ＋ 文本_取出中间文本 (返回文本, “nmonth=”, “;”) ＋ “-” ＋ 文本_取出中间文本 (返回文本, “nday=”, “;”) ＋ “ ” ＋ 文本_取出中间文本 (返回文本, “nhrs=”, “;”) ＋ “:” ＋ 文本_取出中间文本 (返回文本, “nmin=”, “;”) ＋ “:” ＋ 文本_取出中间文本 (返回文本, “nsec=”, “;”))

.版本 2<br /> <br /> .子程序 取北京时间, 文本型, 公开<br /> .局部变量 返回文本, 文本型<br /> .局部变量 取出的时间, 文本型<br /> .局部变量 时间, 日期时间型<br /> <br /> 返回文本 ＝ 到文本 (网页_访问 (“http://time1903.beijing-time.org/time.asp”, , , , , #常量1))<br /> 返回 (文本_取出中间文本 (返回文本, “nyear=”, “;”) ＋ “-” ＋ 文本_取出中间文本 (返回文本, “nmonth=”, “;”) ＋ “-” ＋ 文本_取出中间文本 (返回文本, “nday=”, “;”) ＋ “ ” ＋ 文本_取出中间文本 (返回文本, “nhrs=”, “;”) ＋ “:” ＋ 文本_取出中间文本 (返回文本, “nmin=”, “;”) ＋ “:” ＋ 文本_取出中间文本 (返回文本, “nsec=”, “;”))

返回示例：2019-7-28 22:53:21

补充内容 (2022-2-13 11:17):
发现这个网站又恢复了，但是url换了，请自行把访问地址换成http://www.beijing-time.org/t/time.asp

1326554131

66666666666666666666666666666666666666666666666666666666

达不溜

用时间_同步校时 (真)，不用你去计较在哪取的时间

Engeng

鸭鸭爱吃糖 发表于 2019-10-1 00:44
已经失效了

嗯，那个站点关了；百度的返回的header里也有时间

鸭鸭爱吃糖

已经失效了

mojikiu

66666666666666

十一年之那一年

谢谢分享！！！

Engeng

r588en 发表于 2019-8-2 22:00
常量1 是什么

Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3
Accept-Encoding: gzip, deflate
Accept-Language: zh-CN,zh;q=0.9
Cache-Control: max-age=0
Connection: keep-alive
Cookie: ASPSESSIONIDAQRBCBBQ=DMJHFIKCCGHOFCEGBKMJLIDC
Host: time1903.beijing-time.org
Upgrade-Insecure-Requests: 1
User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/75.0.3770.142 Safari/537.36

r588en

常量1 是什么

Engeng

kyo9766 发表于 2019-7-30 08:54
网站稳定，是个大问题啊

beijing-time.org，看这域名就是专门为显示北京时间准备的

kyo9766

网站稳定，是个大问题啊