Usar XML.

[brunogodoi 0]

Olá,

 

Gostaria de saber como seria o código para exibir o arquivo XML quando o mesmo tem a estrutura abaixo usando o ASP:

 

<?xml version="1.0" encoding="ISO-8859-1" ?><rss version="0.91"><channel><title> Titulo do Rss </title><link> http://blablabla.com.br </link><description>Rss do Bruno </description><language> pt-br </language><copyright> Direitos rservados </copyright><docs> documentos base </docs><webMaster> webmaster@blabla.com.br </webMaster><image><title> Online </title><url> http://teste.gif </url><link> http://blabla.com.br </link><width>88</width><height>31</height><description> rss legal </description></image><item><title>Teste 1</title><link> http://teste1.htm </link><description> teste de mensagem 1</description></item><item><title>Teste 2</title><link> http://teste2.htm </link><description> teste de mensagem 2</description></item>...</channel></rss>

 

Obrigado....

[rOcKLoCo 0]

http://www.google.com.br/search?hl=pt-BR&q...+with+ASP&meta=

 

falows

[explore 3]

ASP [/tr][tr]Module Module1

Sub Main()

Dim xDoc As New XmlDocument

xDoc.Load("teste.xml")

Output(xDoc.DocumentElement)

End Sub

Sub Output(ByVal node As XmlNode)

Console.WriteLine(node.Name)

If (node.HasChildNodes) Then

Dim nList As XmlNodeList = node.ChildNodes

Dim i As Int32

For i = 0 To nList.Count - 1

Console.WriteLine(" {0}", nList(i).Name)

If (nList(i).HasChildNodes) Then

Dim xn As XmlNode

For Each xn In nList(i).ChildNodes

Console.WriteLine(" {0}: {1}", xn.Name, xn.InnerText)

Next

End If

Next

End If

End Sub

End Module

[/tr]

 

Falo!!!!!!

[brunogodoi 0]

Deu erro:

Microsoft VBScript compilation  error '800a0401'Expected end of statement/cdi/teste.asp, line 4Dim xDoc as New XmlDocument---------^

[brunogodoi 0]

E ai, alguem pode me ajudar...

[explore 3]

Da uma olha neste!!!

 

ASP [/tr][tr]<%

set xmlDoc = server.createObject("MSXML2.DOMDocument")

xmlDoc.async = false

xmlDoc.load(server.mappath("teste.xml"))

response.write "<xmp>" & xmlDoc.xml & "</xmp>"

%>

[/tr]

 

Descarta o codigo de cima!!!!!!