Récupérer un nom 8.3 [BATCH]

@echo off  
set cible="C:\Program files\un nom bien (foireux)\dossier1"  
for  /f "delims=" %%a in ('echo %cible%') do (  
        echo %%~fsa  
)  

C:\PROGRA~1\un nom bien (foireux)\dossier1"

@echo off

:: On renseigne le chemin

SET cible=\\192.168.1.x\un nom (foireux)\Program files\dossier d'install\un autre dossier\repertoire a la noix

:: On extrait chaque "branche" de l'arborescence / Il doit y avoir autant de tokens que de "branches"

FOR /F "tokens=1-6 delims=\" %%a in ("%cible%") do (

IF NOT "%%a"=="" echo %%a>  Extract.txt
IF NOT "%%b"=="" echo %%b>> Extract.txt
IF NOT "%%c"=="" echo %%c>> Extract.txt
IF NOT "%%d"=="" echo %%d>> Extract.txt
IF NOT "%%e"=="" echo %%e>> Extract.txt
IF NOT "%%f"=="" echo %%f>> Extract.txt

)


setlocal ENABLEdelayedEXPANSION

SET compteur=0

echo.

:: On parcourt le fichier contenant le résultat ligne par ligne

FOR /F "tokens=*" %%A in (extract.txt) do  (

SET /a compteur+=1

echo            La branche !compteur! est : %%A

echo Le nom court est ??? / Test : %%~nsA

echo.

)

pause

C:> dir /b/s z 
C:\Documents and Settings\xxx\Mes documents\src\z\un nom bien (foireux) 
C:\Documents and Settings\xxx\Mes documents\src\z\un nom bien (foireux)\dossier1 
C:> bb 
C:\DOCUME~1\xxx~1\MESDOC~1\src\z\UNNOMB~1\dossier1 
C:\DOCUME~1\xxx~1\MESDOC~1\src\z\UNNOMB~1\dossier1 
C:> type bb.bat 
@echo off 

set cible="C:\Documents and Settings\xxx\Mes documents\src\z\un nom bien (foireux)\dossier1" 

for  /f "delims=" %%a in ('echo %cible%') do ( 
        echo %%~sa 
        echo %%~fsa 
) 
C:>