☰

電池充飽電時發出警告

tag-icon • tag-icon windows-7 windows laptop battery
電池充飽電時發出警告

我希望在我的筆記型電腦電池充滿電時收到警報（有聲音）。

我怎樣才能做到這一點？

答案1

嘗試筆記型電腦電池監視器:

Laptop Battery Monitor，是一款智慧型筆記型電腦電池監控軟體。它準確地顯示電池放電或完全充電之前的預計時間。當您可以在幾小時、幾分鐘和幾秒鐘內獲得這些資訊時，您不必再擔心還剩下多少電池電量。功能包括顯示電池完全放電之前的剩餘時間（使用電池運行時）、顯示電池完全充電之前的剩餘時間（電池從交流電源充電時）、應用程式在系統托盤中運行、使用最小記憶體、和螢幕空間、自訂指示器顏色、當充電開始/停止、電池充滿電或電池電量低於預定義百分比時，聲音警報會在您開啟筆記型電腦時自動啟動。適用於任何筆記型電腦和電池型號，無論是新的還是二手的。

答案2

以下腳本會在電池充電至 96% 以及電量降至 5% 時向您發出警報。您可以編輯該行if bCharging and (iPercent > 95) then msgbox “Battery is at ” & iPercent & “%”,vbInformation, “Battery Monitor” 並將(iPercent > 95) 中的值替換為適合您的任何值。將下面的腳本另存為“Battery.vbs”並保存在“啟動”資料夾中，以使其自動運行。

set oLocator = CreateObject("WbemScripting.SWbemLocator")
set oServices = oLocator.ConnectServer(".","root\wmi")
set oResults = oServices.ExecQuery("select * from batteryfullchargedcapacity")
for each oResult in oResults
iFull = oResult.FullChargedCapacity
next

while (1)
set oResults = oServices.ExecQuery("select * from batterystatus")
for each oResult in oResults
iRemaining = oResult.RemainingCapacity
bCharging = oResult.Charging
next
iPercent = ((iRemaining / iFull) * 100) mod 100
if bCharging and (iPercent > 95) Then msgbox "Battery is at " & iPercent & "%",vbInformation, "Battery monitor"
wscript.sleep 30000 ' 5 minutes
wend

從這個連結

相關內容