Enregistrer Google Chrome Portable avec des applications par défaut ou des programmes par défaut

Il y a longtemps, j'ai créé un programme simple qui enregistrera Mozilla Firefox Portable avec des programmes par défaut ou des applications par défaut dans Windows. De nombreux utilisateurs ont demandé si un outil pouvait être créé pour d'autres navigateurs portables, tels que Opera, Chrome, etc.,

Ce message a un VBScript qui enregistrera ou désinscrira Google Chrome Portable (de PortableApps.com) avec les applications par défaut en un seul clic. Après l'enregistrement, vous pouvez définir Chrome Portable comme navigateur par défaut via les applications par défaut.

Enregistrer Chrome Portable avec des applications ou des programmes par défaut

PortableApps.com est une solution logicielle portable populaire vous permettant d'emporter votre logiciel préféré avec vous. Une source entièrement ouverte et une plate-forme gratuite, elle fonctionne à partir de n'importe quel dossier cloud synchronisé (DropBox, Google Drive, Box, etc.), de votre PC local sur un disque interne ou externe, ou sur n'importe quel périphérique de stockage portable (clé USB, carte mémoire, disque dur portable, etc.) déplacé entre les PC.

Pour ajouter le navigateur Web Google Chrome Portable aux applications par défaut, utilisez le VBScript ci-dessous.

 `` Enregistre Google Chrome Portable avec des programmes par défaut ou des applications par défaut dans Windows '' chromeportable.vbs - créé le 20 mai 2019 par Ramesh Srinivasan, Winhelponline.com '' Dernière mise à jour le 13 juin 2019 - Paramètre de nom de fichier inclus entre guillemets doubles. Option Explicit Dim sAction, sAppPath, objFile, oFSO, sbaseKey, sbaseKey2 Dim WshShell: définir WshShell = CreateObject ("WScript.Shell") Dim oFS0: définir oFSO = CreateObject ("Scripting.FileSystemObject") définir objFileF (OFSO.et .ScriptFullName) sAppPath = oFSO.GetParentFolderName (objFile) sAppPath = sAppPath & "\ GoogleChromePortable.exe" Sinon oFSO.FileExists (sAppPath) Puis WScript.Quit If InStr ("", sAppPath) 0 Alors sAppPath = "" "&" sAppPath & "" "" If WScript.Arguments.Count 0 Then If UCase (Trim (WScript.Arguments (0))) = "-REG" Then Call RegisterChromePortable (sAppPath) If UCase (Trim (WScript.Arguments (0)) ) = "-UNREG", puis appelez UnregisterChromePortable (sAppPath) Else sAction = InputBox ("Tapez REGISTER pour ajouter Chrome Portable aux applications par défaut. Tapez UNREGISTER pour supprimer.", "Chrome Portable Registration", "REGISTER") Si UCase (Trim ( sAction)) = "ENREGISTREMENT" Alors appelez RegisterChromePortable (sAppPath) Si UCase (Trim (sAction)) = "DÉSINSCRIPTION" Alors Appelez UnregisterChromePortable (sAppPath) End If Sous-registreChromePortable (sAppPath) sbaseKey = "HKCU \ Software \" sbaseKey2 = sbaseKey & "Clients \ StartmenuInternet \ Google Chrome Portable \" WshShell.RegWrite sbaseKey & "RegisteredApplications \ Google Chrome Portable", "Software \ Clients \ StartMenuInternet \ Google Chrome Portable \ Capabilities ", " REG_SZ "WshShell.RegWrite sbaseKey &" Classes \ ChromeHTML2 \ ", " Chrome HTML Document ", " REG_SZ "WshShell.RegWrite sbaseKey &" Classes \ ChromeHTML2 \ AppUserModelId ", " Chrome Portable ", " REG_SZ "Wsh .RegWrite sbaseKey & "Classes \ ChromeHTML2 \ ApplicationIcon", sAppPath & ", 0", "REG_SZ" WshShell.RegWrite sbaseKey & "Classes \ ChromeHTML2 \ ApplicationName", "Google Chrome Portable Edition", "REG_SZ" WshShell.RegWrite sbaseKey & "Classes \ ChromeHTML2 \ ApplicationDescription", "Accéder à Internet", "REG_SZ" WshShell.RegWrite sbaseKey & "Classes \ ChromeHTML2 \ ApplicationCompany", "Google Inc.", "REG_SZ" WshShell.RegWrite sbaseKey & "Classes \ ChromeHTML2 \ DefaultIcon \ ", sAppPath &", 0 ", " REG_SZ "WshShell.RegWrite s baseKey & "Classes \ ChromeHTML2 \ shell \ open \ command \", sAppPath & "-" & "" "" & "% 1" & "" "", "REG_SZ" WshShell.RegWrite sbaseKey2, "Google Chrome Portable Edition ", " REG_SZ "WshShell.RegWrite sbaseKey2 &" Capabilities \ ApplicationDescription ", " Google Chrome Portable Edition ", " REG_SZ "WshShell.RegWrite sbaseKey2 &" Capabilities \ ApplicationIcon ", sAppPath &", 0 ", " REG_SZ "WshShell.RegWrite sbaseKey2 & "Capabilities \ ApplicationName", "Google Chrome Portable Edition", "REG_SZ" WshShell.RegWrite sbaseKey2 & "Capabilities \ FileAssociations \ .htm", "ChromeHTML2", "REG_SZ" WshShell.RegWrite sbaseKey2 & "Capabilities \ FileAssociations \. html ", " ChromeHTML2 ", " REG_SZ "WshShell.RegWrite sbaseKey2 &" Capabilities \ FileAssociations \ .shtml ", " ChromeHTML2 ", " REG_SZ "WshShell.RegWrite sbaseKey2 &" Capabilities \ FileAssociations \ .xht ", " ChromeH " REG_SZ "WshShell.RegWrite sbaseKey2 &" Capabilities \ FileAssociations \ .xhtml ", " ChromeHTML2 ", " REG_SZ "WshShell.RegWrite sbaseKey2 &" Capabilities \ FileAssociociat ions \ .webp ", " ChromeHTML2 ", " REG_SZ "WshShell.RegWrite sbaseKey2 &" Capabilities \ URLAssociations \ ftp ", " ChromeHTML2 ", " REG_SZ "WshShell.RegWrite sbaseKey2 &" Capabilities \ URLAssociations \ http ", " ChromeHT "REG_SZ" WshShell.RegWrite sbaseKey2 & "Capabilities \ URLAssociations \ https", "ChromeHTML2", "REG_SZ" WshShell.RegWrite sbaseKey2 & "DefaultIcon \", sAppPath & ", 0", "REG_SZ" WshShell.RegWrite sKey " \ open \ command \ ", sAppPath, " REG_SZ "'Lancer les applications par défaut après l'enregistrement de Chrome Portable WshShell.Run" control / name Microsoft.DefaultPrograms / page pageDefaultProgram "End Sub Sub UnregisterChromePortable (sAppPath) sbaseKey =" HKCU \ Software \ "sbaseKey2 = "HKCU \ Software \ Clients \ StartmenuInternet \ Google Chrome Portable" En cas de reprise d'erreur Suivant WshShell.RegDelete sbaseKey & "RegisteredApplications \ Google Chrome Portable" En cas d'erreur GoTo 0 WshShell.Run "reg.exe delete" & sbaseKey & "Classes \ ChromeHTML2 "&" / f ", 0 WshShell.Run" reg.exe delete "& sbaseKey2 &" / f ", 0 'Launch Defau lt Apps après avoir désenregistré Chrome Portable WshShell.Run "control / name Microsoft.DefaultPrograms / page pageDefaultProgram" End Sub 

