Instruction script .vbs

nokiahelp Messages postés 1218 Statut Membre -  
bendrop Messages postés 19149 Statut Contributeur -
Bonjour tout le monde,

je voudrais faire un script qui me prévient lorsque ma batterie est chargée à 100%. Pour cela j'ai trouvé ce script :

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


NS : J'ai changé iPercent > 95 en iPercent > 100.

Cependant je ne sais pas à quoi coreespond l'avant-dernière ligne :
wscript.sleep 30000 ' 5 minutes

Pourriez vous m'expliquer à quoi elle sert svp ?
A voir également:

1 réponse

bendrop Messages postés 19149 Statut Contributeur 8 392
 
Bonjour,

C'est une temporisation de 30 secondes et non 5 minutes.
30000 c'est en milliseconde.

Cdlt.
0