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

VBA Discussion :

Ecrire un fichier HTML en VBA


Sujet :

VBA

  1. #1
    Membre à l'essai
    Inscrit en
    Avril 2006
    Messages
    21
    Détails du profil
    Informations forums :
    Inscription : Avril 2006
    Messages : 21
    Points : 17
    Points
    17
    Par défaut Ecrire un fichier HTML en VBA
    J'ai un problème qui me semble mineur mais pourtant je suis incapable de le résoudre et c'est très frustrant:

    Mise en situation
    À l'aide d'une macro VBA dans Outlook, je crée un fichier HTML qui contient seulement un hyperlien. Je procède simplement en écrivant le code HTML d'un hyperlien dans un fichier texte que je sauvegarde en .HTM

    Problème
    Mon problème est que mes guillemets se retrouvent dédoublés et le lien ne fonctionne pas !

    Pas exemple, cette ligne de code fonctionne très bien dans un fichier .HTM
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    <A HREF="http://www.google.ca">Google</A>
    Cependant, lorsque j'écris cette ligne de code à l'aide de ma macro VBA dans un fichier et que je le sauvegarde dans un fichier .HTM, la ligne de code devient comme celle-ci:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    "<A HREF=""http://www.google.ca"">Google</A>"
    Ça ne fonctionne pas car les guillemets autour de l'hyperlien sont dédoublés.

    J'ai esseyé plusieurs méthodes, entre autres d'utiliser chr(34), toujours sans succès.

    Quelqu'un a une idée ?

  2. #2
    Membre à l'essai
    Inscrit en
    Avril 2006
    Messages
    21
    Détails du profil
    Informations forums :
    Inscription : Avril 2006
    Messages : 21
    Points : 17
    Points
    17
    Par défaut
    Mise à jour
    J'ai utilisé la méthode PRINT au lieu de WRITE et ça fonctionne maintenant, du moins les guillemets ne sont pas doublés.

    Mais maintenant j'ai un autre problème, l'hyperlien dans le fichier .htm en question ne fonctionne pas si il est exécuté à partir de "c:\documents and settings\JBTech\Local Settings\Temporary Internet Files\OLK1C" mais ça fonctionne bien si on ne fait que copier le fichier dans un autre répertoire.

    Il est impératif que ce fichier se trouve à cet emplacement, je ne peux donc pas le changer.

    Quelqu'un sait pourquoi ça ne fonctionne pas dans ce répertoire ?

  3. #3
    Membre à l'essai
    Inscrit en
    Avril 2006
    Messages
    21
    Détails du profil
    Informations forums :
    Inscription : Avril 2006
    Messages : 21
    Points : 17
    Points
    17
    Par défaut
    J'ai changé le répertoire temporaire sécurisé d'Outlook dans la base de registre pour "%TEMP%\" et ça fonctionne maintenant.

  4. #4
    Membre régulier
    Profil pro
    Étudiant
    Inscrit en
    Janvier 2005
    Messages
    97
    Détails du profil
    Informations personnelles :
    Âge : 38
    Localisation : France, Indre et Loire (Centre)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Janvier 2005
    Messages : 97
    Points : 76
    Points
    76
    Par défaut
    Salut, dit moi tu veux pas me dire comment tu fais? parce que moi j'y arrive pas, soit je fait avec write et il dédouble les guillemets, soit je passe en print, et là je peux pas du tout mettre de guillemets dans le fichier.... frustrant.
    En plus je n'ai pas le net où je travaille alors c'est galère


    EDIT :
    Ok j'ai trouvé
    Pour ceux que ça intéresse,
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    Dim Chaine As String
    Chaine = "Dans cette chaîne, le mot ""guillemet"" est entre guillemets"
     
    Dim Chaine As String
    Chaine = "Dans cette chaîne, le mot " & Chr$(34) & "guillemet" & Chr$(34) & " est entre guillemets"
    (coluche) Avec la capote Nestor, je suis pas né, je suis pas mort !
    Ne commentez jamais vos codes.
    Ca a été dur à écrire, ça doit être dur à lire.

  5. #5
    Membre habitué Avatar de Currahee
    Profil pro
    Inscrit en
    Juin 2006
    Messages
    157
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2006
    Messages : 157
    Points : 130
    Points
    130
    Par défaut
    Salut,

    Moi j'utilise une chtite fonction

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    Public Function gm(texte As String) As String
     
        Dim g As String
        g = """"
        gm = g & texte & g
     
    End Function
    Exemple Utilisation...
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Print #1, "<TABLE BORDER=" & gm("0") & " CELLPADDING=" & gm("2") & " CELLSPACING=" & gm("0") & " WIDTH=" & gm("600") & " BGCOLOR=" & gm("#BBBBBB") & ">"
    "Ne soyez rien, devenez sans cesse"

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

Discussions similaires

  1. Ecrire dans fichier html
    Par thais781 dans le forum AppleScript
    Réponses: 1
    Dernier message: 17/12/2013, 10h42
  2. [AC-2007] Importer fichier HTML sous vba Access
    Par guycva05 dans le forum Access
    Réponses: 7
    Dernier message: 27/02/2013, 21h36
  3. [XL-2007] Lecture fichier HTML en VBA
    Par berapard dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 18/04/2011, 05h16
  4. [Batch] Ecrire un fichier html en batch
    Par olivier.x dans le forum Scripts/Batch
    Réponses: 2
    Dernier message: 19/11/2009, 20h55
  5. ecrire un fichier html avec VB
    Par SpaceFrog dans le forum VB 6 et antérieur
    Réponses: 2
    Dernier message: 27/09/2006, 12h01

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