Index du Forum
Se connecter pour vérifier ses messages privés
Classement fichiers suivant répertoire


 
Poster un nouveau sujet   Répondre au sujet     Index du Forum » Langages Informatique » Batch Sujet précédent :: Sujet suivant  
Classement fichiers suivant répertoire
 MessagePosté le: Dim 25 Aoû - 14:26 (2013) Répondre en citant  
Message
  Vulcain
Adm-Fondateur
Adm-Fondateur


Hors ligne

Inscrit le: 26 Sep 2007
Messages: 4 468
Niveau Général Informatique:
Estimation Protection:
Navigateur: FireFox
Masculin Bélier (21mar-19avr) 虎 Tigre
Point(s): 4 731
Moyenne de points: 1,06
Pare-feu: Comodo
Autre: Malwarebytes Pro

PublicitéSupprimer les publicités ?
Bonjour,

Exemple ou l'on crée un répertoire suivant critère et déplace le fichier dans le bon répertoire


Code:


rem *********************************************************
rem    Lire repertoire, recupere fichier et si chaine dans
rem  fichier = Good, copie fichier dans repertoire Bon
rem  repertoire en dynamique %CD%
rem *********************************************************             8

rem Déclaration variables
@echo off
cls
setlocal ENABLEDELAYEDEXPANSION
set count=0
set NonTransfert=0
set impostransfert=0
set $recherche="good"
set $recherche2="Douteux"
set $recherche3="mauvais"
set $recherche4="(???)"
 
rem répertoire ou son les fichiers à trier
set $RepLire=C:\Users\Thierry\
rem Répertoire ou son les fichiers correcte
set $CreatRepBon=C:\Users\Thierry\bon
rem répertoire ou son les fichiers douteux
set $CreatRepDouteux=C:\Users\Thierry\Douteux
rem répertoire ou son les fichiers mauvais
set $CreatRepMauvais=C:\Users\Thierry\Mauvais
rem répertoire ou son les fichiers inconnu
set $CreatRepInconnu=C:\Users\Thierry\Inconnu

pushd "%$Replire%"&md "%$CreatRepBon%"&md "%$CreatRepMauvais%"&md "%$CreatRepDouteux%"&md "%$CreatRepInconnu%"
rem Boucle lecture répertoire et appel recherche pour déplacement
echo ******************** Transfert en cours ***********************************

for %%a in (*.*) do (
call :cherche %%a
)

popd
cls
echo ******************** Transfert effectu‚ ***********************************
echo ******** Vous avez tranf‚r‚ %count% fichier(s)
echo ******** Vous avez %impostransfert% fichier(s) impossible … transf‚r‚(s)
echo ***************************************************************************
endlocal
pause
goto :menu


:cherche
rem Lecture et recherche de la chaine de good
find /C /I %$recherche% %1
if !errorlevel!==1 (
    set /A NonTransfert+=1
)
rem teste si fichier existe, déplace fichier dans repertoire bon
if !errorlevel!==0 (
set /A count+=1
if not exist "%$CreatRepBon%\%1" (move "%$Replire%\%1" "%$CreatRepBon%\%1")
)

rem ===========================================================================

rem Lecture et recherche de la chaine de Douteux
find /C /I %$recherche2% %1
if !errorlevel!==1 (
    set /A NonTransfert+=1
)

rem teste si fichier existe, déplace fichier dans repertoire Douteux
if !errorlevel!==0 (
set /A count+=1
if not exist "%$CreatRepDouteux%\%1" (move "%$Replire%\%1" "%$CreatRepDouteux%\%1")
)

rem ===========================================================================

rem Lecture et recherche de la chaine de mauvais
find /C /I %$recherche3% %1
if !errorlevel!==1 (
    set /A NonTransfert+=1
)
echo %$CreatRepMauvais%\%1  %$Replire%\%1  %$CreatRepMauvais%\%1
pause
rem teste si fichier existe, déplace fichier dans repertoire Mauvais
if !errorlevel!==0 (
set /A count+=1
if not exist "%$CreatRepMauvais%\%1" (move "%$Replire%\%1" "%$CreatRepMauvais%\%1")
)


rem ===========================================================================

rem Lecture et recherche de la chaine de infection inconnu
find /C /I %$recherche4% %1
if !errorlevel!==1 (
    set /A NonTransfert+=1
)
rem teste si fichier existe, déplace fichier dans repertoire Inconnu
if !errorlevel!==0 (
set /A count+=1
if not exist "%$CreatRepInconnu%\%1" (move "%$Replire%\%1" "%$CreatRepInconnu%\%1")
)


:end



En informatique, bien souvent le programme dépasse son concepteur, c'est que le logiciel fait quelque chose qui ne lui est pas demandé. Protégez vous : Avast





Classement fichiers suivant répertoire
 MessagePosté le: Aujourd’hui à 19:51 (2017)  
Message
  Contenu Sponsorisé







Poster un nouveau sujet   Répondre au sujet     Index du Forum » Batch

Page 1 sur 1
Toutes les heures sont au format GMT - 1 Heure

Montrer les messages depuis:

  

Sauter vers:  

Portail | Index | Creer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Powered by phpBB © 2001, 2017 phpBB Group Traduction par : phpBB-fr.com