REM : test si le processus est la :
IF %errorLevel% == 0 goto present
goto absent
:present
echo present
echo *******************************************************
echo fin de tache sur le processus du logiciel sur le client
echo *******************************************************
taskkill /S %Ordicible% /F /IM Cnxapp.exe /T
net use m: /delete
:absent
Modifié en dernier par Yogui le dim. 17 août 2008 23:08, modifié 1 fois.
n'ayant rien sous les yeux pour aider (soft,doc ect)
la conversion du bat en au3 est faisable ^^'
sinon pour vérifier si un processus existe faudra regarder du coté des fonctions processClose,processExist...
la variable ordicible c'est quel macro ? @ComputerName ?
je vais essayé de traduire ce bat
mais pas pratique à maintenir et surtout depuis j'ai découvert autoit
► Afficher le texte
@echo off
cls
echo *******************************************************
echo suppression du lecteur reseau i au cas ou
echo *******************************************************
net use i: /delete
cls
echo *******************************************************
echo montage lecteur reseau vers nouvelles sources
echo *******************************************************
rem je monte un lecteur réseau directement sur le répertoire où sont les sources
net use i: \\172.16.1.42\_bat\logiciel75
cls
cd \
set Ordicible=scuhcd
set boucle=0
Goto MAJ
:0
set Ordicible=STDsal
set boucle=1
Goto MAJ
:1
set Ordicible=STDsa1
set boucle=2
Goto MAJ
:2
set Ordicible=secur2
set boucle=3
Goto MAJ
:3
set Ordicible=secrea
set boucle=4
Goto MAJ
:4
set Ordicible=LaboS2
set boucle=5
Goto MAJ
:5
set Ordicible=secgy1
set boucle=6
Goto MAJ
:6
set Ordicible=Rad517
set boucle=7
Goto MAJ
:7
set Ordicible=Rad510
set boucle=8
Goto MAJ
:8
set Ordicible=Rad509
set boucle=9
Goto MAJ
:9
set Ordicible=Obsce1
set boucle=10
Goto MAJ
:10
set Ordicible=Obsadm
set boucle=11
Goto MAJ
:11
set Ordicible=inf007
set boucle=12
Goto MAJ
:12
set Ordicible=fin3
set boucle=13
Goto MAJ
:13
set Ordicible=fin2
set boucle=14
Goto MAJ
:14
set Ordicible=csfact
set boucle=15
Goto MAJ
:15
set Ordicible=CSdim2
set boucle=16
Goto MAJ
:16
set Ordicible=Besal1
set boucle=17
Goto MAJ
:17
set Ordicible=Becha1
set boucle=18
Goto MAJ
Goto fin2
echo *******************************************************
echo test Si Pc est bien branche
echo *******************************************************
ping %Ordicible% -n 1
if errorlevel 1 Goto nt
echo *******************************************************
echo le PC est bien en ligne
echo *******************************************************
echo *******************************************************
echo Bienvenue dans le programme de changement serveur logiciel
echo *******************************************************
echo *******************************************************
echo suppression du lecteur reseau m au cas ou
echo *******************************************************
net use m: /delete
rem ouverture lecteur réseau vers machine à mettre à jour :
net use m: \\%Ordicible%\c$
rem vérification de l'installation du logiciel dans le bon repertoire
if not exist "m:\sihi\sihiexp\Acc\ACCUEIL.exe" goto non
REM : test si le processus est la :
IF %errorLevel% == 0 goto present
goto absent
:present
echo present
echo *******************************************************
echo fin de tache sur le processus du logiciel sur le client
echo *******************************************************
taskkill /S %Ordicible% /F /IM Cnxapp.exe /T
net use m: /delete
:absent
echo **********************************************************
echo Le programme d'installation Copie les fichiers logiciel.
echo **********************************************************
xcopy I:\sihiexp M:\SIHI\SIHIEXP /S /E /C /H /Q /Y
if errorlevel 3 Goto erreur
xcopy I:\TUX M:\TUXEDO /S /E /C /H /Q /Y
if errorlevel 3 Goto erreur
if not exist "m:\WINDOWS\notepad.exe" goto NT2
echo **********************************************************
echo Le Pc est un XP
echo **********************************************************
echo **********************************************************
echo Le programme d'installation Copie les fichiers system.
echo **********************************************************
echo **********************************************************
echo Le Pc est un 2000
echo **********************************************************
echo **********************************************************
echo Le programme d'installation Copie les fichiers system.
echo **********************************************************
xcopy I:\windows M:\Winnt\ /S /E /C /H /Q /Y
:XP
echo **********************************************************
echo la copie des fichiers sans problemes.
echo **********************************************************
echo **********************************************************
echo L'INSTALLATION C EST DEROULEE SANS PROBLEME
ECHO MERCI DE TESTER L APPLICATION logiciel
echo **********************************************************
goto fin
:erreur
if not "%os%"=="Windows_NT" goto NextStep3
REM --- Section spécifique à Windows NT ---
title Attention Copie en erreur
color 06
:NextStep3
echo **********************************************************
echo Attention la copie de fichier c'est mal deroulee
echo faire la copie a la main verifier les fichier A copier
echo **********************************************************
goto fin
:non
if not "%os%"=="Windows_NT" goto NextStep4
REM --- Section spécifique à Windows NT ---
title Installation non conforme
color 06
:NextStep4
echo **********************************************************
echo La mise a jour du D.A.P. sur le poste client n'est pas conforme
echo merci de faire l'installation A la main
echo **********************************************************
goto fin1
:nt
if not "%os%"=="Windows_NT" goto NextStep4
REM --- Section spécifique à Windows NT ---
title Pc cible non branche
color 06
:NextStep4
echo **********************************************************
echo Le Pc cible n'est pas connecte au reseau
echo merci de le redemarrer
echo **********************************************************
goto fin1
:fin
if not "%os%"=="Windows_NT" goto NextStep3
REM --- Section spécifique à Windows NT ---
title Bonne journee
color 02
:fin1
:NextStep3
if "%boucle%"=="18" goto fin2
goto %boucle%
if "%boucle%"=="18" goto fin2
goto %boucle%
:fin2
Bonsoir,
perso, je marche sur ce genre d'arrêt (je passe par les pstools...)
Sinon si tu dévelloppes l'appli à tuer, on peux y mettre un port tcp en écoute qui tuera l'appli par l'envoie d'un message précis (avec une petite authentification ...)
Le pb de cette méthode est que si l'appli est vraiment dans les choux, alors le mini serveur ne sera pas joignable. Donc du coups on peut le programmer dans un exe dédié à attendre une requête pour tuer en locale, ce qui finalement n'est pas franchement mieux... mais bon c'est histoire de proposer une pseudo alternative ^^
Toi qui cherche à mettre le doigt sur la solution, appuie sur F1.
et non ce n'est pas moi qui est développé le logiciel à tuer et puisque que les mises à jour ne peuvent se faire que si ce dit logiciel n'est pas en marche je vais laisser mon code comme il est merci