Fermer processus quand un nouveau s'ouvre

**Autofire** · 06/05/2012, 14h50

Bonjour,
J'ai 2 processus : ApplicationA.exe et ApplicationB.exe
je voudrais que quand je lance ApplicationA.exe, ApplicationB.exe se ferme
et que quand je lance ApplicationB.exe, ApplicationA.exe se ferme.
En fait, j'ai 2 logiciels de serveurs de jeu sur un meme serveur,
1 public et 1 privé et je voudrais que quand le privé démarre, le public s'éteigne et vice-versa.
Comment faire sous windows xp ( ou windows 2000 ) merci d'avance

**JML19** · 06/05/2012, 17h26

Bonjour

Le lancement est automatique ou manuel ?

**Autofire** · 06/05/2012, 18h27

Bonjour, je lance l' application A ou B avec un bouton " start " donc je suppose que c'est manuel.

**JML19** · 06/05/2012, 19h50

Alors essais de faire un bat pour lancer un et fermer l'autre.

Dans le batch toto.exe qui ferme tutu

Pour lancer : LOAD ou CALL c:\toto\tata.exe

Pour fermer : TASKKILL /f /im c:\titi\tutu.exe

Dans le batch tutu.exe qui ferme tata.exe

Pour lancer : LOAD ou CALL c:\titi\tutu.exe

Pour fermer : TASKKILL /f /im c:\toto\tata.exe

**hackoofr** · 07/05/2012, 15h07

Voila un exemple concret testé sous Windows XP:
un vbscript firefox.vbs pour tuer le processus de iexplore.exe de Internet Explorer et qui lance en même temps le navigateur Firefox.exe

firefox.vbs :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Set Ws = CreateObject("Wscript.Shell")
Command1 = "cmd /c Taskkill /F /IM iexplore.exe"
Command2 = "cmd /c cd ""C:\Program Files\Mozilla Firefox\"" | Start firefox.exe"
Execution1 = Ws.Run(Command1,0,True)
Execution2 = Ws.Run(Command2,0,True)

un autre vbscript iexplore.vbs pour tuer le processus de firefox.exe et qui lance en même temps le navigateur Internet Explorer iexplore.exe

iexplore.vbs :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Set Ws = CreateObject("Wscript.Shell")
Command1 = "cmd /c Taskkill /F /IM firefox.exe"
Command2 = "cmd /c cd ""C:\Program Files\Internet Explorer\"" | Start iexplore.exe"
Execution1 = Ws.Run(Command1,0,True)
Execution2 = Ws.Run(Command2,0,True)

Donc il vous suffit de modifier ces deux scripts par les noms de vos processus de ApplicationA.exe et ApplicationB.exe avec leurs chemins absolus

**hackoofr** · 08/05/2012, 03h58

Vous pouvez aussi le tester dans un seul fichier de type HTA , donc copier coller ce code et enregistrez-le sous FireFox+IE.hta

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
<html>
<head>
<title>Firefox + Internet Explorer</title>
<HTA:APPLICATION
  APPLICATIONNAME="Firefox + Internet Explorer"
  icon="explorer.exe"
SINGLEINSTANCE="Yes" CONTEXTMENU="No" MAXIMIZEBUTTON="No"
MINIMIZEBUTTON="yes" BORDER="Thin" SELECTION="No" SCROLL="No"
  ID="Firefox + Internet Explorer"/>
  <style>
Input,button    {    border:2px solid #FF6A22;
                background-color:#FFFF00;
                font-family:Verdana;
                font-size:12px;
                height:25px;
                font-weight:bold; 
                cursor:hand;    }
</style>
</head>
<script language="VBScript">
Self.ResizeTo 400,250 : Self.MoveTo (Screen.Width/2)-200,(Screen.Height/2)-200
Sub Firefox()
Set Ws = CreateObject("Wscript.Shell")
Command1 = "cmd /c Taskkill /F /IM iexplore.exe"
Command2 = "cmd /c cd ""C:\Program Files\Mozilla Firefox\"" | Start firefox.exe"
Execution1 = Ws.Run(Command1,0,True)
Execution2 = Ws.Run(Command2,0,True)
End Sub

