H2O断网自动关机工具（加上ups可以实现停电自动关机）

软件介绍

可用于突然停电的情况，电脑实现软关机，避免硬件和资料损坏。使用UPS配合主板设置来电自动开机，不用随时盯着。这个主要用于个人win电脑，原理就是检测网络（内网外网IP都可以）防止误判必填两个地址，我填的是路由器IP和另外一个设备的IP，同时无法访问会启动关机倒计时，并且有提示音，倒计时期间网络恢复会取消关机。软件如果感觉有点卡，是网络检测超时反馈，不影响使用，不占资源。

番外

这里附送一个“定时1分钟检测网络情况，如果断开了就倒计时120秒关机，如果倒计时期间连上了网则取消关机”的vbs脚本。

Set objShell = CreateObject("WScript.Shell")
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
' 设置检测网络的时间间隔（毫秒）
CheckInterval = 60000
' 设置关机倒计时时间（秒）
ShutdownCountdown = 120
' 设置初始网络状态为已连接
IsConnected = True
' 定时检测网络状态
Do
    ' 检测网络连接状态
    Set colItems = objWMIService.ExecQuery("Select * From Win32_NetworkAdapter Where NetConnectionStatus = 2")
    If colItems.Count = 0 Then
        ' 网络断开，开始倒计时关机
        If IsConnected Then
            IsConnected = False
            objShell.Run "shutdown -s -t " & ShutdownCountdown, 0, True
        End If
    Else
        ' 网络连接正常，取消关机
        If Not IsConnected Then
            IsConnected = True
            objShell.Run "shutdown -a", 0, True
        End If
    End If
    ' 等待一段时间后再次检测
    WScript.Sleep CheckInterval
Loop