Lancement en parallèle de plusieurs action
Bonjour
Ce code me permet de zipper des fichiers, de créer un iso avec, puis de les ranger dans les bons répertoires et de faire le ménage
Il fonctionne parfaitement comme je souhaite.
Cependant, est-il possible qu'il puisse se lancer plusieurs fois en parallèle :
Action 1 : Je dézippe le premier fichier
Premier fichier dézippé
Action 2 : Je mets en iso et en même temps je dézippe le deuxième fichier.
J'espère avoir bien illustré ce que je souhaité.
J'ai bien pensé à CALL, mais j'ai peur qu'il reprenne mon premier zip.
Code:
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
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
| @echo off
setlocal enabledelayedexpansion
cls
pause
for /R "C:\Users\LT30694\Desktop\Dezippeur\CFM" %%I in ("*.zip") do (
title Paramétrage des variables
call:extract_informations_title_file %%~dpnI
if !fonction!==DATA (
title Extraction des fichiers du !fonction! !type!
"C:\Program Files\7-zip\7z.exe" x "%%I" -o"%%~dpnI" -r
title Copie vers le serveur des fichiers du !fonction! !type!
robocopy "%%~dpnI" "\\snm.snecma\Partages\SavBiblio\BIBLIOTHEQUE\!moteur!\!type!\!type! - !version! - DVD\viewer" /E /MOVE
set repertoire=%%~dpnI
set fichier=%%I
title Suppression des fichiers zip et dezippe du !fonction! !type!
call:suppression
)
if !fonction!==APP (
title Saisir le nom de la version actuelle
SET /P folder=Saisir le nom de la version actuelle :
IF "!folder!"=="" GOTO Empty
title Saisir le nom de l'ancienne version
SET /P folder2=Saisir le nom de l'ancienne version :
IF "!folder2!"=="" GOTO Empty
title Extraction des fichiers du !fonction! !type!
"C:\Program Files\7-zip\7z.exe" x "%%I" -o"%%~dpnI" -r
title Copie vers le serveur des fichiers du !fonction! !type!
robocopy "%%~dpnI" "\\snm.snecma\Partages\SavBiblio\BIBLIOTHEQUE\!moteur!\!type!\!type! - !version! - DVD" /E /MOVE
set repertoire=%%~dpnI
set fichier=%%I
title Suppression des fichiers zip et dezippe du !fonction! !type!
call:suppression
title Archivage de la version actuelle !folder!
robocopy "\\snm.snecma\Partages\SavBiblio\BIBLIOTHEQUE\!moteur!\!type!\!folder!" "\\snm.snecma\Partages\SavBiblio\BIBLIOTHEQUE\REVISIONS ANTERIEURES\!moteur! N-1\!type!\!folder!" /E /MOVE
title Détection du disque dur
call :DetectLetterExternaHardDisk
title Archivage de l'ancienne version !folder2!
robocopy "\\snm.snecma\Partages\SavBiblio\BIBLIOTHEQUE\REVISIONS ANTERIEURES\!moteur! N-1\!type!\!folder2!" "%letter%:\Civil\!moteur!\!type!" /e /MOVE
pause
)
)
title Operations terminees
echo Operations terminees
pause
exit
:suppression
title Suppression du repertoire decompresse !fichier!
echo Suppression du repertoire decompresse !fichier! en cours
RD /S /Q "!repertoire!"
title Suppression du fichier zip !fichier!
echo Suppression du zip en cours !fichier!
DEL /S /Q "!fichier!"
goto :eof
:extract_informations_title_file
for /f "tokens=2,3,4,5 delims=_" %%a in ('echo %~n1') do (
set fonction=%%a
set moteur=%%b
set type=%%c
set mois=%%d
)
for /f "tokens=1 delims=_" %%a in ('echo %~x1') do set an=%%a
set type=%moteur% %type%
set version=%mois% %an:.=%
goto :eof
:Empty
ECHO Aucune saisie faite!
pause
goto :eof
:DetectLetterExternaHardDisk
FOR %%A IN (C D E F G H I J K L M N O P Q R S T U V W X Y Z) DO IF EXIST %%A: (
FOR /F "TOKENS=*" %%B IN ('VOL %%A:^|FIND /I "Archive BT"') DO ( SET SYS=%%A)
)
set letter=%SYS%
goto :eof |
Merci beaucoup d'avance
