Comment compresser un certains nombre de fichier défnis pour controler le nombre

**jam92400** · 20/07/2018, 16h04

Bonjour

Je voudrais savoi comment faire pour compresser un nombre de fichiers défini en batch Windows (ou powerShell) car aujourdhui mon programme batch prend tous les fichiers d'un dossier et créér un zip mais le probleme est que des fois il peut y avoir beaucoup trop de fichiers dans le zip crééé et cela pose probleme par la suite.

Du coup je dois limiter les zip à 30 fichiers max et je ne vois pas comment mettre en place ce type de compteur pendant mon traitement.

voilà mon programme ci dessous avc bout de code en gras ou je fais le zip:

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
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
84
85
86
87
88
89
90
91
92
93
94
95
96
@echo off

powershell -Command "get-childItem D:\CFT\Tempus\Upload\BPM_Prod\SCAN_FRA\*.eml | rename-item -newname { $_.name -replace '!','' }"

setlocal EnableDelayedExpansion

Rem ---- définition des variables---

	set currentpath=%~dp0
	set logdir=%currentpath%log\%date:~6,4%%date:~3,2%%date:~0,2%
	REM set logfile=%logdir%\scan_fra_%date:~6,4%%date:~3,2%%date:~0,2%_%time:~0,2%h%time:~3,2%%time:~6,2%.log
	set /p LotNum=<%currentpath%\conf\lot.conf
	set LotNum=!LotNum: =!
	set logfile=%logdir%\ScanFra_%date:~6,4%%date:~3,2%%date:~0,2%_LOT_%LotNum%.log
	set /a LotNumNext=%LotNum%+1
	set NN=0
	set Length=0

echo lot num = %LotNum%
echo lot suivant = %LotNumNext%
echo %logfile%

set hour=%time:~0,2%
set min=%time:~3,2%
set horodatage=%date:~6,4%%date:~3,2%%date:~0,2%T%hour%%min%
set horodatage=!horodatage: =!

	set repWork=D:\CFT\Tempus\Upload\BPM_Prod\WORK_FRA\
	set repScan=D:\CFT\Tempus\Upload\BPM_Prod\SCAN_FRA\
	set repArch=D:\CFT\Tempus\Upload\BPM_Prod\ARCHIVE\
	set repRejet=D:\CFT\Tempus\Upload\BPM_Prod\REJET\
	
Rem echo %horodatage%
Rem echo %zipfile%
Rem echo %hour%
Rem echo %min%
Rem echo total %hour%%min%
Rem echo %dt%

Rem ------------------------

REM ---- Fonction pour compléter le numéro de lot avec des 0 devant pour respecter la taille de String 8 ----
set #=%LotNum%
:loop
if defined # (
    set #=%#:~1%
    set /A Length += 1
    goto loop
)


if %Length% LSS 8 goto less_8
 
:less_8
set /a t=(8-%Length%)
 echo T =%t%
set LotNumZeros=0
for /l %%i in (2,1,%t%) do call set "LotNumZeros=%%LotNumZeros%%%LotNumZeros%"
set FinalLotNum=%LotNumZeros%%LotNum%

REM -----------fin bloc de fonction -------

REM ---- Définiton du nom du zip en sortie -----------

	set EXT=7z
	set zipfile=BNPPLS_FRA_2_%horodatage%_%FinalLotNum%.%EXT%
	set zipfile=!zipfile: =!

REM ------- fin définition du nom de zip -----


Rem ----Debut programme -------

if not exist %logdir% (mkdir %logdir%)

if not exist %repScan%*.eml GOTO :LOGS

del /Q %repWork%\* >> %logfile%

cd %repScan% >> %logfile%

Move *.eml*  %repWork% >> %logfile%
Move *.* %repRejet% >> %logfile%

cd %RepWork% >> %logfile%

REM ---

FOR %%I IN (*.*) DO call :INCREM "%%I" >> %logfile%

Rem "C:\Program Files\WinZip\Winzip8.1_FR\WINZIP32.exe" -a %repWork%%zipfile% %repWork%\*.* >> %logfile%

"C:\Program Files\7-Zip\7z.exe" a %repWork%%zipfile% %repWork%\* >> %logfile%

....

**barnabe0057** · 21/07/2018, 05h32

Bonjour,

Ca devrait donner quelque chose dans ce genre là :

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
cd %RepWork% >> %logfile%

REM ---

setlocal enabledelayedexpansion

set count=0
set num=0

FOR %%I IN (*.*) DO (

	set /a count+=1
	ren "%%~I" "###%%~I"

	if !count! EQU 30 (
		set count=0
		set /a num+=1
		"C:\Program Files\7-Zip\7z.exe" a %repWork%%zipfile%_!num! %repWork%\###* >> %logfile%
		del /f /q "###*"
	)
)

....

