|
~ Edito ~
12/03/2006 @ 13:39
Depuis la dernière mise à jour (qui remonte à... oulala plusieurs mois), un petit ménage de printemps s'impose. Ca tombe bien, c'est presque la période.
Au menu, et progressivement sur les jours à venir, rafraîchissement de plusieurs fonctions et procédures, nouvelles APIs et nouveaux programmes.
~ Rechercher ~
~ Annuaire VB ~
~ Partenaires ~
|
Fonction ExitWindows
Declare Function ExitWindows Lib "user32" Alias "ExitWindowsEx" ( _
ByVal dwReserved As Long, _
ByVal uReturnCode As Long) As Long
Versions :
. Windows 95/98 : Oui
. Windows NT : A partir de 3.1
. Windows 2000/XP : OuiDescription :
Plusieurs actions peuvent être effectuées avec cette fonction. De la simple fermeture de session Windows, jusqu'au redémarrage de l'ordinateur. Tout cela en fonction des constantes ci-dessous. uReturnCode reçoit la constante, dwReserved est un paramêtre réservé (peu importe la valeur).
Si tout se passe bien la fonction retourne 'Vrai' sinon 'Faux'.
| Constante | Valeur |
Définition |
| EWX_LOGOFF | 0 |
Arrête les programmes en cours et ferme la session courante. |
| EWX_SHUTDOWN | 1 |
Arrête les programmes et arrête l'ordinateur. On va jusqu'au message qui indique à l'utilisateur qu'il peut éteindre son ordinateur en toute sécurité. |
| EWX_REBOOT | 2 |
Provoque un redémarrage de l'ordinateur. |
| EWX_FORCE | 4 |
Force les applications qui ne répondent pas à se fermer. |
Exemple d'utilisation :
' (Exemple de Alain Quinet - alain.quinet@free.fr)
' Une fois compilé et généré sous forme d'éxécutable,
' ce petit programme vous permettra d'arrêter votre
' machine sans passer par "Démarrer" - "Arrêter"...
' Dans un module, vous définissez les déclarations
' et vous tapez la fonction qui suit :
Public uReturnCode As Long
Public dwReserved As Long
Declare Function ExitWindows Lib "user32" Alias "ExitWindowsEx" ( _
ByVal dwReserved As Long, _
ByVal uReturnCode As Long) As Long
' Dans l'évènement Form_Activate (ou Form_Load) d'une feuille,
' vous tapez le code suivant :
Private Sub Form_Activate()
uReturnCode = 1 ' Vous permettra d'arrêter votre machine
Call ExitWindows(uReturnCode, dwReserved)
End Sub
Retour à la liste des API |
