Fermeture d'un processus précis (kill process)

Soyez le premier à donner votre avis sur cette source.

Snippet vu 49 597 fois - Téléchargée 30 fois

Contenu du snippet

Après avoir cherché longtemps sur le net, et n'ayant quasiment rien trouvé, je mets aujourd'hui un bout de code qui vous permet de killer tout processus de Windows.
Il suffit de mettre le nom que vous souhaitez en lieu et place de APPLICATION_A_KILLER, on peut bien sur utiliser du logique (OU, ET) dans la boucle de condition, pour fermer le procesus désiré. A chacun de savoir ce qu'il veut en faire... @ bientôt

Source / Exemple :


'Fermeture des instances de APPLICATION_A_KILLER si ces applis sont ouvertes

Dim Prc() As Process = process.GetProcesses() 'on récupère la liste des processus de Windows: ATTENTION ce sont des tableaux
For x As Integer = 0 To UBound(Prc) 'on fait toute la liste dans une boucle
   If Prc(x).ProcessName.ToUpper(New System.Globalization.CultureInfo("fr-FR", False)) = "APPLICATION_A_KILLER" Then 'Cette application nous embete ?
       Prc(x).Kill() 'on la tue !!!!
   End If
Next

Conclusion :


Merci à planetesourcecode.com (http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=1918&lngWId=10) qui y a beaucoup contribué
et à Patrice Dargenton (http://patrice.dargenton.free.fr/CodesSources/XLDotNet.html) qui s'y réfère

A voir également

Ajouter un commentaire

Commentaires

cboulas
Messages postés
2641
Date d'inscription
mercredi 2 juin 2004
Statut
Membre
Dernière intervention
8 janvier 2014
11 -
Utile, mais on est vraiment obliger de mettre : New System.Globalization.CultureInfo("fr-FR", False)) ?
cs_Patrice99
Messages postés
1222
Date d'inscription
jeudi 23 août 2001
Statut
Membre
Dernière intervention
9 septembre 2018
-
Pourquoi veux-tu tuer un process ? pour ma part j'ai completement indiqué la raison pour laquelle je devais tuer un processus : c'est parce que Office 2000 a légèrement été oubliée par Microsoft et que moi je distribue des logiciels .Net qui doivent fonctionner avec toutes les versions d'Office >= 2000.
capuccino_fr
Messages postés
113
Date d'inscription
vendredi 5 mars 2004
Statut
Membre
Dernière intervention
11 février 2008
-
Réponse à cboulas : "New System.Globalization.CultureInfo("fr-FR", False))" n'est nécessaire bien évidemment... il n'est la que pour palier à des problèmes de langue

Réponse à Patrice99 : Je veux tuer un process car j'en ai eu besoin pour un soft qui a besoin d'avoir un logiciel fermé avant d'exporter des données en automatique toutes les nuits. S'il n'est pas fermé, il n'est pas possible d'exporter quoi que ce soit. Et les données comptables, ca n'attend pas !!

@+
Sirocooo
Messages postés
412
Date d'inscription
mercredi 19 décembre 2001
Statut
Membre
Dernière intervention
7 avril 2008
1 -
Bon travail.

On aussi faire :

Public Shared Sub KillProcess(ByVal NomExeSansExt As String)
Dim sProcess() As Process = Process.GetProcessesByName(NomExeSansExt)
Dim i As Integer

For i = 0 To sProcess.Length - 1
sProcess(i).Kill()
Next
End sub
cboulas
Messages postés
2641
Date d'inscription
mercredi 2 juin 2004
Statut
Membre
Dernière intervention
8 janvier 2014
11 -
Merci Capuccino_fr, je ne savais pas je pensais que microsoft avais fait un trux standard accéssible quelque soit le pays ou langue :(
un méthode commune.
merci bien pour la réponse ;)

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.