Hét vraag- en antwoordplatform van Nederland

Op deze pagina vind je alle vragen in de categorie Programmeren. Vragen over computers en internet in het algemeen vind je in de hoofdcategorie Computers & Internet. Specifieke vragen over besturingssystemen, hardware, internet, sociale media, software, virussen, phishing en malware vind je in één van de gerelateerde subcategorieën.

Nieuwste vragen

Welke tekst/code moet ik toevoegen om dit script een geluidsnotificatie te geven?

Ik heb een script gemaakt dat ik een notificatie ontvang wanneer de batterij mijn Windows 10 laptop FULL is.
Ik krijg de melding maar maar er is geen geluid die te horen is wanneer de scrip is gestart.

hier is de script code:

set oLocator = CreateObject("WbemScripting.SWbemLocator")
set oServices = oLocator.ConnectServer(".","rootwmi")
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

kan iemand mij helpen over welke tekst/code moet ik toevoegen om deze script een geluid notificatie te geven?

Verwijderde gebruiker
4 jaar geleden
1.6K
1