begin process at 2008 09 06 22:25:55
1 237 973 membres
355 nouveaux aujourd'hui
14 314 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Modifier le texte d'un noeud Xml [ Scripting / VBScript ] (roro59650)

Modifier le texte d'un noeud Xml le 16/05/2007 11:53:44

roro59650
Bonjour bonjour,
Actuellement je travaille sur une page ASP qui modifie une page XML.
Ma question est de savoir comment affecter une valeur à un texte d'un noeud?
Voila mon code actuel :
    Set Objet_Document = Server.CreateObject("MSXML2.DOMDocument")
    Objet_Document.async = False
    Objet_Document.Load ("MonDoc.xml")
    Set NodeList = Objet_Document.documentElement.selectNodes("//")
    For Each Node In NodeList
// Nom du noeud
        Response.Write Node.nodeName & "<br />"
// Texte du noeud
        Response.Write Node.text & "<br />"
// Nombre de noeuds enfants
        Response.Write Node.childNodes.length & "<br />"
        End If
    Next

Voila, donc je voudrais affecter une valeur à Node.text, si c'est possible.
Merci d'avance!

Roro

Re : Modifier le texte d'un noeud Xml le 22/05/2007 11:44:18

drahcir

Salut,

essaie
Node.InnerText ="ta valeur"
Objet_Document.Save(...)



@+  

Re : Modifier le texte d'un noeud Xml le 22/05/2007 15:05:55

roro59650
Réponse acceptée !
Salut,

merci pour ce conseil, mais j'ai reussi a me debrouiller avec un replace.
Sinon ton conseil me donne ca comme erreur :

                Microsoft VBScript runtime error '800a01b6'

                Object doesn't support this property or method: 'Node.InnerText'

Mais j'avoue que j'ai pas trop envie de chercher la source d'erreur.

Voila comment je me suis debrouillé :

                If Node.nodeName = "#text" Then
                    Node.text = Replace(Node.text,"
#COUNTRY#","France")
                End If

D'ailleur dans mon 1er code, une erreur s'est glissée : il n'y a pas de "End If".

Voila, merci quand même et bonne journée!!



Classé sous : texte, objet, xml, node, noeud

Participer à cet échange

Pub



Appels d'offres

CalendriCode

Septembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
2930     

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS