Récupération des applications "ouvrir avec..." d'un fichier (d'une extension)

Soyez le premier à donner votre avis sur cette source.

Snippet vu 16 120 fois - Téléchargée 30 fois

Contenu du snippet

Cette fonction retourne la liste des applications (en fait la liste des commandes Shell) pour lancer le type de fichier concerné (on fournit l'extension du fichier).
Cette liste correspond aux applications présentes dans le menu contextuel "Ouvrir avec..." d'Explorer lorsque l'on fait un clic droit sur un fichier.

Source / Exemple :


Public Function GetOpenWithApp(ByVal Extension As String) As List(Of String)
        Dim hsubKeyExt, hSubKeyApp As RegistryKey
        GetOpenWithApp = New List(Of String)

        'Récupération des noms d'applications liés à l'extension
        hsubKeyExt = Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\." & Extension & "\OpenWithList")
        If Not hsubKeyExt Is Nothing Then
            Dim sApplication As String
            Dim Cles() As String = hsubKeyExt.GetValueNames

            For Each sApplication In Cles
                sApplication = hsubKeyExt.GetValue(sApplication)
                'Récupération de la commande pour lancer cette application
                hSubKeyApp = Registry.ClassesRoot.OpenSubKey("Applications\" & sApplication & "\shell\open\command")
                If Not hSubKeyApp Is Nothing Then
                    GetOpenWithApp.Add(hSubKeyApp.GetValue(""))
                    hSubKeyApp.Close()
                End If
            Next
            hsubKeyExt.Close()
        End If
    End Function

A voir également

Ajouter un commentaire

Commentaires

Messages postés
201
Date d'inscription
jeudi 26 février 2004
Statut
Membre
Dernière intervention
30 juin 2008

ok merci pr l'info, j'en prends note.
Bye, Zeunz.
Messages postés
117
Date d'inscription
mardi 21 janvier 2003
Statut
Membre
Dernière intervention
2 juillet 2009
1
Un simple lien dans le repertoire SENDTO qui se trouve dans le repertoire suivant
C:\Documents and Settings\<Ton Login>\SendTo

Et voila c gagne, tu peux programmer la creation de ce raccourci comme le raccourci dans le menu demarrer, quand tu cree un pacquage de deploiment via visual.
Messages postés
201
Date d'inscription
jeudi 26 février 2004
Statut
Membre
Dernière intervention
30 juin 2008

slt tt le monde,
comment rajouter SON application ds le menu "ouvrir avec"?

merci du renseignement.
Messages postés
135
Date d'inscription
jeudi 30 janvier 2003
Statut
Membre
Dernière intervention
12 juillet 2006
1
Mince j'avais pas vu la note ^^. Merci.
Pour le coup des icônes c'est appliqué dans mon programme. Je vais peut être mettre à jour cette source pour les prendre en compte.
Messages postés
117
Date d'inscription
mardi 21 janvier 2003
Statut
Membre
Dernière intervention
2 juillet 2009
1
Mais j'ai bien compris, ne t'en fait pas...

J'ai vu de la lumiere donc je suis entre. Non mais comme si je collais une note de 10/10 comme ca au hazard sans regarder la source... en plus quand je n'aime pas je ne note pas.

PS: petite idee pour toi, si tu combines ca avec une extracteur d'icons, tu pourrais te faire un menu sympa ;-)
Afficher les 9 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.