用易语言写一款软件,监控自己电脑运行连网状态 100
展开全部
很简单,看代码:无限循环检测
.版本 2
.支持库 EThread
.支持库 eAPI
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
检测时钟.时钟周期 = 50
.子程序 _检测时钟_周期事件
.如果真 (进程是否存在 (“a.dll”) = 真)
启动线程 (&截图线程, , )
检测时钟.时钟周期 = 0
.如果真结束
.子程序 截图线程
.局部变量 i, 整数型
.局部变量 次数, 整数型
次数 = 60 ÷ 3
.计次循环首 (次数, i) ' 60秒÷ 3秒=截图次数
延时 (3000) ' 间隔3秒
写到文件 (“d:\5566\” + 到文本 (i) + “.bmp”, 快照 (, , ))
.如果真 (i = 次数)
检测时钟.时钟周期 = 50
跳出循环 ()
.如果真结束
.计次循环尾 ()
.子程序 进程是否存在
.参数 进程名, 文本型
.局部变量 进程信息, 进程信息, , "0"
.局部变量 i, 整数型
.版本 2
.支持库 EThread
.支持库 eAPI
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
检测时钟.时钟周期 = 50
.子程序 _检测时钟_周期事件
.如果真 (进程是否存在 (“a.dll”) = 真)
启动线程 (&截图线程, , )
检测时钟.时钟周期 = 0
.如果真结束
.子程序 截图线程
.局部变量 i, 整数型
.局部变量 次数, 整数型
次数 = 60 ÷ 3
.计次循环首 (次数, i) ' 60秒÷ 3秒=截图次数
延时 (3000) ' 间隔3秒
写到文件 (“d:\5566\” + 到文本 (i) + “.bmp”, 快照 (, , ))
.如果真 (i = 次数)
检测时钟.时钟周期 = 50
跳出循环 ()
.如果真结束
.计次循环尾 ()
.子程序 进程是否存在
.参数 进程名, 文本型
.局部变量 进程信息, 进程信息, , "0"
.局部变量 i, 整数型
追问
是监控VPS 监控3389端口是不是可以登陆,如果关机了就没有窗口弹出来
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询