Nettoyage fichiers RAW et JPG

[LeBillyBob]

Tant pis, je ferai sans ...
M'aidera quand même pas mal ce petit script à trier les RAW inutiles ! Merci !

Marche mieux comme ça
On évite un test == 0 qui marche pas bien et a pu problème

Code : Tout sélectionner

@ECHO OFF
SETLOCAL
SET _bytes=0
SET _count=0
MKDIR C:\Temp
FOR /R %%G IN (*.ARW) DO CALL :process "%%~dpG" "%%~nxG"
ECHO %_count% matching files, %_bytes% KB
PAUSE
EXIT /B

:process
SET _directory=%1
SET _directory=%_directory:~1,-1%
SET _file=%2
SET _file=%_file:~1,-5%

SET _fileraw=%_directory%%_file%.ARW
SET _directory=%_directory:~0,-4%
SET _filejpg=%_directory%%_file%.JPG

IF EXIST "%_filejpg%" EXIT /B
SET /A _bytes+=%~z1/1000
SET /A _count+=1
ECHO %_fileraw%
MOVE "%_fileraw%" C:\Temp
EXIT /B


[MacManus]

En s'y mettant à plusieurs, on va y arriver
Merci LeBillyBob, je vais garder ta version du script

[Breizhoo]

Le compteur de RAW fonctionne mais pas la taille... Mais je m'en fous un peu de la taille perso... C'est plus le nombre de RAW qui m'intéressait...

[LeBillyBob]

Le compteur de RAW fonctionne mais pas la taille... Mais je m'en fous un peu de la taille perso... C'est plus le nombre de RAW qui m'intéressait...

Vi effectivement j'étais dessus
Pourtant la syntaxe de Breizhoo a l'air correcte

[LeBillyBob]

En s'y mettant à plusieurs, on va y arriver
Merci LeBillyBob, je vais garder ta version du script

Héhé, merci a toi
Ta version de script récursif est bien sympa il faut dire

[Breizhoo]

Et sinon, vu que j'ai 2 ingénieurs informatiens à mon service ,y'aurait moyen pour finir d'avoir un truc du genre "êtes-vous sur de vouloir supprimer les RAW solitaires" en début de procédure. Avec un Y/N pour confirmer ou pas le démarrage de la suppression...

[MacManus]

Code : Tout sélectionner

@ECHO OFF
SETLOCAL
SET _bytes=0
SET _count=0
MKDIR C:\Temp
FOR /R %%G IN (*.ARW) DO CALL :process "%%~dpG" "%%~nxG" "%%G"
ECHO %_count% matching files, %_bytes% KB
PAUSE
EXIT /B

:process
SET _directory=%1
SET _directory=%_directory:~1,-1%
SET _file=%2
SET _file=%_file:~1,-5%

SET _fileraw=%_directory%%_file%.ARW
SET _directory=%_directory:~0,-4%
SET _filejpg=%_directory%%_file%.JPG

IF EXIST "%_filejpg%" EXIT /B
SET /A _bytes+=%~z3/1000
SET /A _count+=1
ECHO %_fileraw%
MOVE "%_fileraw%" C:\Temp
EXIT /B

Le problème c'est que le z1 se référait au premier argument qui n'est que le répertoire du RAW, j'ai juste rajouté un 3ème argument contenant le chemin complet et remplacé le z1 en z3...

[LeBillyBob]

Finalement j'ai corrigé 2 bugs :
- On test sur le répertoire "c:\temp" existe avant de le créer
- On affiche le message comme voulais le faire MacManus au départ

Code : Tout sélectionner

@ECHO OFF
SETLOCAL
SET _bytes=0
SET _count=0
SET _zero=0
IF NOT EXIST C:\Temp MKDIR C:\Temp
FOR /R %%G IN (*.ARW) DO CALL :process "%%~dpG" "%%~nxG" "%%G"
IF %_bytes%==%_zero% (ECHO No files processed) ELSE (ECHO %_count% matching files, %_bytes%KB)
PAUSE
EXIT /B

:process
SET _directory=%1
SET _directory=%_directory:~1,-1%
SET _file=%2
SET _file=%_file:~1,-5%

