Cotroler Un Proc En Vb - Le Forum de Génération Nouvelles Technologies

grosminou · 04/05/2006, 17h32

boujours j'ai rechercher sur ce cite trouver la solution a mon blem. mais sens sucses alors je vous pose mon probleme (si vous avez lien ou solution je suis preneur)

j'aimerai , dans un code conditionel arriver a ce resultat

si "le processus cmd.exe existe" alors"fait ceci" sinon "fait cela"

mon probleme et donc de controler si le proc. CMD.exe existe ou pas

merci d'avance

grosminou · 04/05/2006, 18h41

j'ai trouver en delfi en c++ mais pas en vb

pour resoudre mon blem j'ai compris que je peut aussi attendre que mon proc (CMD.exe ) soit terminé je regard ça

grosminou · 04/05/2006, 20h35

j'ai choper ce code

Function NbCmd() As Integer
Dim iNb As Integer
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set ColItems = objWMIService.ExecQuery("Select * from Win32_Process where name='cmd.exe' ", , 48)
If ColItems Is Nothing Then
iNb = 0
Else
For Each objItem In ColItems
iNb = iNb + 1
Debug.Print objItem.Caption
Next
End If
NbCmd = iNb
End Function

mais je comprend pas trop est que quelqu'un peut m'aider pour la commenter et trouver comment l'utiliser

merci

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email
Modes d'affichage
Mode linéaire Choisir le mode hybride Choisir le mode arborescent

04/05/2006, 17h32	#1 (permalink)
grosminou Débutant Date d'inscription: mars 2006 Messages: 71 Pouvoir de réputation: 0	boujours j'ai rechercher sur ce cite trouver la solution a mon blem. mais sens sucses alors je vous pose mon probleme (si vous avez lien ou solution je suis preneur) j'aimerai , dans un code conditionel arriver a ce resultat si "le processus cmd.exe existe" alors"fait ceci" sinon "fait cela" mon probleme et donc de controler si le proc. CMD.exe existe ou pas merci d'avance

04/05/2006, 18h41	#2 (permalink)
grosminou Débutant Date d'inscription: mars 2006 Messages: 71 Pouvoir de réputation: 0	j'ai trouver en delfi en c++ mais pas en vb pour resoudre mon blem j'ai compris que je peut aussi attendre que mon proc (CMD.exe ) soit terminé je regard ça

04/05/2006, 20h35	#3 (permalink)
grosminou Débutant Date d'inscription: mars 2006 Messages: 71 Pouvoir de réputation: 0	j'ai choper ce code Function NbCmd() As Integer Dim iNb As Integer Set objWMIService = GetObject("winmgmts:\\.\root\cimv2") Set ColItems = objWMIService.ExecQuery("Select * from Win32_Process where name='cmd.exe' ", , 48) If ColItems Is Nothing Then iNb = 0 Else For Each objItem In ColItems iNb = iNb + 1 Debug.Print objItem.Caption Next End If NbCmd = iNb End Function mais je comprend pas trop est que quelqu'un peut m'aider pour la commenter et trouver comment l'utiliser merci