[VBS]Err sur Shell.appActivate

Bonjour,

J'ai une application qui se lance en mode java, elle ouvre une fenêtre dos,
puis ouvre ensuite une popup pour authentification. (juste pour placer le
contexte, pas important, du moins je pense)
Je sais comment activer cette popup:

Code:

---

1 2 3 4 5

8<----------------------------------------------------------- Set objShell = WScript.CreateObject("WScript.Shell") strTitle = "Enter Login and Password" objShell.AppActivate strTitle 8<-----------------------------------------------------------

---

Par contre, cette séquence ne renvoie aucun code d'erreur même si
l'activation ne fonctionne pas!
J'ai tjs le code erreur à 0 même si je mets n'importe quoi dans strTitle
Je souhaite savoir si cette popup est là ou non.

Le but étant de détecté si mon appli est bien lancé ou planté!

Sinon, est il possible de lire dans une boite MsDos ce qui y est écrit ?

--

Amicalement,
Thierry

Citation:

---

J'ai une application qui se lance en mode java, elle ouvre une fenêtre dos,
puis ouvre ensuite une popup pour authentification. (juste pour placer le
contexte, pas important, du moins je pense)

---

Hé bien : en cherchant mieux, tu dois arriver à des chemins encore plus biscornus, je pense.... :twisted: :roll:

Voici la solution,

Il faut mettre l'activation de la fenêtre dans un résultat à testé et le tour est joué!

Code:

---

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

8<--------------------------------------------------------------- On Error Resume Next   Set objShell = WScript.CreateObject("WScript.Shell")   strTitle = "Enter Login and Password"   test=objShell.AppActivate(strTitle)   If test Then MsgBox "Fonctionne" End If   8<---------------------------------------------------------------

---

Amicalement,
Thierry