IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

recupérer le carnet d'adresse de Mozilla Thunderbird


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Octobre 2010
    Messages
    28
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2010
    Messages : 28
    Par défaut recupérer le carnet d'adresse de Mozilla Thunderbird
    Bonjour a tous.
    Pour les besoins de mon application j'ai besoin de récupérer le carnet d'adresse de Mozilla Thunderbird.
    je cherche en vain l'emplacement de ce fichier dans les répertoires de mon PC.
    Pourriez vous m'indiquer le chemin de son implantation?,qq a t'il déjà publié du code à ce sujet?
    Je suis sous Windows 7.
    D"avance merci de votre aide

  2. #2
    Membre expérimenté
    Avatar de Proteus91
    Profil pro
    Inscrit en
    Décembre 2010
    Messages
    150
    Détails du profil
    Informations personnelles :
    Âge : 45
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Décembre 2010
    Messages : 150
    Par défaut Piste
    Salut,

    Je n'ai pas fait de recherche sur le sujet, mais par contre je ne sais pas si tu as deja consulté ce site ?

    https://developer.mozilla.org/en/Thu..._client_design

    Essaie d'aller faire un tour et dit moi si cela ta un peu aidé.

  3. #3
    Rédacteur/Modérateur


    Homme Profil pro
    Développeur .NET
    Inscrit en
    Février 2004
    Messages
    19 875
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Février 2004
    Messages : 19 875
    Par défaut
    Le warning fait un peu peur quand même :

    Warning: The content of this article may be out of date. It was imported from mozilla.org and last updated in 2000.
    Thunderbird n'existait même pas encore en 2000

  4. #4
    Rédacteur
    Avatar de Nathanael Marchand
    Homme Profil pro
    Expert .Net So@t
    Inscrit en
    Octobre 2008
    Messages
    3 615
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 39
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Expert .Net So@t
    Secteur : Conseil

    Informations forums :
    Inscription : Octobre 2008
    Messages : 3 615
    Par défaut
    Citation Envoyé par tomlev Voir le message
    Le warning fait un peu peur quand même :
    Thunderbird n'existait même pas encore en 2000
    En mode gros troll:
    Et après on dit que c'est Microsoft qui publie ses specs sur Office

  5. #5
    Membre averti
    Profil pro
    Inscrit en
    Octobre 2010
    Messages
    28
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2010
    Messages : 28
    Par défaut
    Merci de votre aide a tous mais malheureusement je ne parviens tj pas a localiser mon carnet d'adresse pour le lire dans mon application VB .
    Mme a la main en recherchant dans mes répertoires je ne parviens pas a localiser ce fichier.

    c'est curieux car avec outlook ou windows mail ce n'est pas si difficile que ca et j'avais trouvé du code pour récupérer mon carnet.
    si qq pouvais essayer de son coté et me donner son avis ....
    en tout cas je vais chercher encore

  6. #6
    Rédacteur/Modérateur


    Homme Profil pro
    Développeur .NET
    Inscrit en
    Février 2004
    Messages
    19 875
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Février 2004
    Messages : 19 875
    Par défaut
    Citation Envoyé par DAN14 Voir le message
    Merci de votre aide a tous mais malheureusement je ne parviens tj pas a localiser mon carnet d'adresse pour le lire dans mon application VB .
    Mme a la main en recherchant dans mes répertoires je ne parviens pas a localiser ce fichier.
    Ben tu le trouves pas à l'emplacement que je t'ai indiqué ?

    Ce code devrait te donner le répertoire du profil, tu n'as plus qu'à récupérer le fichier abook.mab dedans :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
        ' C:\Documents and settings\<username>\Application Data (sous XP)
        ' C:\Users\<username>\AppData\Roaming (sous Vista/Seven)
        Dim appDataPath = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData)
     
        ' ..\Thunderbird
        Dim thunderbirdDataPath = Path.Combine(appDataPath, "Thunderbird")
     
        ' ..\Thunderbird\profiles.ini
        Dim profilesIniPath = Path.Combine(thunderbirdDataPath, "profiles.ini")
     
        Dim profilePath As String
        Dim isRelative = False
     
        Dim pathPrefix = "Path="
        Dim isRelativePrefix = "IsRelative="
     
        ' Lecture du fichier profiles.ini
        For Each line In File.ReadAllLines(profilesIniPath)
     
            If line.StartsWith(pathPrefix) Then ' Path=...
     
                profilePath = line.Substring(pathPrefix.Length).Replace("/"C, Path.DirectorySeparatorChar)
     
            ElseIf line.StartsWith(isRelativePrefix) Then ' IsRelative=...
     
                If line.SubString(isRelativePrefix.Length) = "1" Then
                    isRelative = True
                End If
     
            End If
     
        Next
     
        ' Si le chemin est relatif, on combine avec le répertoire de Thunderbird
        If isRelative Then
            profilePath = Path.Combine(thunderbirdDataPath, profilePath)
        End If
     
        Console.WriteLine(profilePath)

  7. #7
    Rédacteur/Modérateur


    Homme Profil pro
    Développeur .NET
    Inscrit en
    Février 2004
    Messages
    19 875
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Février 2004
    Messages : 19 875
    Par défaut
    A priori c'est le fichier abook.mab dans le répertoire du profil. Par contre le format a l'air assez horrible... j'espère que Mozilla a publié des specs

    Pour récupérer l'emplacement du répertoire de profil, c'est dans le fichier profiles.ini, dans le répertoire %APPDATA%\Thunderbird\

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. convertir carnet d'adresse thunderbird en LDIF
    Par wincroc dans le forum Windows
    Réponses: 0
    Dernier message: 06/05/2008, 14h37
  2. Carnet d'adresses d'Outlook
    Par vciofolo dans le forum Access
    Réponses: 2
    Dernier message: 14/10/2005, 11h34
  3. Récupérer le carnet d'adresses de Outlook
    Par pc75 dans le forum VB 6 et antérieur
    Réponses: 6
    Dernier message: 01/02/2005, 12h30

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo