资源介绍:
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” + 年 + “年” + 月 + “月” + 日 + “日”
资源下载: