资源介绍:
WAP取网络时间源码调用了精易模块来实现获取北京时间。
资源作者:
三叶网
资源界面:
.版本 2
.支持库 internet
.子程序 _按钮1_被单击
.局部变量 年, 文本型
.局部变量 月, 文本型
.局部变量 日, 文本型
' 编辑框1.内容 = 到文本 (HTTP读文件 (“//wap.bjtime.cn”))
编辑框1.内容 = 编码_utf8到gb2312 (到文本 (HTTP读文件 (“//wap.bjtime.cn”)))
年 = 文本_取出中间文本 (编辑框1.内容, “<p>20”, “年”)
月 = 文本_取出中间文本 (编辑框1.内容, 年 + “年”, “月”)
日 = 文本_取出中间文本 (编辑框1.内容, 月 + “月”, “日”)
编辑框2.内容 = “20” + 年 + “年” + 月 + “月” + 日 + “日”
资源下载: