Nenhuma resposta neste tópico

[cybermix]

no tuto passado ensinei a criar um xml e adicionar dados a ele atraves do asp

agora mostrarei como ler um xml, continuando o tutorial passado

vamos criar o objeto e carregar o xml

set objXml = Server.CreateObject("Microsoft.XMLDOM")
objXml.async = false
objXml.load(server.MapPath("and.xml"))

depois disso vamos carregar o node principal e contar quantos elementos há nesse xml

set rootElement  = objXml.documentElement
intQtdElementos = rootElement.childNodes.length

criando o formulario

<form name="form1">
<select name="Estados" ID="Select1">

agora faremos um laco de repeticao para exibirmos os dados, lembrando que o xml conta a partir de 0

for i = 0 to intQtdElementos-1

exibimos os dados lembrando que o rootElement é o <estados> sendo assim childNomes serao os <estado> e o atributo 0 é o sigla="ms" e o atributo 1 nome="mato grosso do sul"

<%=rootElement.childNodes(i).attributes(0).text%>
<%=rootElement.childNodes(i).attributes(1).text%>

fechamos o laco de repeticao

next

e ai vai todo o codigo

<%
dim objXml
dim rootElement 
dim intQtdElementos

set objXml = Server.CreateObject("Microsoft.XMLDOM")

objXml.async = false

objXml.load(server.MapPath("and.xml"))

set rootElement  = objXml.documentElement

intQtdElementos = rootElement.childNodes.length
%>
<form name="form1">
<select name="Estados" ID="Select1">
	<%
	for i = 0 to intQtdElementos-1
	%>
	<option value="<%=rootElement.childNodes(i).attributes(0).text%>"><%=rootElement.childNodes(i).attributes(1).text%></option>
	<%
	next
	%>
</select>
</form>

-----------------------------------------------------------------------------------------------
Para uma maior organização desta seção, todas as duvidas relacionadas a este tutorial devem ser tiradas na seguinte sala:
http://forum.wmonlin...p?showforum=113