易语言测试当前浏览网站网速

小泽 2020-05-11 21:51 1条评论

20191119095946310.jpg

.版本 2
.支持库 internet
.支持库 EThread
.程序集 窗口程序集1
.程序集变量 ii, 整数型
.程序集变量 ii2, 整数型
.程序集变量 ii3, 整数型
.子程序 测试速度
.参数 地址, 文本型
.参数 标题, 文本型, 可空
.局部变量 A, 字节集
.局部变量 b, 整数型
b = 取启动时间 ()
A = HTTP读文件 (地址)
b = 取启动时间 () - b
.如果 (ii2 < 130)
    画板1.定位写出 (ii, ii2, “当前网速:”)
    画板1.定位写出 (ii3, ii2, 到文本 (四舍五入 (取字节集长度 (A) ÷ b × 1000 ÷ 1024, 2)) + “KB/S” + “   ”
     + 到文本 (取小时 (取现行时间 ())) + “时” + 到文本 (取分钟 (取现行时间 ())) + 
     “分” + 到文本 (取秒 (取现行时间 ())) + “秒”)
    ii2 = ii2 + 15
.否则
    ii2 = 10
    画板1.重画 ()
    启动线程 (&测试, , )
.如果结束
.子程序 测试
测试速度 (“https://www.afxzyw.cn/”)
.子程序 __启动窗口_创建完毕
ii = 5
ii2 = 10
ii3 = 90
.子程序 _时钟1_周期事件
启动线程 (&测试, , )

20191119095445888.jpg20191119095500471.jpg

本文标签: 易语言测试网速
相关文章
0.0

说点什么吧
  • 全部评论(0