'*****************************************************************************
'### Fonction powermgmt ###
'crée un nouveau schema de gestion d'alimentation et l'applique à l'aide de l'éxecution d'un fichier batch
'Syntaxe : powermgmt
Function powermgmt
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set WshShell = CreateObject("wscript.shell")
WshShell.run "energy_save.bat", SH_WIDE
End Function
'*****************************************************************************