désactiver l'écran de veille

Question

Bonjour à tous,

Existe t-il une fonction dans VB6 pour désactiver l'écran de veille ?

Je m'explique :
Mon prog est en le réseau. Le serveur attend dans la barre des tâches une intervention du client. Lorsque le client intervient une form s'affiche à l'écran pour prévenir le serveur. Comment faire à ce moment pour désactiver l'écran de veille s'il est actif ?

Merci d'avance et bonne prog.

@+++

thierrydelepine · Answer

voici une methode.

faire bouger la souris devrait sortir l'ordinateur de l'etat de veille (je ne pense pas que ca marche pour une mise en veille protégé par mot de passe)

a mettre dans les declarations

'Before you start this program, I suggest you save everything that wasn't saved yet.
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Const MOUSEEVENTF_LEFTDOWN = &H2
Const MOUSEEVENTF_LEFTUP = &H4
Const MOUSEEVENTF_MIDDLEDOWN = &H20
Const MOUSEEVENTF_MIDDLEUP = &H40
Const MOUSEEVENTF_MOVE = &H1
Const MOUSEEVENTF_ABSOLUTE = &H8000
Const MOUSEEVENTF_RIGHTDOWN = &H8
Const MOUSEEVENTF_RIGHTUP = &H10

a mettre dans ton code au moment ou tu veux sortir de l'etat de veille

mouse_event MOUSEEVENTF_MOVE, 100&, 100&, cButt, dwEI
DoEvents

permet de bouger de 100 pixels a droite et en bas

ShareVB · Answer

salut

regarde http://www.vbfrance.com/code.aspx?ID=60
http://www.vbfrance.com/code.aspx?ID=2487
...

ShareVB

marcod59 · Answer

Merci Thierry j'ai essayé et cela me convient parfaitement.

thierrydelepine · Answer

passe la reponse en reponse accepté pour les autres

Désactiver l'écran de veille

4 réponses

Discussions similaires