HOW TO MAKE FULL BATTERY NOTIFICATION IN LAPTOP

 Paste above code in notepad(.txt file) and save it with name as(Fullbattery.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 > 98) Then msgbox "Battery is fully charged"

  wscript.sleep 30000 ' 5 minutes

wend




Then we have find up startup folder in windows

For that 

                        Type RUN in search box and open it

                        Type shell:startup in that and click ok

Then you will find the startup folder in file manager





CUT THE ABOVE MENTIONED TEXTFILE  AND PASTE IN THAT FOLDER

That s it




CREATED BY ARUNKUMAR S

Comments