易语言断网5分钟没有恢复自动关机源码，否则取消，每分钟监测1次是否接入互联网

a1a2dnp

1. 
   
2. .版本 2
   
3. .支持库 eAPI
   
4. .支持库 spec
   
5. 
   
6. .程序集 窗口程序集_启动窗口
   
7. .程序集变量 上次有网状态, 逻辑型
   
8. .程序集变量 准备关机, 逻辑型
   
9. 
   
10. .子程序 __启动窗口_创建完毕
    
11. 
    
12. 上次有网状态 ＝ 是否与互联网连接 () ＝ 假
    
13. _启动窗口.可视 ＝ 假
    
14. _时钟1_周期事件 ()
    
15. 时钟1.时钟周期 ＝ 60000  ' 1分钟监测一次
    
16. 
    
17. 
    
18. .子程序 _时钟1_周期事件
    
19. .局部变量 是否有网, 逻辑型
    
20. 
    
21. 是否有网 ＝ 是否与互联网连接 ()
    
22. .如果真 (上次有网状态 ≠ 是否有网)
    
23.     .如果 (是否有网)
    
24.         网络恢复 ()
    
25.     .否则
    
26.         网络断开 ()
    
27. 
    
28.     .如果结束
    
29. 
    
30. .如果真结束
    
31. 上次有网状态 ＝ 是否有网
    
32. 
    
33. .子程序 网络恢复
    
34. 
    
35. 调试输出 (“网络恢复”)
    
36. .如果真 (准备关机)
    
37.     运行 (“shutdown /a”, 假, 1)  ' 取消定时关机
    
38.     准备关机 ＝ 假
    
39. .如果真结束
    
40. 
    
41. 
    
42. .子程序 网络断开
    
43. 
    
44. 调试输出 (“网络断开”)
    
45. .如果真 (准备关机 ＝ 假)
    
46.     运行 (“shutdown /s /t 300”, 假, 1)  ' 5分钟定时关机
    
47.     准备关机 ＝ 真
    
48. 
    
49. .如果真结束
    

复制代码

66大顺

这玩意服务器上用的比较多

小莉今年7岁

方法不错，我用不到。

demon

路过顶帖，