Allogiciel.fr : vente en ligne de logiciels

définir thunderbird portable comme logiciel de messagerie par défaut

Here is a working solution to register ThunderbirdPortable as Default Windows Mail Client...

• 1. Create a subfolder in your ThunderbirdPortable folder (for example: "..ThunderbirdPortableWindows")

• 2. Change to the created subfolder for creating the following two batch-files...

• 3. Create a batch-file (for example: "RegisterThunderbirdPortable.bat") with the following content :

@echo off
Title Register Thunderbird Portable & Color 1E
cd %systemroot%system32
call :IsAdmin

echo REGISTER THUNDERBIRD PORTABLE
echo =============================
echo.

cd /d %~dp0
set "setup-path=%CD%"
cd..
set "app-path=%CD%"
cd %setup-path%

echo CURRENT FOLDER: %setup-path%
echo PROGRAM FOLDER: %app-path%

if not exist "%app-path%ThunderbirdPortable.exe" goto :FAIL

echo.
pause

Reg.exe add "HKLMSoftwareClassesCLSID{29F458BE-8866-11D5-A3DD-00B0D0F3BAA7}ProgID" /ve /t REG_SZ /d "MozillaMapi.1" /f
Reg.exe add "HKLMSoftwareClassesCLSID{29F458BE-8866-11D5-A3DD-00B0D0F3BAA7}VersionIndependentProgID" /ve /t REG_SZ /d "MozillaMAPI" /f
Reg.exe add "HKLMSoftwareClassesCLSID{1814CEEB-49E2-407F-AF99-FA755A7D2607}InProcServer32" /ve /t REG_SZ /d "%app-path%AppThunderbirdAccessibleMarshal.dll" /f
Reg.exe add "HKLMSoftwareClassesCLSID{1BAA303D-B4B9-45E5-9CCB-E3FCA3E274B6}InprocHandler32" /ve /t REG_EXPAND_SZ /d "D:Thunderbird-TestAccessibleHandler.dll" /f
Reg.exe add "HKLMSoftwareClassesCLSID{29F458BE-8866-11D5-A3DD-00B0D0F3BAA7}LocalServer32" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" /MAPIStartup" /f
Reg.exe add "HKLMSoftwareClassesCLSID{6EDCD38E-8861-11D5-A3DD-00B0D0F3BAA7}InProcServer32" /ve /t REG_SZ /d "%app-path%AppThunderbirdmozMapi32_InUse.dll" /f
Reg.exe add "HKLMSoftwareClassesCLSID{DCA8D857-1A63-4045-8F36-8809EB093D04}InProcServer32" /ve /t REG_SZ /d "%app-path%AppThunderbirdAccessibleHandler.dll" /f
Reg.exe add "HKLMSoftwareClassesThunderbird.Url.mailto" /v "EditFlags" /t REG_DWORD /d "2" /f
Reg.exe add "HKLMSoftwareClassesThunderbird.Url.mailto" /ve /t REG_SZ /d "Thunderbird URL" /f
Reg.exe add "HKLMSoftwareClassesThunderbird.Url.mailto" /v "FriendlyTypeName" /t REG_SZ /d "Thunderbird URL" /f
Reg.exe add "HKLMSoftwareClassesThunderbird.Url.mailtoDefaultIcon" /ve /t REG_SZ /d "%app-path%AppThunderbirdThunderbird.exe,0" /f
Reg.exe add "HKLMSoftwareClassesThunderbird.Url.mailtoshellopencommand" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" -osint -compose "%%1"" /f
Reg.exe add "HKLMSoftwareClassesThunderbird.Url.news" /v "EditFlags" /t REG_DWORD /d "2" /f
Reg.exe add "HKLMSoftwareClassesThunderbird.Url.news" /v "FriendlyTypeName" /t REG_SZ /d "Thunderbird (News) URL" /f
Reg.exe add "HKLMSoftwareClassesThunderbird.Url.news" /ve /t REG_SZ /d "Thunderbird (News) URL" /f
Reg.exe add "HKLMSoftwareClassesThunderbird.Url.newsDefaultIcon" /ve /t REG_SZ /d "%app-path%AppThunderbirdThunderbird.exe,0" /f
Reg.exe add "HKLMSoftwareClassesThunderbird.Url.newsshellopencommand" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" -osint -mail "%%1"" /f
Reg.exe add "HKLMSoftwareClassesThunderbirdEML" /v "FriendlyTypeName" /t REG_SZ /d "Thunderbird Document" /f
Reg.exe add "HKLMSoftwareClassesThunderbirdEML" /ve /t REG_SZ /d "Thunderbird Document" /f
Reg.exe add "HKLMSoftwareClassesThunderbirdEML" /v "EditFlags" /t REG_DWORD /d "2" /f
Reg.exe add "HKLMSoftwareClassesThunderbirdEMLDefaultIcon" /ve /t REG_SZ /d "%app-path%AppThunderbirdThunderbird.exe,0" /f
Reg.exe add "HKLMSoftwareClassesThunderbirdEMLshellopencommand" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" "%%1"" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla Thunderbird" /v "DLLPath" /t REG_SZ /d "%app-path%AppThunderbirdmozMapi32_InUse.dll" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla Thunderbird" /ve /t REG_SZ /d "Mozilla Thunderbird" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla Thunderbird" /v "SupportUTF8" /t REG_DWORD /d "0" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdCapabilities" /v "ApplicationName" /t REG_SZ /d "Thunderbird Portable" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdCapabilities" /v "ApplicationIcon" /t REG_SZ /d "%app-path%AppThunderbirdThunderbird.exe,0" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdCapabilities" /v "ApplicationDescription" /t REG_SZ /d "Thunderbird Portable ist eine komplett ausgestattete E-Mail-Anwendung." /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdCapabilitiesFileAssociations" /v ".wdseml" /t REG_SZ /d "ThunderbirdEML" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdCapabilitiesFileAssociations" /v ".eml" /t REG_SZ /d "ThunderbirdEML" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdCapabilitiesStartMenu" /v "Mail" /t REG_SZ /d "Mozilla Thunderbird" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdCapabilitiesURLAssociations" /v "mailto" /t REG_SZ /d "Thunderbird.Url.mailto" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdDefaultIcon" /ve /t REG_SZ /d "%app-path%AppThunderbirdThunderbird.exe,0" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdInstallInfo" /v "ReinstallCommand" /t REG_SZ /d ""%app-path%uninstallhelper.exe" /SetAsDefaultAppGlobal" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdInstallInfo" /v "HideIconsCommand" /t REG_SZ /d ""%app-path%uninstallhelper.exe" /HideShortcuts" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdInstallInfo" /v "IconsVisible" /t REG_DWORD /d "0" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdInstallInfo" /v "ShowIconsCommand" /t REG_SZ /d ""%app-path%uninstallhelper.exe" /ShowShortcuts" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdProtocolsmailto" /v "URL Protocol" /t REG_SZ /d "" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdProtocolsmailto" /ve /t REG_SZ /d "Thunderbird URL" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdProtocolsmailto" /v "EditFlags" /t REG_DWORD /d "2" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdProtocolsmailto" /v "FriendlyTypeName" /t REG_SZ /d "Thunderbird URL" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdProtocolsmailtoDefaultIcon" /ve /t REG_SZ /d "%app-path%AppThunderbirdThunderbird.exe,0" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla ThunderbirdProtocolsmailtoshellopencommand" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" -osint -compose "%%1"" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla Thunderbirdshellopencommand" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" -mail" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla Thunderbirdshellproperties" /ve /t REG_SZ /d "Thunderbird - &Optionen" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla Thunderbirdshellpropertiescommand" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" -options" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla Thunderbirdshellsafemode" /ve /t REG_SZ /d "Thunderbird - &Abgesicherter Modus" /f
Reg.exe add "HKLMSoftwareClientsMailMozilla Thunderbirdshellsafemodecommand" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" -safe-mode" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla Thunderbird" /ve /t REG_SZ /d "Mozilla Thunderbird" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla Thunderbird" /v "DLLPath" /t REG_SZ /d "%app-path%AppThunderbirdmozMapi32_InUse.dll" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdCapabilities" /v "ApplicationDescription" /t REG_SZ /d "Thunderbird Portable ist eine komplett ausgestattete E-Mail-Anwendung." /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdCapabilities" /v "ApplicationName" /t REG_SZ /d "Thunderbird Portable (News)" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdCapabilities" /v "ApplicationIcon" /t REG_SZ /d "%app-path%AppThunderbirdThunderbird.exe,0" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdCapabilitiesURLAssociations" /v "snews" /t REG_SZ /d "Thunderbird.Url.news" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdCapabilitiesURLAssociations" /v "news" /t REG_SZ /d "Thunderbird.Url.news" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdCapabilitiesURLAssociations" /v "nntp" /t REG_SZ /d "Thunderbird.Url.news" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdDefaultIcon" /ve /t REG_SZ /d "%app-path%AppThunderbirdThunderbird.exe,0" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ews" /ve /t REG_SZ /d "Thunderbird (News) URL" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ews" /v "URL Protocol" /t REG_SZ /d "" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ews" /v "FriendlyTypeName" /t REG_SZ /d "Thunderbird (News) URL" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ews" /v "EditFlags" /t REG_DWORD /d "2" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ewsDefaultIcon" /ve /t REG_SZ /d "%app-path%AppThunderbirdThunderbird.exe,0" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ewsshellopencommand" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" -osint -mail "%%1"" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ntp" /v "FriendlyTypeName" /t REG_SZ /d "Thunderbird (News) URL" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ntp" /v "EditFlags" /t REG_DWORD /d "2" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ntp" /v "URL Protocol" /t REG_SZ /d "" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ntp" /ve /t REG_SZ /d "Thunderbird (News) URL" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ntpDefaultIcon" /ve /t REG_SZ /d "%app-path%AppThunderbirdThunderbird.exe,0" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocols
ntpshellopencommand" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" -osint -mail "%%1"" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocolssnews" /v "URL Protocol" /t REG_SZ /d "" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocolssnews" /v "EditFlags" /t REG_DWORD /d "2" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocolssnews" /ve /t REG_SZ /d "Thunderbird (News) URL" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocolssnews" /v "FriendlyTypeName" /t REG_SZ /d "Thunderbird (News) URL" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocolssnewsDefaultIcon" /ve /t REG_SZ /d "%app-path%AppThunderbirdThunderbird.exe,0" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla ThunderbirdProtocolssnewsshellopencommand" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" -osint -mail "%%1"" /f
Reg.exe add "HKLMSoftwareClientsNewsMozilla Thunderbirdshellopencommand" /ve /t REG_SZ /d ""%app-path%ThunderbirdPortable.exe" -mail" /f
Reg.exe add "HKLMSoftwareMicrosoftWindowsCurrentVersionApp PathsThunderbirdPortable.exe" /v "Path" /t REG_SZ /d "%app-path%" /f
Reg.exe add "HKLMSoftwareMicrosoftWindowsCurrentVersionApp PathsThunderbirdPortable.exe" /ve /t REG_SZ /d "%app-path%ThunderbirdPortable.exe" /f
Reg.exe add "HKLMSoftwareRegisteredApplications" /v "Thunderbird (News)" /t REG_SZ /d "SoftwareClientsNewsMozilla ThunderbirdCapabilities" /f
Reg.exe add "HKLMSoftwareRegisteredApplications" /v "Thunderbird" /t REG_SZ /d "SoftwareClientsMailMozilla ThunderbirdCapabilities" /f

