Desactiver / activer les mises en veilles pc

Soyez le premier à donner votre avis sur cette source.

Vue 3 707 fois - Téléchargée 459 fois

Description

Petit programme qui permet de désactiver / Activer les veilles PC
Vous devez d'abord créer 2 fichiers ".bat" a l'aide du Bloc-Notes Copiez le 1er bat que vous nommerez "DesactiveVeille.bat" puis le 2em Bat que vous nommerez "ActiveVeille.bat
1er Bat
----------------------
@echo off
:: desactive la veille prolongee et la veille simple
:: desactive la veille simple
powercfg /change "Toujours actif" /standby-timeout-ac 0
echo Veille simple desactivee
echo.
:: desactive la veille prolongee
powercfg /change "Toujours actif" /hibernate-timeout-ac 0
echo Veille prolongee desactivee
echo.
-----------------
2em bat
-----------------
@echo off
echo.
:: Active la veille simple
powercfg /change "Toujours actif" /standby-timeout-ac 3
echo Veille simple activee
echo.
:: Active la veille prolongee
powercfg /change "Toujours actif" /hibernate-timeout-ac 5
echo Veille prolongee activee
echo.
--------------------
"Toujours actif" est le nom du mode actif dans les propriétés de gestion d'alimentation 3 et 5 sont la durée en minute avant mise en veille

Source / Exemple :


Option Explicit
Dim ret

Private Sub Form_Load()
Form1.Move (Screen.Width - Me.Width) / 2, (Screen.Height - Me.Height) / 2
End Sub

Private Sub Command1_Click()
ret = Shell("DesactiveVeille.bat")
Label1.Caption = "Veille simple et prolongee desactivee"
End Sub

Private Sub Command2_Click()
ret = Shell("ActiveVeille.bat")
Label1.Caption = "Veille simple et prolongee Activees"
End Sub

Private Sub Command3_Click()
End
End Sub

Conclusion :


ce petit prog vous évitera un arrêt intempestif il suffit d'ajouter
Shell("DesactiveVeille.bat")
au debut de vos programmes et
Shell("ActiveVeille.bat")
a la fin
placer les ".bat" dans le même dossier que votre prog

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
492
Date d'inscription
jeudi 5 avril 2007
Statut
Membre
Dernière intervention
2 juillet 2012
4
Bonjour,
Un projet VB6 sortit de mes archives :-)
http://www.archive-host.com/link/5bc49ff690ffe9dfda36025252525ba8be58a35b.zip
Contient d'autre fonctions comme..
Tester si l'User dispose de droit suffisant.
Autoriser/interdire les différents modes de mise en veilles.
Passer à l'écran de veille.
Éteindre ou de redémarer le PC.
A+
Messages postés
6414
Date d'inscription
mardi 8 mars 2005
Statut
Modérateur
Dernière intervention
29 juillet 2020
360
Deux choses :

Le vb6 : ca commence à dater un peu, il serait temps de passez aux versions suivantes...

Au sujet de l'utilisation des .bat, le vb n'est pas un langage système, il ne connait donc pas les fonctions de mise en veille, d'où l'utilité des .bat. Le code des fichier bat aurait pu être intégré au fichier vb mais ca n'aurait pas changé grand chose, il est même préférable de les externaliser.
Messages postés
190
Date d'inscription
lundi 24 mars 2003
Statut
Membre
Dernière intervention
27 septembre 2005

Bjr Guillaume
je ne sais pas ma source est en VB6 et je n'ai pas trouve d'autre solution que les bat
Messages postés
47
Date d'inscription
dimanche 11 mai 2008
Statut
Membre
Dernière intervention
23 avril 2020

Salut

Est-il possible de faire cela sans passer par les fichier bat mais par un code vb.net
Messages postés
6414
Date d'inscription
mardi 8 mars 2005
Statut
Modérateur
Dernière intervention
29 juillet 2020
360
Ok, je n'avais pas vu désolé.

Avec le zip, c'est tout de même mieux.

LE contenu des tes .bat n'est pas génial, tu aurais retenir la configuration précédente et la ré-appliquer plutôt que de définir un veille au bout d'un certain temps...
Afficher les 7 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.