VBS - Controler si une application est lancée [Résolu]

didieraucun 29 Messages postés samedi 30 juin 2007Date d'inscription 2 janvier 2008 Dernière intervention - 2 janv. 2008 à 12:25 - Dernière réponse : PCPT 13368 Messages postés lundi 13 décembre 2004Date d'inscription 3 février 2018 Dernière intervention
- 3 janv. 2008 à 04:30
Bonjour,
je souhaiterais controler si une application est bien ouverte (active dans la barre des taches).
je ne souhaites pas controler si le programme (exe) est lancé mais la fenetre en question.
J'ai écris cela, mais apparement c'est pas ca 

On Error Resume Next
set shell = WScript.CreateObject("WScript.Shell")
shell.AppActivate "Calculatrice"
If Err.Number <> 0 Then
   msgbox " L'application Calculatrice n'est pas active ! "
  Else
  Msgbox "L'application Calculatrice est active"
End If
Afficher la suite 

Votre réponse

1 réponse

Meilleure réponse
PCPT 13368 Messages postés lundi 13 décembre 2004Date d'inscription 3 février 2018 Dernière intervention - 3 janv. 2008 à 04:30
3
Merci
salut,

il n'y aura pas d'erreur, il faut vérifier le retour de SHELL

sous forme de fonction (en VBS) çà donne :

function ApplicationIsRunning(AppName)
  dim shell
  set shell = WScript.CreateObject("WScript.Shell")
  ApplicationIsRunning = shell.AppActivate(AppName)
  set shell = Nothing
end function

If ApplicationIsRunning("Calculatrice") Then
   msgbox "L'application 'Calculatrice' est active"
Else
  Msgbox "L'application 'Calculatrice' n'est pas active !"
End If

++
PCPT  [AFCK]
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

Merci PCPT 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 92 internautes ce mois-ci

Commenter la réponse de PCPT

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.