VB.NET Condition IF

Bonjour

Je suis entrains de me faire un petit programme qui a pour fonction :
Si internet explorer fonctionne, alors, MSGBOX "OK"
Si internet et éteint, lalors, MSGBOX "Internet pas OK"


j'ai trouver ça :

Code:

---

1 2 3 4 5

For Each p As Process In Process.GetProcesses If p.ProcessName = "iexplore" Then Label1.Text = "ok" End If Next

---

mais j'arrive pas a faire : ci je fait une condition : Ci p.ProcessName <= "iexplore" Then ...


le but de ce programme, j'ai pris internet explorer en exemple, c'est de vérifier qu'un processus fonctionne en tache d'execution , et s'il ne fonctionne pas , alors il le lance .
Le tout dans un TIMER .

Merci d'avance ci vous avec une solution pour moi


Voici mon code qui ne fonctionne pas :

Code:

---

1 2 3 4 5 6 7 8 9 10

For Each p As Process In Process.GetProcesses   If p.ProcessName = "iexplore" Then Label1.Text = "ok"   ElseIf Not p.ProcessName = "iexplore" Then Label1.Text = "no ok" End If Next

---

Bonjour,
En premier lieu si tu compares des chaines de caractère utilise string.equals("string2"). J'ai déjà eu des problèmes à cause de ça.

Ensuite tu veux activer un processus si il ne l'ai pas. Pour savoir s'il ne l'ai pas il faut d'abord comparer tout les processus actif, le mieux c'est d'utiliser un booléen.
For each processus
if processus actif then
passer le booléen en true
end if
next processus.

En gros.

Bonjour fabdunet13,

Détecter si u processus (par nom) est en cours :

http://pastebin.com/u/3DotDev

Je rajouterais ceci :

ATTENTION : 1 processus qui porte le nom "iexplore" ne veut pas forcément dire que l'utilisateur est connecté à Internet. IE est un navigateur qui peut tout aussi bien faire appel à un réseau d'entreprise non connecté à Internet !

PS : comme le processus IE est un exemple je suppose qu'en fait tu souhaites détecter un autre logiciel. C'était juste à titre info . ;)

A+

Citation:

---

Envoyé par Uranne-jimmy

if processus actif then
passer le booléen en true
end if
next processus.

En gros.

---

Bonjour
Débutant en VB.Net , voici mes ligne de commande avec vos conseils :

Code:

---

1 2 3 4 5 6 7

For Each p As Process In Process.GetProcesses If p.ProcessName = "iexplore" Then Label1.Text = "ok" else Label1.Text = "pas OK " End If Next

---

mais cella no fonctionne pas !!!

J'ai trouver

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Dim erreur As Integer = 0 For Each p As Process In Process.GetProcesses If p.ProcessName = "iexplore" Then erreur = 1 End If Next   If erreur = 1 Then Label1.Text = "ok" Else Label1.Text = "pas ok" End If End Sub

---

je suis nul en programmation , je suis ouvert a d'autre code source a fin de les comprendre et d’apprendre d'avantage .

Bonjour fabdunet13,

Le lien que je t'ai proposé plus haut fait référence à un snippet dans lequel il y a une fonction permettant de vérifier si un processus portant x nom est en cours.

Voilà comment l'implémenter (dans une application Windows Form avec le formulaire par défaut nommé "Form1") :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30

Public Class Form1   ''' <summary> ''' Gestionnaire d'évènement "Load" de Form1. S'exécute lorsque l'application se lance ''' </summary> Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load   If ProcessIsRunning("iexplore") Then Msgbox("Exists !") Else Msgbox("Not exists !") End If   End Sub   ''' <summary> ''' Fonction qui accepte 1 argument de type String = "Le nom du processus" dans sa signature. NB : Une signature de fonction ou procédure c'est ce qui se situe entre parenthèses à la suite du nom de la méthode (procédure ou fonction). ''' </summary> Private Function ProcessIsRunning(ByVal ProcName As String) As Boolean For Each ObjPro As Process In Process.GetProcesses If ObjPro.ProcessName.Contains(ProcName) Then Return True End If Next Return False End Function     End Class

---

A+

Citation:

---

Envoyé par Uranne-jimmy

Bonjour,
En premier lieu si tu compares des chaines de caractère utilise string.equals("string2"). J'ai déjà eu des problèmes à cause de ça.

---

Pour string.equals("string2") , l'opérateur == est surchargé non ?

Je n'ai jamais utilisé cet opérateur en vb Oo Dans d'autres langage sans oui mais en vb pas du tout. Donc je peux pas te dire.

Oups pardon en VB c'est un simple "="
Et à priori il semble bien surchargé.
Utiliser l'opérateur "=" permet de ne pas avoir à tester la nullité de la chaine

Ca plante

Code:

---

1 2 3 4

Dim test1 as string Dim test2 as String Dim r = (test1.Equals(test2))

---

ca plante pas

Code:

---

1 2 3 4

Dim test1 as string Dim test2 as String Dim r = (test1 = test2)

---

Je trouve ça tout de même moins propre au final. En parallèle à equals on a d'autres façon de comparer des chaines de caractères, chacune a ses spécificités. Un opérateur qui permet de travailler sur des chaines vides ... euh ... Je vois pas vraiment l'intérêt, dans ce cas là il vaut mieux que ça plante pour qu'on se rende compte que les chaines sont vides, ce qui est généralement anormal.

C'était juste pour montrer la surcharge de l'opérateur, les chaines peuvent être remplie.
Ce que je ne comprenais pas, c'était les surpises dont tu parlais en utilisant "=", mise à part dans le cas d'un null et donc d'une exception déclenchée, les deux sont strictement équivalente.

pour les entiers, l'opérateur est également surchargé, ce qui est quand même bien pratique.

Sur ce point je ne fais que répeter ce que j'ai appris, en grande partie sur ce forum et faire part de mes expériences, parfois un simple changement vers equals a suffit à résoudre mes problèmes. Je pense qu'il est possible que ce soit lier à la surcharge justement, il suffit de ne pas avoir spécifier en amont le type de ta variable et l'opérations change sans que tu le souhaites. Ce n'est qu'une piste.

Citation:

---

Envoyé par Uranne-jimmy

il suffit de ne pas avoir spécifier en amont le type de ta variable et l'opérations change sans que tu le souhaites. Ce n'est qu'une piste.

---

Je pense que le problème est là, tu ne devrais pas avoir de variable sans type déclaré.

Bonjour,

Je viens de regarder dans mon Gestionnaire des tâches. Chez moi, (Windows7), le processus se nomme "iexplore.exe", et pas seulement "iexplore".

Citation:

---

Envoyé par clementmarcotte

Bonjour,

Je viens de regarder dans mon Gestionnaire des tâches. Chez moi, (Windows7), le processus se nomme "iexplore.exe", et pas seulement "iexplore".

---

Bonsoir Clément,

Un nom de processus (processName) ne porte pas d'extension, seul le fichier depuis lequel est lancé le processus porte l'extension.
Ce qui veut dire que lorsque tu parcours les processus par <nom> ce dernier ne contient pas l'extension.


Cdlt.