Remplacement Z: par J: dans des fichiers txt

C:> echo net use Z: \\192.168.1.2\^%USERNAME^%>>montages.txt
C:> type montages.txt
net use Z: \\192.168.1.2\%USERNAME%
C:>

Les nouvelles connexions seront m'moris'es.


etat         Local     Distant                   R'seau

-------------------------------------------------------------------------------
ok           W:        \\192.168.1.3\Drivers       Microsoft Windows Network
Non disponib Y:        \\192.168.1.1\partage1     Microsoft Windows Network
Non disponib Z:        \\192.168.1.1\partage2   Microsoft Windows Network
La commande s'est termin'e correctement.

setlocal enableDelayedExpansion
set dest=d:\montages_lecteurs
set source=d:\liste

FOR %%D in (d:\liste\) do (
FOR /f "usebackq" %%i in ('dir /b %source%') do (
echo.>%dest%\resultat.txt
echo.>%dest%\netusetemp.txt
set FicExt=%%~nxi
echo.>%dest%\!FicExt!
:: Ne garde que les lignes avec une lettre de lecteur
findstr /C:":   " d:\netuse\!FicExt!>>%dest%\resultat.txt
:: Supprime tous ce qui est avant la lettre de lecteur
FOR /f "tokens=*" %%m in (%dest%\resultat.txt) do (
set ligne=%%m
set filtre=!ligne:~13!
echo !filtre!>>%dest%\netusetemp.txt
)
FOR /f "tokens=1,2 delims= " %%a in (%dest%\netusetemp.txt) do (
set lecteur=%%a
if "%%a" == "Z:" (set lecteur=J:)
echo net use !lecteur! %%b /PERSISTENT:YES>>%dest%\!FicExt!
)
echo.net use Z: \\192.168.1.2\users\%USERNAME% /PERSISTENT:YES>>%dest%\!FicExt!
)
)
del %dest%\netusetemp.txt
del %dest%\resultat.txt
endlocal

echo net use Z: \\sbroclu1fs\users\^%%USERNAME^%% /PERSISTENT:YES>>%dest%\!FicExt!