echo.
echo ------------------------------------------------
echo READY - THUNDERBIRD PORTABLE IS NOW REGISTERED !
echo ------------------------------------------------
echo.
pause
Exit

:IsAdmin
Reg.exe query "HKUS-1-5-19Environment"
If Not %ERRORLEVEL% EQU 0 (
 Cls & Echo You must have administrator rights to continue ... 
 Pause & Exit
)
Cls
goto:eof

:FAIL
echo.
echo.
echo FAIL TO REGISTER...
echo.
echo THE CURRENT FOLDER MUST BE A SUBFOLDER IN THE PROGRAM FOLDER !
echo.
echo.
pause

• 4. Create a batch-file (for example: "CreateSendToConfiguration.bat") with the following content:

@echo off
Title Create SendTo Configuration & Color 1E

echo CREATE SENDTO CONFIGURATION
echo ===========================

echo.
echo CLEANING SENDTO THUNDERBIRD LINKS...
del "C:Users\%USERNAME%AppDataRoamingMicrosoftWindowsSendToThunderbird*.lnk" /Q

cd /d %~dp0
set setup-path=%CD%

cd..
set app-path=%CD%

if not exist "%app-path%ThunderbirdPortable.exe" goto :FAIL

cd %setup-path%

set temp-link=%setup-path%Thunderbird Portable.lnk
set temp-file=%setup-path%Thunderbird SendTo.cmd
set temp-icon=%app-path%appappinfoappicon.ico