SET _fileraw=%_directory%%_file%.ARW
SET _directory=%_directory:~0,-4%
SET _filejpg=%_directory%%_file%.JPG

IF EXIST "%_filejpg%" EXIT /B
SET /A _bytes+=%~z3/1000
SET /A _count+=1
ECHO %_fileraw%
MOVE "%_fileraw%" C:\Temp
EXIT /B


[LeBillyBob]

Et sinon, vu que j'ai 2 ingénieurs informatiens à mon service ,y'aurait moyen pour finir d'avoir un truc du genre "êtes-vous sur de vouloir
supprimer les RAW solitaires" en début de procédure. Avec un Y/N pour confirmer ou pas le démarrage de la suppression...

Version avec question au démarrage

Code : Tout sélectionner

@ECHO OFF
SETLOCAL
SET _bytes=0
SET _count=0
SET _zero=0
SET /P _go=êtes-vous sur de vouloir supprimer les RAW solitaires : Y / N
IF %_go%==N EXIT
IF NOT EXIST C:\Temp MKDIR C:\Temp
FOR /R %%G IN (*.ARW) DO CALL :process "%%~dpG" "%%~nxG" "%%G"
IF %_bytes%==%_zero% (ECHO No files processed) ELSE (ECHO %_count% matching files, %_bytes%KB)
PAUSE
EXIT /B

:process
SET _directory=%1
SET _directory=%_directory:~1,-1%
SET _file=%2
SET _file=%_file:~1,-5%

SET _fileraw=%_directory%%_file%.ARW
SET _directory=%_directory:~0,-4%
SET _filejpg=%_directory%%_file%.JPG

IF EXIST "%_filejpg%" EXIT /B
SET /A _bytes+=%~z3/1000
SET /A _count+=1
ECHO %_fileraw%
MOVE "%_fileraw%" C:\Temp
EXIT /B


[Breizhoo]

Merci ! Je teste tout ça ce soir au calme à la maison !!!

[MacManus]

Merci ! Je teste tout ça ce soir au calme à la maison !!!

Pareil

[nico]

Juste pour info : sous windows il existe un autre interpreteur de script que batch (tres limite)

"wscript" qui est fourni en standard par microsoft et permet de développer des script dans un langage proche du Basic.

Ca permet d'écrire des scripts évolués et plus fiables.

http://msdn.microsoft.com/en-us/library ... 85%29.aspx

[LeBillyBob]

Juste pour info : sous windows il existe un autre interpreteur de script que batch (tres limite)

"wscript" qui est fourni en standard par microsoft et permet de développer des script dans un langage proche du Basic.

Ca permet d'écrire des scripts évolués et plus fiables.

http://msdn.microsoft.com/en-us/library ... 85%29.aspx

Merci pour l'info Je regarderais ça demain
Effectivement un langage un peu plus évolué ne ferais pas de mal

[jr56]

Le plus extraordinaire je trouve, c'est qu'il y ait encore des connaisseurs pour programmer en .bat

J'ai beaucoup pratiqué, mais ce devait être entre 1985 et 1995... Windows a ensuite masqué et fait oublier cette couche logicielle, bien pratique pourtant (la preuve!)

[Breizhoo]

Bon bah la dernière mouture fonctionne parfaitement chez moi.
La question du début qui permet de valider la suppression des RAW, en cas de clic malencontreux sur le fichier .bat
La petite pause à la fin qui permet de savoir combien de RAW et quelle taille totale on a supprimés.



Merci les ingénieurs informaticiens !!!

[LeBillyBob]

Bon bah la dernière mouture fonctionne parfaitement chez moi.
La question du début qui permet de valider la suppression des RAW, en cas de clic malencontreux sur le fichier .bat
La petite pause à la fin qui permet de savoir combien de RAW et quelle taille totale on a supprimés.



Merci les ingénieurs informaticiens !!!

Cool
Pour la question on pourrait probablement faire mieux avec un choice
et pour l'ensemble on pourrait probablement faire beaucoup mieux avec le Windows Script Host suggéré par nico