get an Element's childs

**miagomiago** · 06/06/2007, 22h51

bonjour
je veux savoir comment obtenir les enfants d'un ELement:

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
<Root>

<Evenement>
     <Child 1></Child 1>
      <Child 2 ></Child 2>
      <Child 3 > X </Child 3>
</Evenement>

...

<Evenement>meme sctructure</Evenement>
<Evenement>meme structure</Evenement>
<Evenement>meme structure</Evenement>

</Root>

je veux changer la valeur X et donc je fais :

Code :

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

1
2
3
4
5
6
 
set olistElemEven=xmlDoc.getElementsByTagName("EVENEMENT")
 
                       For Each oElemEven in olistElemEven
                           comment faire pour avoir les child de chaque element <EVENEMENT> pour pouvoir changer  <Child 3 > ??
                       next

merci

**omen999** · 07/06/2007, 10h47

salut,
dans la collection oElemEven.children ?

**miagomiago** · 07/06/2007, 18h21

oui ! j'ai éssayé ça , mais il m'affiche une erreur :

Cet objet ne gere pas cette propriété ou cette méthode : 'oElemEven.children'

code : 800A01B6

j'ai éssayé aussi lastchild et firstchild et il m'affiche la meme erreur

pensez vous que children, lastchild et firstchild peuvent etre appliquées uniquement a l'élément ROOT ??

**omen999** · 07/06/2007, 19h39

on peut voir le code qui donne cette erreur ?
c'est à dire le contenu de la boucle :

Code :

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

For Each oElemEven in olistElemEven

**miagomiago** · 07/06/2007, 20h35

bonjour
au fait j'utilise une fonction que j'appel ds ma boucle 'for' pour aller chercher un fils d'un element avec son nom de TAG , voici la fonction:

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
function getChildByTagName(oElem,tagName)

dim oElement 

oElement = oElem.lastChild       ' erreur est içi

'oElement = oElem.children

While ( NOT oElement.nodeName like tagName)
  
  oElement=oElement.previousSibling

Wend

if oElement.nodeName = tagName then

getChildByTagName=oElement

Exit Function

end if 

getChildByTagName = Null

End Function

oElem est un l'objet qui est ds ma boucle for

Code :

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

1
2
3
4
5
6
 
For Each oElemEven in olistElemEven
 
objElem = getChildByTagName(oElemEven,"toto")
 
next

**omen999** · 08/06/2007, 11h28

de toute façon il faut oublier la collection children qui est un objet dhtml et non xml

j'essaierais:

Code :

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

1
2
3
4
5
function getChildByTagName(oElem,tagName)
dim oNodeList,oElement
Set oNodeList=oElem.childNodes
For Each oElement In oNodeList
...

**miagomiago** · 08/06/2007, 18h55

meric bcp

ça marche mais j'ai un autre probeleme

comment retourner cet ELement !!

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
for each oElement in oNodeList

if oElement.nodeName = tagName then

getChildByTagName=oElement  Erreur cet objet ne gere pas cette propriété ou cette méthode 
code: 800A1B6


Exit Function

end if 

next

MERCI

**miagomiago** · 11/06/2007, 15h51

est ce que quelqu'un a une idée svp ??
commetn une fonction doit retourner un objet Element !
voici ma fonction:

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
function getChildByTagName(oElem,tagName)
dim oElement,oNodeList

Set oNodeList=oElem.childNodes
for each oElement in oNodeList
if oElement.nodeName = tagName then

getChildByTagName=oElement ' Erreur cet objet ne gere pas cette propriété ou cette méthode code: 800A1B6

Exit Function
end if 
next
getChildByTagName = Null
End Function