[ASP/XMLDOM] object word niet gevonden

[Verwijderd]

Ik heb ooit eens een TVGuide gemaakt die input van TVGids_to_xml gebruikt (XML file). Deze werkte altijd tadeloos, nu is dat programmaatje wat aangepast en haalt nu meer nodes op, dus dacht ik mijn TVGuide wat uit te breiden met deze leuke features (herhaling, kijkwijzer handel etc)

Qua structuur lijkt er ogenschijnlijk niets veranderd in de XML, alleen extra nodes.

Toch komt m'n script terug met de error:

code:

Object required: '[object]'

stuk van mijn script:

code:

      <tr>
         <td class="time"><%=thedate%></td>
         <td class="program"><%= item.SelectSingleNode("title").text %></td>
      </tr>
     <% if  item.SelectSingleNode("desc").text <> "" then %>
      <tr>
         <td class="btop">&nbsp;</td>
         <td class="descr">
           <% if item.SelectSingleNode("episode-num").text <> "" then%>
          <span class="episode"> Episode:  <%= item.SelectSingleNode("episode-num").text %></span><br />
          <% end if %>
         <%=item.SelectSingleNode("desc").text %></td>
      </tr>
      <% 
      end if 
    end if
 end if

hij gaat omzeep op :

code:

item.SelectSingleNode("desc").text

terwijl die node wel bestaat.
als ik ze uit-comment doet ie het wel (= zonder de "desc" en de "episode-num" nodes.)

de XML file staat hier
bijvoorbeeld alleen de channels doet ie prima.
zie de "live" error hier

any ideas ?

[ Voor 21% gewijzigd door Verwijderd op 05-01-2005 16:12 ]

[Jaspertje]

Misschien eromheen

if item.SelectNodes("desc").length > 0 then

end if

als je ipv text Nodename uitleest, doet ie t dan wel?

[ Voor 35% gewijzigd door Jaspertje op 05-01-2005 17:09 ]

[Verwijderd]

Jaspertje schreef op woensdag 05 januari 2005 @ 17:08:
Misschien eromheen

if item.SelectNodes("desc").length > 0 then

end if

dit werkt idd, thanx. Blijf het vreemd vinden; desc bestaat altijd. Ik kwam bij de volgende node aan: episode-num, die bestaat niet altijd, dus ik moet hem testen, dit doe ik nu dmv:

code:

Function nodeExists(node)
err.clear 

On Error Resume Next

test = node.NodeType 

    If err = 0 then 
        nodeExists = true 
    else 
        nodeExists = false 
    End if 
    
End Function

code:

<% if nodeExists(item.SelectSingleNode("episode-num")) then%>

dit functioneert prima, maar ik vraag me af of je een nodetest niet anders/mooier/netter kan uitvoeren.

[ Voor 8% gewijzigd door Verwijderd op 05-01-2005 17:58 ]

[mulder]

code:

Dim node
  Set node = item.SelectSingleNode("episode-num")
  If (node Is Nothing) Then
    ..

[Verwijderd]

Don Facundo schreef op woensdag 05 januari 2005 @ 18:51:

code:

Dim node
  Set node = item.SelectSingleNode("episode-num")
  If (node Is Nothing) Then
    ..

Ik test hem andersom.

Maakt niet uit, hij doet het nu, geheel compleet met kijkwijzer, teletekst en 16:9 icons

check it out

[mulder]

Je wilde toch anders/mooier/netter?

code:

Public Function nodeExists(node)
  nodeExists = (Not node Is Nothing)
End Function

[Verwijderd]

Don Facundo schreef op woensdag 05 januari 2005 @ 20:49:
Je wilde toch anders/mooier/netter?

code:

Public Function nodeExists(node)
  nodeExists = (Not node Is Nothing)
End Function

Werkt idd goed, sterker nog, hij parsed hem stukken sneller!