Md nonDuRépertoire

for /r "%~dp0\" %%i in (*.txt) do echo %%i

for /r "C:\Répertoire\racine" %%i in (fichier.exe) do echo %%i 

for %%i in (A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W ,X,Y,Y,Z) do ( 
 if exist "%%i:\" set VrLetter=%%i& call :search %%i 
) 
goto FinBoucle 
:search 
for /r "%VrLetter%:\" %%j in (fichier.txt) do if exist "%%j" echo %%j 
goto :eof
:FinBoucle

for /r "C:\monRep\" %%j in (*.jpg) do set VrImage=%%j& set /a Compt+=1& call :renamImage 
:renamImage 
ren "%VrImage%" "image_%Compt%.jpg"

for /r "C:\MonRep\" %%i in (*.*) do ren "%%i" "%date:~0,2%-%date:~3,2%-%date:~6,4%_%%~nxi"

Net Share NomDuPartage=C:\chemin\du\répertoire\à\partager

Rd C:\chemin\du\répertoire /s /q

Tree C:\chemin\du\répertoire\source

for /r "%~1\" %%i in (*.*) do set VrChmFch=%%i& set VrExtnsFch=%%~xi& call :triExts

goto finTriExts

:triExts

if not exist "TriExtension\%VrExtnsFch%" mkdir "TriExtension\%VrExtnsFch%"
move "%VrChmFch%" "TriExtension\%VrExtnsFch%"

goto :eof

:finTriExts

for /r "%~1\" %%i in (*.jpg) do set VrNamFch=%%i& set VrDatFch=%%~ti& call :movFch
goto fin

:movFch

set VrDatFch=%VrDatFch:~0,10%
set VrDatFch=%VrDatFch:/=-%

if not exist "MonRep\%VrDatFch%" mkdir "MonRep\%VrDatFch%"

move "%VrNamFch%" "MonRep\%VrDatFch%"

goto :eof

:fin

for /f "tokens=4* delims= " %%i in ('dir /o:d "C:\monRep\*.txt" ^| findstr /i /c:".txt"') do set VrFchRcnt=%%i %%j 
echo %VrFchRcnt%

tree "C:\monRep" /f /a > lpt1

tree "C:\monRep" /f /a > imprimArborc.txt
 print /d:nomImprimante imprimArborc.txt
del imprimArborc.txt

set VrSource=C:\MonRep
For %%a In ("%VrSource%\*.*") Do Set /A Compte+=1
If "%Compte%"=="" Set Compte=Pas de
echo  ==^> %Compte% nouveaux fichiers pour [ emule ]
For /f "delims=" %%a in ('dir "%VrSource%" /b') do (
   If %%a neq "" echo  | & for /R %VrSource% %%i in (*.*) do echo %%~nxi &
 )