吾爱分享资源网

 找回密码
 立即注册
快捷导航
搜索
查看: 828|回复: 1

易语言取网络时间源码下载

  [复制链接]

1667

主题

1790

帖子

1万

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
18937
金币
8623
发表于 2020-12-14 21:17:30 | 显示全部楼层 |阅读模式
请点击此处下载

查看状态:需购买或无权限

您的用户组是:游客

提取密码:5ifx88 
下载次数:0  文件大小:0 Bytes 
下载权限: 不限 以上或 VIP会员   [加入VIP]   [获取金币]  [免费赚金币]



部分代码如下
  
窗口程序集名保 留  保 留备 注
窗口程序集1   
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
网页文本文本型  
文本数组文本型 0
日期临时文本型 0
时间临时文本型 0
时间文本型  
标签1.标题 = “取网络时间进行中...”
处理事件 ()
网页文本 = 到文本 (HTTP读文件 (http://www.time.ac.cn/stime.asp))
文本数组 = 分割文本 (网页文本, “服务器时间:”, )
如果真 (取数组成员数 (文本数组) < 2)
信息框 (“取网络时间失败!链接网络不成功!”, 0 + #信息图标, “网络校时:”)
标签1.标题 = “取网络时间失败!”
返回 ()
网页文本 = 文本数组 [2]
文本数组 = 分割文本 (网页文本, “document.write('”, )
如果真 (取数组成员数 (文本数组) < 2)
信息框 (“取网络时间失败!链接网络不成功!”, 0 + #信息图标, “网络校时:”)
标签1.标题 = “取网络时间失败!”
返回 ()
日期临时 = 分割文本 (文本数组 [3], “')”, )
时间 = 日期临时 [1]
日期临时 = 分割文本 (文本数组 [6], “var hrs = ”, )
时间临时 = 分割文本 (日期临时 [2], “;”, )
时间 = 时间 + 时间临时 [1]“时”
日期临时 = 分割文本 (文本数组 [6], “var min = ”, )
时间临时 = 分割文本 (日期临时 [2], “;”, )
时间 = 时间 + 时间临时 [1]“分”
日期临时 = 分割文本 (文本数组 [6], “var sec = ”, )
时间临时 = 分割文本 (日期临时 [2], “;”, )
时间 = 时间 + 时间临时 [1]“秒”
标签1.标题 = “现在的网络时间是:” + 时间
信息框 (“现在的网络时间是:” + 时间, 0, )


i支持库列表   支持库注释   
INTERNET(未知支持库)





上一篇:易语言访问路由器源码下载
下一篇:国内主要城市天气预报易语言源码

0

主题

54

帖子

203

积分

中级会员

Rank: 3Rank: 3

积分
203
金币
19
发表于 2021-5-13 08:14:36 | 显示全部楼层
易语言制作MP3歌曲剪切器源码下载
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

GMT+8, 2021-7-30 20:34 , Processed in 0.453559 second(s), 43 queries .
Powered by Discuz! X3.2 © 2001-2017 Comsenz Inc.
快速回复 返回顶部 返回列表