**jam92400** · 23/07/2018, 15h37

Hello Barnabe !

Merci déjà pour ta réponse rapide.

J'ai tenté d'intégrer ton bout de code dans mon script directement mais je n'ai pas obtenu le resultat attendu.
Du coup je l ai isolé dans un .bat pour le tester en local chez moi: j'ai déposé plusieurs fichiers dans un dossier et j'ai executer le contenu du bat ci-dessous

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
setlocal enabledelayedexpansion

set count=0
set num=0

cd C:\C\GED\SCRIPT_GED\SCAN_GBR


FOR %%I IN (*.*) DO (

	set /a count+=1
	ren "%%~I" "###%%~I"

	if !count! EQU 30 (
		set count=0
		set /a num+=1
		"C:\Program Files\7-Zip\7-Zip 4.23\7z.exe" a C:\C\GED\SCRIPT_GED\SCAN_GBR\30.7z C:\C\GED\SCRIPT_GED\SCAN_GBR\###*
		rem del /f /q "###*"
	)
)

La seul qui est faite c est le renomage des fichiers avec les 3 "###" devant:

Nom : resultat_script.JPG
Affichages : 1525
Taille : 36,7 Ko

**barnabe0057** · 23/07/2018, 21h25

Vraiment désolé, j'ai pondu ce code en 5 min sans même le tester.

Maintenant que tu m'as répondu, ce qui n'est pas le cas de tout le monde, je me dois de fournir quelque chose de correct :

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
@echo off
setlocal enableextensions enabledelayedexpansion

set RepWork=%USERPROFILE%\Mes images\Nature\Fleurs
set zipfile=archive

cd /d %RepWork%

set count=0
set num=0

if not exist "###" (mkdir "###")

FOR %%I IN (*.eml) DO (

	set /a count+=1
	>nul move "%%~I" "###"
	if !count! EQU 30 (call:archive)

)
call:archive
rmdir /s /q "###"

pause
exit /b 0

:archive
pushd "###"

set count=0
set /a num+=1
set index=00!num!
set index=!index:~-3!

"C:\Program Files\7-Zip\7z.exe" a "%zipfile%_!index!" "*.eml"

>nul move "%zipfile%_!index!.7z" ".."
del /f /q "*.*"

popd
goto :eof

Je te laisse le soin d'intégrer cela dans ton code, tiens-moi au courant.

ps : tu peux virer les 2 premiers SET, ils m'ont servi pour mes tests

**jam92400** · 24/07/2018, 14h43

Hello Barnabe, encore merci enormement pour ton aide.

Alors j'ai intégré ton nouveau code dans mon script mais ca continue a prendre tous les fichiers du dossier sans limiter à 30

voilà ton code intégré dans mon script ( pour info j'ai commenté tes partie ou tu faisais des suppressions pour eviter tout probleme comme je ne maitrise pas ton code)

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
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
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
@echo off

powershell -Command "get-childItem D:\CFT\Tempus\Upload\BPM_UAT\SCAN_FRA\*.eml | rename-item -newname { $_.name -replace '!','' }"

setlocal EnableDelayedExpansion

Rem ---- définition des variables---

	set currentpath=%~dp0
	set logdir=%currentpath%log\%date:~6,4%%date:~3,2%%date:~0,2%
	REM set logfile=%logdir%\scan_fra_%date:~6,4%%date:~3,2%%date:~0,2%_%time:~0,2%h%time:~3,2%%time:~6,2%.log
	set /p LotNum=<%currentpath%\conf\lot.conf
	set LotNum=!LotNum: =!
	set logfile=%logdir%\ScanFra_%date:~6,4%%date:~3,2%%date:~0,2%_LOT_%LotNum%.log
	set /a LotNumNext=%LotNum%+1
	set NN=0
	set Length=0

echo lot num = %LotNum%
echo lot suivant = %LotNumNext%
echo %logfile%

set hour=%time:~0,2%
set min=%time:~3,2%
set horodatage=%date:~6,4%%date:~3,2%%date:~0,2%T%hour%%min%
set horodatage=!horodatage: =!

	set repWork=D:\CFT\Tempus\Upload\BPM_UAT\WORK_FRA\
	set repScan=D:\CFT\Tempus\Upload\BPM_UAT\SCAN_FRA\
	set repArch=D:\CFT\Tempus\Upload\BPM_UAT\ARCHIVE\
	set repRejet=D:\CFT\Tempus\Upload\BPM_UAT\REJET\
	
Rem echo %horodatage%
Rem echo %zipfile%
Rem echo %hour%
Rem echo %min%
Rem echo total %hour%%min%
Rem echo %dt%

Rem ------------------------

REM ---- Fonction pour compléter le numéro de lot avec des 0 devant pour respecter la taille de String 8 ----
set #=%LotNum%
:loop
if defined # (
    set #=%#:~1%
    set /A Length += 1
    goto loop
)


