Killer un objet InternetExplorer.application

Bonjour,

Je lance une VbScript qui instancie un objet InernetExplorer

j'aimerai pouvoir killer le processus mais uniquement celui de l'objet instancier, car j'ai d'autre VbScript qui tourne en parallèle et j'aimerai que chacun se kill mais uniquement eux-même.

J'ai vraiment besoin de killer car la methode Close ne suffie pas dans ce que je veux faire. ;)

Merci

La méthode Dispose() peut-être ?

l'objet InternetExplorer ne dispose pas de methode dipose ?

http://msdn.microsoft.com/en-us/libr...=vs.85%29.aspx

Salut

En VB6, j'utilise

Code:

---

IE.Quit: Set IE = Nothing

---

Cela doit être la même chose en VBScript, et cela ne ferme que l'instance de l'objet que j'ai créé.

:salut:
essaye avec ceci

Code:

---

1 2 3 4 5 6 7 8

strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colProcessList = objWMIService.ExecQuery _ ("Select * from Win32_Process Where Name = 'iexplore.exe'") For Each objProcess in colProcessList objProcess.Terminate() Next

---

faire une session IE ordinaire, et lancer ce

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

Dim Sortie Dim objExplorer Dim READYSTATE_COMPLETE READYSTATE_COMPLETE = 4   Set objExplorer = CreateObject("InternetExplorer.Application") Sortie = DateAdd("S", 10, Now) 'ajoute de 10 Sc par apport à l'heure systeme objExplorer.navigate "http://www.ing.be"   Do If Now >= Sortie Then Exit Do Loop Until objExplorer.readyState = READYSTATE_COMPLETE   objExplorer.Visible=True   Sortie = DateAdd("S", 10, Now) 'ajoute de 10 Sc par apport à l'heure systeme Do If Now >= Sortie Then Exit Do Loop   objExplorer.Quit set objExplorer = Nothing

---

au bout de 20 Sc la fenêtre IE lancée par le code se finit, la session ordinaire reste disponible.

Si tu fais 2 sessions du code avec une adresse URL différente, tu peux constater que la première session lancer s'arrête avant la deuxième, puis cette deuxième prend fin et que la session ordinaire reste active.

Donc .Quit et déchargement explicite de la variable termine bien les processus initié par tes différents script.

Il y a peut-être aussi cette possibilté :

Code:

---

1 2 3 4 5 6 7

Set oShell = WScript.CreateObject("WScript.Shell") Set IE=CreateObject("InternetExplorer.Application") Set oIE = oShell.Exec(IE.Path & "iExplore.exe") oShell.AppActivate oIE.ProcessID Wscript.Sleep 5000 MsgBox "Fermeture de IE" oIE.Terminate

---

Dans ce cas, on est sûr de ne fermer que l'instance qu'on vient de créer.

Citation:

---

Envoyé par hackoofr

:salut:
essaye avec ceci

Code:

---

1 2 3 4 5 6 7 8

strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colProcessList = objWMIService.ExecQuery _ ("Select * from Win32_Process Where Name = 'iexplore.exe'") For Each objProcess in colProcessList objProcess.Terminate() Next

---

---

cette méthode marche à moitié elle me kill le processus, mais elle kill les processus des autres objet IE qui tournent sur les autre script en parallèle, il n'y aurait pas un solution avec le PID ? du style Select * from Win32_Process Where PID = ..... ???

Citation:

---

Envoyé par sucrm

cette méthode marche à moitié elle me kill le processus, mais elle kill les processus des autres objet IE qui tournent sur les autre script en parallèle, il n'y aurait pas un solution avec le PID ? du style Select * from Win32_Process Where PID = ..... ???

---

:salut:
Jette un coup d'oeil dans cette discussion

En fait je pense que mon problème est plus simple que sa,
lorsque je fais mon :

Code:

---

1 2 3

objDocument.Close objExplorer.Quit() set objExplorer = Nothing

---

il y a une vingtaines de boites de dialogues qui s'ouvre me demandant des confirmations (bouton OUI, bouton NON) . Je voudrais tout simplement fermer d'un seule coup toutes ces boites de dialogues, la solution que j'ai trouver est de killer le processus or je viens de voir que plusieurs objets InternetExplorer utilise un même processus. Alors comment faire pour éliminer toutes ces boites de dialogues déclenché par la fermeture de l'objet ie

Merci