ASP3 Sous node xml

Bonjour !

J'ai un fichier xml donc je récupère et j'affiche les nodes. Pour le moment j'afficher tous les node et sous node, mais j'aimerai pourvoir détecter le parent du node, car j'ai des droits d'accès sur les liens, donc je décide si un user a droit ou non de voir un lien, je ne veux donc pas afficher les enfant du lien. Comme dans mon exemple si bas, valid a 1 indique que je peux voir le lien, mais comme le lien 3 je ne peux pas (-1) je ne veux pas faire afficher le lien 3.1 etc. meme s'il sont à 1, car le noeud parent est non valid.

ex.:
<sitemap>
        <item link="accueil" valid="1">
            <item link="lien 1" valid="1" />
            <item link="lien 2" valid="1">
                <item link="lien 2.2" valid="1" />
                <item link="lien 2.3" valid="1" />
             </item>
            <item link="lien 3" valid="-1" >
                <item link="lien 3.1" valid="1">
                    <item link="lien 3.1.1" valid="1" />
                    <item link="lien 3.1.2" valid="1"  />
                </item>
            </item>
        </item>
    </item>

Voici le script que j'ai fait pour le moment... Merci de votre coup de pouce !!!

<%
            qResultat = request.querystring("resultat")
            if qResultat = "" then
                qResultat = -1
            end if
            strFileXml = Server.MapPath("test.xml")

            Set objXML = Server.CreateObject("MSXML2.DOMDocument")

            objXML.load(strFileXml)

            Set objItem = objXML.documentElement.selectSingleNode("item")
            set objXML = nothing
           
            Set objItemChild = objItem.getElementsByTagName("item")
            set objItem = nothing
           
            Dim intobjItemChild
            intobjItemChild = objItemChild.length

            Dim Nom, Url, Id
       
            Dim EndNode
            EndNode = 0
            For i=0 To objItemChild.length -1

                  set node_noeud = objItemChild.item(i)
               
                if node_noeud.attributes.item(2).nodeValue <> "-1" then
                    if node_noeud.attributes.item(4).nodeValue <> qResultat and EndNode > -1 then
                        Response.Write("<td><font face='verdana,sans-serif' size='1'><b>&nbsp;&nbsp;<a STYLE=text-decoration:underline;color:red;' href=index.asp?resultat=" & node_noeud.attributes.item(4).nodeValue & ">" & node_noeud.attributes.item(3).nodeValue & "</a>")
                        if (objItemChild.length -1) = i then
                        else
                            response.write "&nbsp;></font></td>"
                        end if
                       
                    else
                        if EndNode > -1 then
                            Response.Write("<td><font face='verdana,sans-serif' size='1'><b>&nbsp;&nbsp;<a STYLE=text-decoration:underline;color:red;' href=index.asp?resultat=" & node_noeud.attributes.item(4).nodeValue & ">" & node_noeud.attributes.item(3).nodeValue & "</a>")
                            EndNode = -1
                        end if
                    end if 
                end if
               
                set node_noeud = nothing
               
              next

            %>

Pour le xml j'en en fait 4 attribut ex.:

<sitemap>
        <item type="link" id="16124" valid="1" text="Accueil" link="test.asp"/>
            <item type="link" id="16265" valid="1" text="lien1" link="test1.asp"/>
            <item type="link" id="66166" valid="1" text="lien2" link="test2.asp"/>
                <item type="link" id="16267" valid="1" text="lien2.1" link="test2.1.asp"/>
                <item type="link" id="86168" valid="1" text="lien2.2" link="test2.2.asp"/>
             </item>
            <item type="link" id="66139" valid="-1" text="lien3" link="test3.asp"/>
                <item type="link" id="26150" valid="1" text="lien3.1" link="test3.1.asp"/>
                    <item type="link" id="56611" valid="1" text="lien3.1.1" link="test3.1.1.asp"/>
                    <item type="link" id="461682" valid="1" text="lien3.1.2" link="test3.1.2.asp"/>
                </item>
            </item>
        </item>
    </item>

 

</sitemap>

(sa serai plus simple si on pourrait editer ici )

 

Salut,
C'est pour ce genre de traitement que les fonctions récursives sont utiles.
Tu devrais créer une fonction AfficherNode qui prend en paramètre un node, et dedans tu fais :

1. Tu test si le lien correspondant à ce node doit être visible. Si oui, tu passes au 2, si non, Exit Sub.
2. Tu affiches le HTML du lien.
3. Tu fais une boucle sur tonNode.getElementByTagName("item").
4. Dans cette boucle tu rappelles ta propre fonction AfficherNode en passant le sous-item.

Ainsi, si un élément parent n'est pas visible, la fonction ne sera jamais appellée pour les sous-items et donc ils ne seront jamais affichés.
Après, dans ton code tu as juste à faire AfficherNode(objItem) et c'est tout.

A++

---

Nurgle (Antoine) - MSP