if %Length% LSS 8 goto less_8
 
:less_8
set /a t=(8-%Length%)
 echo T =%t%
set LotNumZeros=0
for /l %%i in (2,1,%t%) do call set "LotNumZeros=%%LotNumZeros%%%LotNumZeros%"
set FinalLotNum=%LotNumZeros%%LotNum%

REM -----------fin bloc de fonction -------

REM ---- Définiton du nom du zip en sortie -----------

	set EXT=7z
	set zipfile=BNPPLS_FRA_2_%horodatage%_%FinalLotNum%.%EXT%
	set zipfile=!zipfile: =!

REM ------- fin définition du nom de zip -----


Rem ----Debut programme -------

if not exist %logdir% (mkdir %logdir%)

if not exist %repScan%*.eml GOTO :LOGS

del /Q %repWork%\* >> %logfile%

cd %repScan% >> %logfile%


Move *.eml*  %repWork% >> %logfile%
Move *.* %repRejet% >> %logfile%
cd %RepWork% >> %logfile%

REM ---

FOR %%I IN (*.*) DO call :INCREM "%%I" >> %logfile%

Rem "C:\Program Files\WinZip\Winzip8.1_FR\WINZIP32.exe" -a %repWork%%zipfile% %repWork%\*.* >> %logfile%

Rem ----------------------limite 30 fichiers ---------------------------------------------


REM cd /d %RepWork%

set count=0
set num=0

REM if not exist "###" (mkdir "###")

FOR %%I IN (*.eml) DO (

	set /a count+=1
	>nul move "%%~I" "###"
	if !count! EQU 30 (call:archive)

)
call:archive
REM rmdir /s /q "###"

pause
exit /b 0

:archive
pushd "###"

set count=0
set /a num+=1
set index=00!num!
set index=!index:~-3!

"C:\Program Files\7-Zip\7z.exe" a "%zipfile%_!index!" "*.eml"

>nul move "%zipfile%_!index!.7z" ".."

REM del /f /q "*.*"

popd
goto :eof

Rem -----------------------------------------------------------------------------------------

REM ------ Suppression fichiers après compression -----

for /f "delims=" %%f in ('dir /b') do  if not %%~xf == .%EXT% del %%f >> %logfile%

Rem --- incrémentation du numéro de lot -----

echo %LotNumNext% >%currentpath%\conf\lot.conf

Rem -------copie dans un dossier archive ----------------

copy %repWork%%zipfile% %repArch% >> %logfile%


Rem ------------------------------------------------------

Rem ----- Envoi CFT -----------
set part=AUTOMATU
set idf=WWDDIDEM
set env=U

Rem D:\APPS\CFTG\scripts\cftxsend.bat -D "%part%" -I "%idf%" -F "%chemin%+%fichier%" -P "%env%_%fichier%" –O “RUSER=CANON01M,SUSER=10000000,SAPPL=0x515E7A98”

REM D:\APPS\CFTG\scripts\cftxsend.bat -D "%part%" -I "%idf%" -F "%repWork%%zipfile%" -P "%env%_%zipfile%"

REM D:\APPS\CFTG\scripts\cftxsend.bat -D "AUTOMATQ" -I "WWDDIDEM" -F "%repWork%%zipfile%" -P "Q_%zipfile%"

REM D:\APPS\CFTG\scripts\cftxsend.bat -D "AUTOMATU" -I "WWDDIDEM" -F "%repWork%%zipfile%" -P "U_%zipfile%"

Rem ----- fin envoi CFT -------


Rem --- fonction de renommage des fichiers -------



:INCREM
rename %1 "BNPPLS_FRA_2_%horodatage%_%FinalLotNum%_0000%NN%.eml"
set /A NN=NN+1
rem GOTO: EOF
Rem ----- fin Fonction Renommage ----


:LOGS
echo Pas de fichier à traiter: dossier Scan vide ! > %logfile%

rem :EOF
rem exit

RESULTAT:

LOG:

Nom : logs.jpg
Affichages : 1183
Taille : 85,2 Ko

**barnabe0057** · 24/07/2018, 21h10

On va finir par y arriver, j'ai intégré mon code dans le tien, essaie-moi ça :

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
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
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
@echo off
setlocal enableextensions enabledelayedexpansion
chcp 1252 >nul


::powershell -Command "get-childItem D:\CFT\Tempus\Upload\BPM_Prod\SCAN_FRA\*.eml | rename-item -newname { $_.name -replace '!','' }"

Rem ---- définition des variables---

	set currentpath=%~dp0
	set logdir=%currentpath%log\%date:~6,4%%date:~3,2%%date:~0,2%
