斷網(wǎng)自動(dòng)關(guān)機(jī)小工具-加上ups可以實(shí)現(xiàn)停電自動(dòng)關(guān)機(jī)（VBS腳本-定時(shí)1分鐘檢測(cè)網(wǎng)絡(luò)情況,如斷開就倒計(jì)時(shí)120秒關(guān)機(jī)）

[重要通告]如您遇疑難雜癥,本站支持知識(shí)付費(fèi)業(yè)務(wù),掃右邊二維碼加博主微信,可節(jié)省您寶貴時(shí)間哦!

斷網(wǎng)自動(dòng)關(guān)機(jī)小工具這個(gè)是來自網(wǎng)絡(luò)一網(wǎng)友的闡述：

網(wǎng)友公司經(jīng)常異常斷電，搞壞好幾個(gè)硬盤，搞一個(gè)便宜的ups直接連上電腦上。

網(wǎng)上找了類似的軟件都不好用，直接寫了個(gè)；

用于突然停電的情況，電腦實(shí)現(xiàn)軟關(guān)機(jī)，避免硬件和資料損壞。使用UPS配合主板設(shè)置來電自動(dòng)開機(jī)，不用隨時(shí)盯著。

這個(gè)主要用于個(gè)人win電腦，機(jī)房一般都有發(fā)電機(jī)和后備電系統(tǒng)，還有維護(hù)人員盯著。

原理就是檢測(cè)網(wǎng)絡(luò)，內(nèi)網(wǎng)外網(wǎng)IP都可以，防止誤判必填兩個(gè)地址，填的是路由器IP和另外一個(gè)設(shè)備的IP，同時(shí)無法訪問會(huì)啟動(dòng)關(guān)機(jī)倒計(jì)時(shí)，并且有提示音，倒計(jì)時(shí)期間網(wǎng)絡(luò)恢復(fù)會(huì)取消關(guān)機(jī)。

軟件如果感覺有點(diǎn)卡，是網(wǎng)絡(luò)檢測(cè)超時(shí)反饋，不影響使用，不占資源。

易語言寫的會(huì)誤報(bào)毒，請(qǐng)酌情使用哦：https://cage.lanzouw.com/ihYG112zzvfa

定時(shí)1分鐘檢測(cè)網(wǎng)絡(luò)情況,如果斷開了就倒計(jì)時(shí)120秒關(guān)機(jī),如果倒計(jì)時(shí)期間連上了網(wǎng)則取消關(guān)機(jī)的vbs腳本

下面是一個(gè)實(shí)現(xiàn)你描述的功能的VBS腳本：

Set objShell = CreateObject("WScript.Shell")
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")

' 設(shè)置檢測(cè)網(wǎng)絡(luò)的時(shí)間間隔（毫秒）
CheckInterval = 60000

' 設(shè)置關(guān)機(jī)倒計(jì)時(shí)時(shí)間（秒）
ShutdownCountdown = 120

' 設(shè)置初始網(wǎng)絡(luò)狀態(tài)為已連接
IsConnected = True

' 定時(shí)檢測(cè)網(wǎng)絡(luò)狀態(tài)
Do
' 檢測(cè)網(wǎng)絡(luò)連接狀態(tài)
Set colItems = objWMIService.ExecQuery("Select * From Win32_NetworkAdapter Where NetConnectionStatus = 2")
If colItems.Count = 0 Then
' 網(wǎng)絡(luò)斷開，開始倒計(jì)時(shí)關(guān)機(jī)
If IsConnected Then
IsConnected = False
objShell.Run "shutdown -s -t " & ShutdownCountdown, 0, True
End If
Else
' 網(wǎng)絡(luò)連接正常，取消關(guān)機(jī)
If Not IsConnected Then
IsConnected = True
objShell.Run "shutdown -a", 0, True
End If
End If

' 等待一段時(shí)間后再次檢測(cè)
WScript.Sleep CheckInterval
Loop

可以將以上代碼保存為一個(gè).vbs文件，然后雙擊運(yùn)行即可開始定時(shí)檢測(cè)網(wǎng)絡(luò)狀態(tài)。

如果網(wǎng)絡(luò)斷開，則會(huì)開始倒計(jì)時(shí)120秒關(guān)機(jī)；如果在倒計(jì)時(shí)期間重新連接上了網(wǎng)絡(luò)，則會(huì)取消關(guān)機(jī)。

問題未解決？付費(fèi)解決問題加Q或微信 2589053300 (即Q號(hào)又微信號(hào))右上方掃一掃可加博主微信

所寫所說，是心之所感，思之所悟，行之所得；文當(dāng)無敷衍，落筆求簡(jiǎn)潔。 以所舍，求所獲；有所依，方所成！