斷網(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)潔。 以所舍,求所獲;有所依,方所成!

支付寶贊助
微信贊助

免責(zé)聲明,若由于商用引起版權(quán)糾紛,一切責(zé)任均由使用者承擔(dān)。

您必須遵守我們的協(xié)議,如您下載該資源,行為將被視為對(duì)《免責(zé)聲明》全部內(nèi)容的認(rèn)可->聯(lián)系老梁投訴資源
LaoLiang.Net部分資源來自互聯(lián)網(wǎng)收集,僅供用于學(xué)習(xí)和交流,請(qǐng)勿用于商業(yè)用途。如有侵權(quán)、不妥之處,請(qǐng)聯(lián)系站長并出示版權(quán)證明以便刪除。 敬請(qǐng)諒解! 侵權(quán)刪帖/違法舉報(bào)/投稿等事物聯(lián)系郵箱:service@laoliang.net
意在交流學(xué)習(xí),歡迎贊賞評(píng)論,如有謬誤,請(qǐng)聯(lián)系指正;轉(zhuǎn)載請(qǐng)注明出處: » 斷網(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ī))

發(fā)表回復(fù)

本站承接,網(wǎng)站推廣(SEM,SEO);軟件安裝與調(diào)試;服務(wù)器或網(wǎng)絡(luò)推薦及配置;APP開發(fā)與維護(hù);網(wǎng)站開發(fā)修改及維護(hù); 各財(cái)務(wù)軟件安裝調(diào)試及注冊(cè)服務(wù)(金蝶,用友,管家婆,速達(dá),星宇等);同時(shí)也有客戶管理系統(tǒng),人力資源,超市POS,醫(yī)藥管理等;

立即查看 了解詳情