::	set /p LotNum=<%currentpath%\conf\lot.conf
::	set LotNum=!LotNum: =!
set LotNum=515
	set logfile=%logdir%\ScanFra_%date:~6,4%%date:~3,2%%date:~0,2%_LOT_%LotNum%.log
	set /a LotNumNext=!LotNum!+1
	set NN=0
	set Length=0

echo lot num = %LotNum%
echo lot suivant = %LotNumNext%
echo %logfile%

set hour=%time:~0,2%
set min=%time:~3,2%
set horodatage=%date:~6,4%%date:~3,2%%date:~0,2%T%hour%%min%
set horodatage=!horodatage: =!

	set repWork=D:\CFT\Tempus\Upload\BPM_Prod\WORK_FRA\
	set repScan=D:\CFT\Tempus\Upload\BPM_Prod\SCAN_FRA\
	set repArch=D:\CFT\Tempus\Upload\BPM_Prod\ARCHIVE\
	set repRejet=D:\CFT\Tempus\Upload\BPM_Prod\REJET\
	

Rem ------------------------

REM ---- Fonction pour compléter le numéro de lot avec des 0 devant pour respecter la taille de String 8 ----

set FinalLotNum=00000000!LotNum!
set FinalLotNum=!FinalLotNum:~-8!

REM -----------fin bloc de fonction -------

REM ---- Définiton du nom du zip en sortie -----------

	set ext=eml
	set zipfile=BNPPLS_FRA_2_!horodatage!_!FinalLotNum!
	set zipfile=!zipfile: =!

REM ------- fin définition du nom de zip -----


Rem ----Debut programme -------

if not exist "%logdir%" (mkdir "%logdir%")
:: if not exist "%repScan%*.%ext%" (GOTO :LOGS)

del /q "%repWork%*.*" >> %logfile%

cd /d %repScan% >> %logfile%

move "*.%ext%" "%repWork%" >> %logfile%
move /y "*.*" "%repRejet%" >> %logfile%

cd %repWork% >> %logfile%

REM ---

set count=0
set num=0

if not exist "###" (mkdir "###")

FOR %%I IN (*.%ext%) DO (

	set /a count+=1
	>nul move "%%~I" "###"
	if !count! EQU 30 (call:archive)

)
call:archive
rmdir /s /q "###"

Rem -----------------------------------------------------------------------------------------

REM ------ Suppression fichiers après compression -----

for /f "delims=" %%f in ('dir /b') do  (if not %%~xf == .%ext% (del %%f >> %logfile%))

Rem --- incrémentation du numéro de lot -----

echo %LotNumNext% >%currentpath%\conf\lot.conf

Rem -------copie dans un dossier archive ----------------

copy %repWork%%zipfile% %repArch% >> %logfile%


Rem ------------------------------------------------------

Rem ----- Envoi CFT -----------
set part=AUTOMATU
set idf=WWDDIDEM
set env=U

Rem D:\APPS\CFTG\scripts\cftxsend.bat -D "%part%" -I "%idf%" -F "%chemin%+%fichier%" -P "%env%_%fichier%" –O “RUSER=CANON01M,SUSER=10000000,SAPPL=0x515E7A98”

REM D:\APPS\CFTG\scripts\cftxsend.bat -D "%part%" -I "%idf%" -F "%repWork%%zipfile%" -P "%env%_%zipfile%"

REM D:\APPS\CFTG\scripts\cftxsend.bat -D "AUTOMATQ" -I "WWDDIDEM" -F "%repWork%%zipfile%" -P "Q_%zipfile%"

REM D:\APPS\CFTG\scripts\cftxsend.bat -D "AUTOMATU" -I "WWDDIDEM" -F "%repWork%%zipfile%" -P "U_%zipfile%"

Rem ----- fin envoi CFT -------


Rem --- fonction de renommage des fichiers -------



:INCREM
rename %1 "BNPPLS_FRA_2_%horodatage%_!FinalLotNum!_0000!NN!.eml"
set /A NN=NN+1
rem GOTO: EOF
Rem ----- fin Fonction Renommage ----


:LOGS
echo Pas de fichier à traiter: dossier Scan vide ! > %logfile%

rem :EOF
rem exit

pause
exit /b 0

:archive
pushd "###"

set count=0
set /a num+=1
set index=0000!num!
set index=!index:~-5!

"C:\Program Files\7-Zip\7z.exe" a "!zipfile!_!index!.7z" "*.%ext%"

>nul move "!zipfile!_!index!.7z" "%repArch%"
del /f /q "*.*"

popd
goto :eof

J'ai été obligé de commenter quelques lignes qui me gênaient pour mes tests, j'ai rajouté quelques guillemets par-ci par-là, j'ai simplifié une de tes fonctions.

ps : mes journées de travail sont très longues, par conséquent je ne suis disponible qu'en soirée

Comment compresser un certains nombre de fichier défnis pour controler le nombre

Scripts/Batch

Vue hybride

Discussions similaires

Partager

Partager