echo.
echo.
echo PARAMETER SETTINGS:
::   ===================
echo.
echo LINK: %temp-link%
echo FILE: %temp-file%
echo ICON: %temp-icon%

echo.
echo.
echo FILE CREATION...
::   ================

echo @echo off > "%temp-file%"
echo if %%1. == . exit >> "%temp-file%"
echo set PARAMS=file:///%%1 >> "%temp-file%"
echo :loop >> "%temp-file%"
echo shift >> "%temp-file%"
echo if %%1. == . goto send >> "%temp-file%"
echo set PARAMS=%%PARAMS%%,file:///%%1 >> "%temp-file%"
echo goto loop >> "%temp-file%"
echo :send >> "%temp-file%"
echo start "Thunderbird" "%app-path%ThunderbirdPortable.exe" -compose attachment='%%PARAMS%%' >> "%temp-file%"

echo LINK CREATION... 
::   ================

set SCRIPT="%TEMP%\%RANDOM%-%RANDOM%-%RANDOM%-%RANDOM%.vbs"

echo Set oWS = WScript.CreateObject("WScript.Shell") >> %SCRIPT%
echo sLinkFile = "%temp-link%" >> %SCRIPT%
echo Set oLink = oWS.CreateShortcut(sLinkFile) >> %SCRIPT%
echo oLink.TargetPath = "%temp-file%" >> %SCRIPT%
echo oLink.IconLocation = "%temp-icon%" >> %SCRIPT%
echo oLink.Save >> %SCRIPT%

cscript /nologo %SCRIPT%
del %SCRIPT%

echo.
echo SENDTO LINK CREATION...
::   =======================
echo.

copy "%temp-link%" "C:Users\%USERNAME%AppDataRoamingMicrosoftWindowsSendTo"

echo.
echo ------------------------------------
echo READY - SENDTO LINK IS NOW CREATED !
echo ------------------------------------
echo.
pause
exit

:FAIL
echo.
echo.
echo FAIL TO CREATE...
echo.
echo THE CURRENT FOLDER MUST BE A SUBFOLDER IN THE PROGRAM FOLDER !
echo.
echo.
pause

• 5. Execute the two created batch-files and set ThunderbirdPortable as Default-App (Windows Settings)

...and have freedom