for

for /f "tokens=1,2* delims=: "...

@echo off
rem ****************************************************************
rem *   Le batch crée des variables d'environnement                *
rem *   correspondant à la version, langue et au nom de version    *
rem *   de Microsoft office                                        *
rem *                                                              *
rem *                                                              *
rem *   O_DisplayName                                              *
rem *   O_Version                                                  *
rem *   O_Langue                                                   *
rem *   O_VersionMajor                                             *
rem *   O_VersionMinor                                             *
rem *   O_DisplayVersion                                           *
rem *                                                              *
rem *   (O_ pour Office)                                           *
rem *                                                              *
rem ****************************************************************
 
if "%1"=="/?" type GetOfficeInfos.txt|more && goto fin
 
 
rem *******************************************************
rem *     extraction de la clé correspondant à office     *
rem *******************************************************
 
REG FIND HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall REG_SZ "Microsoft Office" > res.poutou
 
set MaCle=
set base=HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall
set i=0
 
rem on n'a besoin que de la deuxième ligne de res.poutou
for /f "delims= " %%c in (res.poutou) do if !i!==0 (set i=1) else (if %%c=="" (goto PasTrouve) else (set MaCle=%base%\%%c && goto milieu))
 
 
:PasTrouve
set O_DisplayName=
goto fin
 
 
rem *********************************************************
rem *     MaCle contient clé                                *
rem *     exportation de la clé de la base de registre      *
rem *********************************************************
 
:milieu
regedit /e configeuh.poutou %MaCle%
 
rem *->   cette ligne est nécessaire car le format de l'exportation n'est pas exploitable par un for sinon   *
type configeuh.poutou > config.poutou
 
 
rem *********************************************************
rem *     Affectation des variables d'environnement         *
rem *********************************************************
 
for /f "tokens=1,2* delims=:=" %%c in (config.poutou) do if %%c=="Language" (set O_Langue=%%e) else (if %%c=="Version" (set O_Version=%%e) else (if %%c=="DisplayName" (set O_DisplayName=%%d) else (if %%c=="VersionMajor" (set O_VersionMajor=%%e) else (if %%c=="VersionMinor" (set O_VersionMinor=%%e) else (if %%c=="DisplayVersion" (set O_DisplayVersion=%%d))))))
 
 
rem *->   On enlève les "" de O_DisplayName et de O_DisplayVersion *
set O_DisplayName=%O_DisplayName:"=%
set O_DisplayVersion=%O_DisplayVersion:"=%
 
rem *->   On donne une valeur en francais pour O_Langue
For %%i in (0000040c 0000080C 00000C0C 0000100C 0000140C) do if "%O_Langue%"=="%%i" goto Franchish
for %%i in (00000009 00000409 00000809 00000C09 00001009 00001409 00001809 00001C09 00002009 00002809 00002C09) do if "%O_Langue%"=="%%i" goto Anglish
goto end
 
 
:Franchish
set O_Langue=Francais
goto end
 
:Anglish
set O_Langue=English
goto end
 
 
:end
rem *->   on libère les variables et on efface les fichiers temporaires
del res.poutou
del configeuh.poutou
del config.poutou
 
set base=
set MaCle=
set i=
 
 
rem *-> infos langues
 
rem 0009 English                    E => 9
rem 0409 English (United States)    E => 1033
rem 040C French (France)            F => 1036
rem 0809 English (United Kingdom)   E => 2057
rem 080C French (Belgium)           F => 2060
rem 0C09 English (Australia)        E => 3081
rem 0C0C French (Canada)            F => 3084
rem 1009 English (Canada)           E => 4105
rem 100C French (Switzerland)       F => 4108
rem 1409 English (New Zealand)      E => 5129
rem 140C French (Luxembourg)        F => 5132
rem 1809 English (Ireland)          E => 6153
rem 1C09 English (South Africa)     E => 7177
rem 2009 English (Jamaica)          E => 8201
rem 2809 English (Belize)           E => 10249
rem 2C09 English (Trinidad)         E => 11273
 
:fin
@echo on

cmd /V:ON /C "batch.bat"