vb.net XmlDocument.SelectSingleNode und XMLNamespace Ausgabe

Question

Ich versuche, diesen Code zum Laufen zu bringen, aber irgendwie nicht bekommen den Inhalt

My-Code

Dim m_xmld As XmlDocument 
    Dim m_nodelist As XmlNodeList 
    Dim m_node As XmlNode 
    'Create the XML Document 
    m_xmld = New XmlDocument() 
    'Load the Xml file 
    m_xmld.Load("http://feeds.thescore.com/nfl.rss") 
    'Get the list of name nodes 
    m_nodelist = m_xmld.SelectNodes("/rss/channel/item") 

    Dim content As XmlNamespaceManager = New XmlNamespaceManager(m_xmld.NameTable) 
    content.AddNamespace("content", "http://schemas.xmlsoap.org/soap/envelope/") 

    'Loop through the nodes 
    For Each m_node In m_nodelist 
     If Not m_node.SelectSingleNode("content:encoded",content) Is Nothing AndAlso Len(m_node.SelectSingleNode("content:encoded",content).InnerText) > 0 Then 
      response.Write(m_node.SelectSingleNode("content:encoded",content)) 
      response.Flush() 
     end if 

    Next 

Kann mir bitte jemand helfen?

Answer 1

Ich tat es auf diese Weise und konnte alle Inhaltsknoten sehen, die scheinen, HTML zu sein.

Imports <xmlns:atom="http://www.w3.org/2005/Atom"> 
Imports <xmlns:content="http://purl.org/rss/1.0/modules/content/"> 
Imports <xmlns:dc="http://purl.org/dc/elements/1.1/"> 
Imports <xmlns:georss="http://www.georss.org/georss"> 
Imports <xmlns:media="http://search.yahoo.com/mrss/"> 

Public Class Form1 

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
     Dim xe As XElement = XElement.Load("http://feeds.thescore.com/nfl.rss") 

     Dim ie As IEnumerable(Of XElement) = xe...<content:encoded> 

     For Each c As XElement In ie 
      Debug.WriteLine(c.Value) 
     Next 
    End Sub 


End Class 

Answer 2

konnte ich mit anderen Ansatz importieren ich zuerst die Daten mit Webclient ersetzt die mit und arbeitete wie ein Charme