InsertXMLArray()

Syntaxe

Resultat = InsertXMLArray(NoeudParent, Tableau() [, NoeudPrecedent])

Insère un tableau dans un noeud.

Arguments

NoeudParent	Le noeud dans lequel insérer le nouveau noeud. Pour insérer le nouveau noeud à la racine de l'arbre, utiliser RootXMLNode().
Tableau()	Le tableau à insérer.
NoeudPrecedent (optionnel)	Un noeud enfant du noeud parent après qui le nouveau noeud doit être inséré. Si cette valeur est 0 ou non spécifiée, le nouveau noeud est inséré comme premier enfant de son parent. Si cette valeur est -1, le noeud est inséré comme dernier enfant de son parent.

Valeur de retour

Le nouveau noeud XML s'il a été créé avec succès, zéro sinon.

Remarques

Les règles spécifiées dans CreateXMLNode() pour le cas où un nouveau noeud est inséré s'appliquent également à cette fonction.

Le noeud inséré est nommé "array" et les éléments du tableau sont insérés sous le nom "element". Si le tableau a plusieurs dimensions, chaque élément aura des attributs indiquant la coordonnée de l'élément à l'intérieur du tableau, nommée "a", "b" et ainsi de suite. Voir ci-dessous un exemple.

Exemple

  ; Cet exemple produit l'arbre XML suivant:
  ;
  ; <array>
  ;   <element>rouge</element>
  ;   <element>vert</element>
  ;   <element>bleu</element>
  ; </array>
  ;
  Dim Couleurs$(2)
  Couleurs$(0) = "rouge"
  Couleurs$(1) = "vert"
  Couleurs$(2) = "bleu"
  
  If CreateXML(0)
    InsertXMLArray(RootXMLNode(0), Couleurs$())
    FormatXML(0, #PB_XML_ReFormat)
    Debug ComposeXML(0)
  EndIf

Exemple

  ; Cet exemple produit l'arbre XML suivant:
  ;
  ; <array>
  ;   <element a="0" b="0">0</element>
  ;   <element a="0" b="1">1</element>
  ;   <element a="1" b="0">10</element>
  ;   <element a="1" b="1">11</element>
  ;   <element a="2" b="0">20</element>
  ;   <element a="2" b="1">21</element>
  ; </array>
  ;
  Dim MultiArray(2, 1)
  For a = 0 To 2
    For b = 0 To 1
      MultiArray(a, b) = a * 10 + b
    Next b
  Next a
  
  If CreateXML(0)
    InsertXMLArray(RootXMLNode(0), MultiArray())
    FormatXML(0, #PB_XML_ReFormat)
    Debug ComposeXML(0)
  EndIf

Voir aussi

ExtractXMLArray(), InsertXMLList(), InsertXMLMap(), InsertXMLStructure(),

OS Supportés

Tous