Discussion :

[Paul Van Walleghem]

Bonjour à tous!

D'abord, est-il exact que pour connaître le type d'un fichier ( pas l'extension), il faille aller lire le registre de Windows?

Si oui, quelle est la bonne clef? J'ai écrit la fonction suivante:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
 
 
    Public Function GetFileType(ByVal cFile As String) As String
        Dim cKey As String = My.Computer.Registry.GetValue _
                            ("HKEY_CLASSES_ROOT\" & cFile, "", "ExtensionNotFound")
        Return cKey
    End Function

Mais elle me renvoie une chaîne vide. (Je lui envoie en paramètre le nom du fichier avec son chemin d'accès complet)

D'avance merci pour votre aide
Avec mes salutations

[cybermaxs]

Salut,

Il ne faut pas le chemin du fichier (sinon images un peu la taille de la base de registres si il faut avoir tous les fichiers du poste...).

Il faut juste l'extension.

ps : utiliser regedit pour voir le résultat.

[Paul Van Walleghem]

bonjour,
D'abord merci de ta réponse.
j'ai testé ma fonction en lui envoyant d'abord l'extension "txt", puis la chaîne "*.txt", elle me renvoie toujours une chaîne vide ( nothing).
Je ne suis pas du tout sûr que les paramètres envoyés à la méthode GetValue pour lire la table de registre soient les bons. Je les ai simplement récupérés de messages sur un autre Forum.
Connais-tu un site web où on peut trouver de l'information fiable sur les clefs de la base de registre Windows Vista?
A+

[Paul Van Walleghem]

Autre info: J'ai testé l'exemple du help de VB dans une fonction. Elle renvoie aussi une chaîne vide. Voici son code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
    Public Function GetApp() As String
        Dim readValue As String
        readValue = My.Computer.Registry.GetValue _
        ("HKEY_CURRENT_USER\Software\MyApp", "Name", Nothing)
        Return readValue
    End Function

A part Internet, je ne suis pas connecté à un réseau. Je travaille avec un compte "utilisateur standard". Ai-je le droit d'accéder au registre en lecture?

[benito9253]

Au lieu de *.txt ou de txt, essaye plutot .txt...

[cybermaxs]

tout à fait, c'est ça qu'il faut faire