Sub IE()
Set Ws = CreateObject("Wscript.Shell")
Command1 = "cmd /c Taskkill /F /IM firefox.exe"
Command2 = "cmd /c cd ""C:\Program Files\Internet Explorer\"" | Start iexplore.exe"
Execution1 = Ws.Run(Command1,0,True)
Execution2 = Ws.Run(Command2,0,True)
End sub
</script>
<body STYLE="font:14 pt arial; color:white;
 filter:progid:DXImageTransform.Microsoft.Gradient
(GradientType=1, StartColorStr='#000000', EndColorStr='#0000FF')">
<center>
Lancer le Navigateur FireFox<br><br>
<input type="button" class="button" name="Firefox" id="Firefox" value="Firefox" onclick="Firefox()"><br><br>
Lancer le Navigateur Internet Explorer<br><br>
<input type="button"class="button" name="IE" id="IE" value="Internet Explorer" onclick="IE()">
</body>
</html>

**hackoofr** · 15/05/2012, 11h05

Je ne sais pas ou est l'auteur de cette discussion il n'a pas fait un signe de vie

mais ça n'empêche pas d’enrichir cette dernière par d'autres solutions possibles; Donc ça peut être utile pour les autres membres.
Bon j'ai constaté que pour le chemin absolu de Firefox peut se trouvé sur une autre partition autre que le C:\Program Files
Donc je dois remplacer

"C:\Program Files\Mozilla Firefox\"

par ceci

"%ProgramFiles%\Mozilla Firefox\"

et le fichier HTA devient :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
<html>
<head>
<title>Firefox & Internet Explorer © Hackoo</title>
<HTA:APPLICATION
  APPLICATIONNAME="Firefox + Internet Explorer"
  icon="explorer.exe"
SINGLEINSTANCE="Yes" CONTEXTMENU="No" MAXIMIZEBUTTON="No"
MINIMIZEBUTTON="yes" BORDER="Thin" SELECTION="No" SCROLL="No"
  ID="Firefox + Internet Explorer"/>
  <style>
Input,button    {    border:2px solid #FF6A22;
                background-color:#FFFF00;
                font-family:Verdana;
                font-size:12px;
                height:25px;
                font-weight:bold; 
                cursor:hand;    }
</style>
</head>
<script language="VBScript">
Self.ResizeTo 400,250 : Self.MoveTo (Screen.Width/2)-200,(Screen.Height/2)-200
Sub Firefox()
Set Ws = CreateObject("Wscript.Shell")
Command1 = "cmd /c Taskkill /F /IM iexplore.exe"
Command2 = "cmd /c cd ""%ProgramFiles%\Mozilla Firefox\"" | Start firefox.exe"
Execution1 = Ws.Run(Command1,0,True)
Execution2 = Ws.Run(Command2,0,True)
End Sub

Sub IE()
Set Ws = CreateObject("Wscript.Shell")
Command1 = "cmd /c Taskkill /F /IM firefox.exe"
Command2 = "cmd /c cd ""%ProgramFiles%\Internet Explorer\"" | Start iexplore.exe"
Execution1 = Ws.Run(Command1,0,True)
Execution2 = Ws.Run(Command2,0,True)
End sub
</script>
<body STYLE="font:14 pt arial; color:white;
 filter:progid:DXImageTransform.Microsoft.Gradient
(GradientType=1, StartColorStr='#000000', EndColorStr='#0000FF')">
<center>
Lancer le Navigateur FireFox<br><br>
<input type="button" class="button" name="Firefox" id="Firefox" value="Lancer Firefox et fermer IE" onclick="Firefox()"><br><br>
Lancer le Navigateur Internet Explorer<br><br>
<input type="button"class="button" name="IE" id="IE" value="Lancer IE et fermer Firefox" onclick="IE()">
</body>
</html>