Usage

1. Copiez le code VBScript ci-dessus dans le bloc-notes et enregistrez le fichier sous chromeportable.vbs
2. Déplacez le fichier sur votre clé amovible ou USB. Le fichier de script doit être placé dans le dossier GoogleChromePortable pour qu'il fonctionne.
   

3. Double-cliquez sur chromeportable.vbs pour l'exécuter.
   

4. Saisissez REGISTER et cliquez sur OK pour ajouter Chrome Portable aux applications par défaut.
5. Le script lance automatiquement les applications par défaut ou les programmes par défaut. Sélectionnez Google Chrome Portable dans la liste et définissez-le par défaut.
   

Pour supprimer Google Chrome Portable des applications par défaut, réexécutez le script et cette fois, saisissez UNREGISTER et cliquez sur OK.

CONNEXES: Modifier les applications par défaut, le navigateur ou l'association de fichiers via la ligne de commande dans Windows 10

Sélectionnez le navigateur par défaut

Notez que le script enregistre le navigateur avec les applications par défaut, mais ne le définit pas par défaut. C'est quelque chose que l'utilisateur doit faire manuellement, en particulier dans Windows 10.

Ainsi, le script lance la fenêtre Programmes par défaut ou Applications par défaut (dans Windows 10) après avoir enregistré ou désenregistré le navigateur portable. Pour empêcher le script de lancer la fenêtre des applications par défaut à chaque fois, supprimez la ligne suivante (2 occurrences) dans le script et enregistrez-la:

 WshShell.Run "contrôle / nom Microsoft.DefaultPrograms / page pageDefaultProgram" 

Vous pouvez utiliser l'utilitaire SetuserFTA pour définir le navigateur par défaut via la ligne de commande ou le raccourci, plutôt que via les applications par défaut. Voir Modifier les applications par défaut, le navigateur ou l'association de fichiers via la ligne de commande dans Windows 10.

Exécutez le script de manière non interactive

Pour enregistrer ou désinscrire Chrome Portable en mode silencieux (sans interaction), vous pouvez utiliser la syntaxe suivante:

 wscript.exe D: \ GoogleChromePortable \ chromeportable.vbs -REG wscript.exe D: \ GoogleChromePortable \ chromeportable.vbs -UNREG 

Et vous pouvez même créer des raccourcis pour les commandes ci-dessus:

J'espère que vous avez trouvé le script un peu utile! Si vous recherchez un script similaire pour d'autres applications portables, veuillez le savoir dans la section Commentaires ci-dessous.