Accueil > > > EXITWINDOWS
EXITWINDOWS
Information sur la source
Description
Pour quitter Windows JOLIMENT?
Source
- 'A mettre dans une feuille
- Option Explicit
-
- Private Sub CEsc_Click()
- Unload Me
- End Sub
-
- Private Sub COk_Click()
-
- If OptArret.Value = True Then
- ExitWindowsEx EWX_SHUTDOWN, 0&
- ElseIf OPtDemarre.Value = True Then
- ExitWindowsEx EWX_REBOOT, 0&
- ElseIf OptMsDos.Value = True Then
-
- Else
- ExitWindowsEx EWX_LOGOFF, 0&
- End If
- Unload Me
- End Sub
-
- 'A mettre dans module
- Option Explicit
-
- Public Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
- ' Constantes pour ExitWindowsEx
- Public Const EWX_LOGOFF = 0
- Public Const EWX_SHUTDOWN = 1
- Public Const EWX_REBOOT = 2
- Public Const EWX_FORCE = 4
-
-
-
-
'A mettre dans une feuille
Option Explicit
Private Sub CEsc_Click()
Unload Me
End Sub
Private Sub COk_Click()
If OptArret.Value = True Then
ExitWindowsEx EWX_SHUTDOWN, 0&
ElseIf OPtDemarre.Value = True Then
ExitWindowsEx EWX_REBOOT, 0&
ElseIf OptMsDos.Value = True Then
Else
ExitWindowsEx EWX_LOGOFF, 0&
End If
Unload Me
End Sub
'A mettre dans module
Option Explicit
Public Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
' Constantes pour ExitWindowsEx
Public Const EWX_LOGOFF = 0
Public Const EWX_SHUTDOWN = 1
Public Const EWX_REBOOT = 2
Public Const EWX_FORCE = 4
Sources du même auteur
Sources de la même categorie
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
Reboot sous Windows 2000 [ par Docki ]
Comment faire pour faire un reboot sous windows 2000 ?J'ai essayé les codes du site mais seulement le logoff fonctionne. Merci de me repondre, c assez
Quitter windows et passer en mode dos [ par ActiveZ ]
salut,je cherche comment on peut fermer windows et passer en mode dos ou (au pire) comment rebooter en dos (redemarrer en mode dos)merci
ShutDown Windows 2000/xp [ par brodeur ]
BonjourEst-ce que vous connaisez la fonction de fermeture de windows ( ou la procedure ) sous VB6. L'ancienne fonction que j'utilisait marchait sous 9
problème a la fermeture de windows [ par xyron ]
Bonjour,J'ai fait un programme qui s'exécute à interval régulier pour vérifier la présence de fichiers dans un répertoire. Lorsque je fais un shutdown
Raccourcie Quitter [ par animusaquila ]
Voila, je voulais savoir ci l'un d'entre vous savez le raccourcie du programme "quittez" sous windows XP.Je me sert bcp de ce raccourcie, mais je le c
arret d un windows xp depuis un 2000 clients [ par foupoudafe ]
bonjour j'aimerai savoir comment effectuer un shutdown distant d un 2000 vers un xp je connais bien la commande shutdown de windows.shutdown -s -m \\n
WM_ENDSESSION [ par xon ]
Hello tout le monde,J'ai écrit une application en VB& qui récupère (avec du subclassing) les messages Windows. Cela me permet, en autres, d'antici
WIndows mobile 6.1 installet net compact framework [ par podolis ]
Bonjour à tous,J'aimerais démarrer le développement d'application sur windows mobile 6.1 (avec mon HTC touch HD), mais je n'arrive pas a exécuter mes
Jouer un son pour une application Windows Mobile [ par podolis ]
Bonjour,J'aimerais connaitre la fonction (développé en VB) permettant de jouer un son pour une application windows mobile 6 professionnel En fait je v
Comment lancer une apllication au demarrage de Windows ? vb 2008 [ par cenay01 ]
bonjourje voudrais savoir comment faire pour quand je demarre mon pc mon apllication se lancebien sur c'est en visual basic 2008 Merci de m'aider au p
|
Derniers Blogs
GESTION D'EXCEPTION AVEC LES TASKSGESTION D'EXCEPTION AVEC LES TASKS par richardc
Nous avons vu dans un précédent article comment utiliser Task pour effectuer des opérations dans un autre thread.
Malheureusement, comme tout le monde n'est pas parfait, il se peut que cette exécution se passe mal et qu'une exception se produise.
La...
Cliquez pour lire la suite de l'article par richardc DéMARRONS AVEC LES TASKSDéMARRONS AVEC LES TASKS par richardc
Que vous le vouliez ou non, le développement multi-tâche est maintenant une obligation pour toute nouvelle application. Il est donc vital d'en comprendre les mécanismes et de s'y mettre le plus tôt possible.
En attendant le .NET Framework 4.5 avec le...
Cliquez pour lire la suite de l'article par richardc SLIDE & DéMO TECHDAYS 2012 - FAST & FURIOUS XAML APPSSLIDE & DéMO TECHDAYS 2012 - FAST & FURIOUS XAML APPS par Vko
Retrouvez les slides et les démo de ma session Fast & Furious XAML Apps. A ceux qui se posent la question : "est-ce que le code de la DataGrid est disponible?", je vous répondrais "pas encore". Je vais mettre en place un projet codeplex pour part...
Cliquez pour lire la suite de l'article par Vko XNA IS DEAD!XNA IS DEAD! par richardc
Depuis la semaine dernière (et grâce aux TechDays 2012), je me penche activement sur la nouvelle version de Windows, aka Windows 8. Vous me direz, il était temps puisque la première preview date de Septembre dernier.
OK. Remarquez, on n'en est qu'aux...
Cliquez pour lire la suite de l'article par richardc TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 !TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 ! par ROMELARD Fabrice
Speakers: Fabrice Meillon et Stanislas Quastana Cette session est basée entièrement sur celle donnée lors de la BUILD cet hiver. Il n'y a pas d'ajout d'information en rapport avec cet évènement passé. Windows 8 Server sera intégralem...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice
Forum
ACCES ODBCACCES ODBC par yannickcottin
Cliquez pour lire la suite par yannickcottin
Logiciels
DocTranslate (V3.1.0.0)DOCTRANSLATE (V3.1.0.0)DocTranslate est un traducteur de document Microsoft Word, PowerPoint et Excel. Il permet d'autom... Cliquez pour télécharger DocTranslate Tribler (2012)TRIBLER (2012)Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des... Cliquez pour télécharger Tribler OneSwarm (2012)ONESWARM (2012)Le peer-to-peer qui protège votre vie privée, c'est OneSwarm.
Ce logiciel de peer-to-peer crypté... Cliquez pour télécharger OneSwarm PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System
|