WAP取网络时间源码

资源介绍：

WAP取网络时间源码调用了精易模块来实现获取北京时间。

资源作者：

三叶网

资源界面：

.版本 2
.支持库 internet

.子程序 _按钮1_被单击
.局部变量 年, 文本型
.局部变量 月, 文本型
.局部变量 日, 文本型

' 编辑框1.内容 ＝ 到文本 (HTTP读文件 (“http://wap.bjtime.cn”))
编辑框1.内容 ＝ 编码_utf8到gb2312 (到文本 (HTTP读文件 (“http://wap.bjtime.cn”)))
年 ＝ 文本_取出中间文本 (编辑框1.内容, “<p>20”, “年”)
月 ＝ 文本_取出中间文本 (编辑框1.内容, 年 ＋ “年”, “月”)
日 ＝ 文本_取出中间文本 (编辑框1.内容, 月 ＋ “月”, “日”)
编辑框2.内容 ＝ “20” ＋ 年 ＋ “年” ＋ 月 ＋ “月” ＋ 日 ＋ “日”

资源下载：