Problemas ao ler uma XML

[Rendan 0]

Gostaria de ler a xml do estadao para exibir formatado no meu site, porém tenho o segiuinte código que não está funcionando, como identificar os campos da xml e mostrar na aspx dojeito que eu desejar?

 

Segue o codigo:

 

Imports System.XmlPartial Class notaXml	Inherits System.Web.UI.Page	Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load		'Cria-se uma instância da classe XmlTexReader informando o caminho do documento. 		Dim r = New XmlTextReader("http://www.estadao.com.br/rss/ciencias.xml")		'No Loop while usando o método Read percorre todo o documento XML 		Do While r.Read()			'É feita uma verificação se o que está dento do nó é um elemento chamado item e usa-se o método 			'MoveToContent para se mover para dentro do conteúdo do elemento 			If r.Name = "item" Then				r.MoveToContent() = XmlNodeType.Element			End If				'Mostra no browser o valor do elemento usando o método ReadString				Response.Write(r.ReadString() + "<br>")		Loop	End SubEnd Class

http://forum.imasters.com.br/public/style_emoticons/default/natal_sad.gif

[Juliano.net 2]

Tente carregar o XML para dentro de um DataSet (dependendo da estrutura do XML isto será possível e mais fácil).

 

http://msdn2.microsoft.com para mais informações.

[macarlos 0]

http://forum.imasters.com.br/public/style_emoticons/default/ninja.gif

Lá vai:

Partial Class webxml	Inherits System.Web.UI.Page	Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load		CarregaRSS("http://www.estadao.com.br/rss/ciencias.xml")	End Sub	Sub CarregaRSS(ByVal URL As String)		Dim x As New System.Xml.XmlDocument		Dim w As System.Net.WebRequest = System.Net.HttpWebRequest.Create(URL)		Dim v As System.IO.Stream = w.GetResponse().GetResponseStream		x.Load(v)		Dim ITEMS As System.Xml.XmlNodeList = x.SelectNodes("rss/channel/item")		For Each ITEM As System.Xml.XmlNode In ITEMS			Response.Write(ITEM.Item("title").InnerText)			Response.Write("<br />")			Response.Write(ITEM.Item("description").InnerText)			Response.Write("<br />")			Response.Write("<br />")		Next	End SubEnd Class

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif