@echo off
title Utilitaire de gestion de fichiers automatise
REM <-- Ligne Auto-Test -->
REM Mkdir G:\SCAN
:loop
REM <-- Warning -->
@echo off
cls
echo TOUTES LES OPERATIONS SONT AUTOMATISES, ENTRAVER LE BON DEROULEMENT
echo DE CES OPERATIONS PEUT ENTRAINER DES DOMMAGES CRITIQUES.
echo Lancement de la console.....
REM <-- Si réponse non reconnu -->
:MauvaiseReponse(Image)
echo Souhaitez-vous verifier la qualite des images? (Oui/Non)
set/p Reponse="> "
REM <-- Oui => OpenFolder => Rar => Suite => End -->
REM <-- Non => Rar => Suite => End -->
if %Reponse%==Oui goto OpenFolder
if %Reponse%==O goto OpenFolder
if %Reponse%==oui goto OpenFolder
if %Reponse%==o goto OpenFolder
if %Reponse%==Non goto Rar
if %Reponse%==N goto Rar
if %Reponse%==non goto Rar
if %Reponse%==n goto Rar
REM <-- Mauvaise Reponse(Image) (Choix non reconnu) -->
echo Oups! Je n'ai pas compris votre reponse, veuillez ressayer.
Goto MauvaiseReponse(Image)
REM <-- Rar -->
:Rar
cls
:RarEchec
echo Veuillez saisir le nom du fichier rar a creer dans "Caisse_2"
set/p NomDuRar="> "
G:\rar a G:\Caisse_2\%NomDuRar%.rar SCAN
PAUSE
REM <-- Verification de l'existance de l'archive créé -->
echo DIAGNOSTIC: VERIFICATION DU BON DEROULEMENT DES ETAPES....
If exist G:\Caisse_2\%NomDuRar%.rar goto RarCree
echo ERREUR LORS DE LA CREATION DU FICHIER RAR !
echo Renvoi vers l'etape de creation du fichier rar.....
goto RarEchec
:RarCree
If exist G:\Caisse_2\%NomDuRar%.rar echo Verification de la presence du fichier Rar......OK
PAUSE
if exist G:\Caisse_2\%NomDuRar%.rar goto Rmdir
:Rmdir
rmdir /s /q G:\SCAN
PAUSE
Goto Suite
REM <-- Non lu par Suite. -->
:OpenFolder
cls
start G:\SCAN
goto Rar
REM <-- Suite -->
:Suite
cls
echo Souhaitez-vous quitter l'utilitaire? (Oui/Non)
set/p Reponse="> "
if %Reponse%==Oui goto End
if %Reponse%==O goto End
if %Reponse%==oui goto End
if %Reponse%==o goto End
if %Reponse%==Non goto loop
if %Reponse%==N goto loop
if %Reponse%==non goto loop
if %Reponse%==n goto loop
REM <-- Si réponse non reconnu -->
echo Oups! Je n'ai pas compris votre reponse, veuillez ressayer.
Goto Suite
:End
PAUSE
exit