Ayuda, gracias , es xml en vb

Hola NNTP.

En ASP, más o menos sería algo así:

<%
'Declaras las variables:
Dim xml1, root1, nodo1, nuevonodo1, atributo1
'Instancias un objeto "XMLDom":
Set xml1 = Server.CreateObject("Microsoft.XMLDom")
'Estableces una carga sincronizada y sin validar:
xml1.async = False
xml1.validateOnParse = False
'Cargas los datos XML desde un archivo:
'xml1.load("archivo.xml")
'...o bien mediante una cadena:
xml1.loadXML("<principal><datos></datos></principal>")
'Estableces el nodo raíz (en tu caso "principal")
Set root1 = xml1.documentElement
'Estableces el nodo ("datos") al que vas agregar el nuevo nodo:
Set nodo1 = root1.selectSingleNode("datos")
'Estableces el nuevo nodo a crear:
Set nuevonodo1 = xml1.createElement("info")
'Agregas el nuevo nodo:
nodo1.appendChild(nuevonodo1)
'Cargas el texto que contendrá el nuevo nodo:
nuevonodo1.text = "Texto nuevo nodo"
'Creas y estableces el atributo "name":
Set atributo1 = xml1.createAttribute("name")
'Lo añades al nuevo nodo creado
nuevonodo1.attributes.setNamedItem atributo1
'Estableces el valor del atributo a "3":
nuevonodo1.setAttribute "name", 3
'Guardas el resultado como archivo:
'xml1.save("nuevo.xml")
'...o bien lo envias al navegador:
Response.Write xml1.xml
'Y destruyes el objeto XMLDom:
Set xml1 = Nothing
%>

+info:
http://msdn.microsoft.com/library/e...mlprod.asp


Saludos!
Miguel


NNTP escribió:

Si tengo esta estructura:

<principal>
<datos>
<info name="1">Nombre</info>
<info name="2">Email</info>
</datos>
</principal>


Que codigo XML en VB o ASP puedo usar para una vez esa estructura en un
archivo poder añadir un nuevo nodo para que quede asi:

<principal>
<datos>
<info name="1">Nombre</info>
<info name="2">Email</info>
<info name="3">NUEVO NODO</info>
</datos>
</principal>

Gracias, ya lo solucione despues de 8 horas con ese problema, no es
exactamente asi, pero supongo q tambien funcionaria.


"Miguel Gonzalez" escribió en el mensaje
news:

Hola NNTP.

En ASP, más o menos sería algo así:

<%
'Declaras las variables:
Dim xml1, root1, nodo1, nuevonodo1, atributo1
'Instancias un objeto "XMLDom":
Set xml1 = Server.CreateObject("Microsoft.XMLDom")
'Estableces una carga sincronizada y sin validar:
xml1.async = False
xml1.validateOnParse = False
'Cargas los datos XML desde un archivo:
'xml1.load("archivo.xml")
'...o bien mediante una cadena:
xml1.loadXML("<principal><datos></datos></principal>")
'Estableces el nodo raíz (en tu caso "principal")
Set root1 = xml1.documentElement
'Estableces el nodo ("datos") al que vas agregar el nuevo nodo:
Set nodo1 = root1.selectSingleNode("datos")
'Estableces el nuevo nodo a crear:
Set nuevonodo1 = xml1.createElement("info")
'Agregas el nuevo nodo:
nodo1.appendChild(nuevonodo1)
'Cargas el texto que contendrá el nuevo nodo:
nuevonodo1.text = "Texto nuevo nodo"
'Creas y estableces el atributo "name":
Set atributo1 = xml1.createAttribute("name")
'Lo añades al nuevo nodo creado
nuevonodo1.attributes.setNamedItem atributo1
'Estableces el valor del atributo a "3":
nuevonodo1.setAttribute "name", 3
'Guardas el resultado como archivo:
'xml1.save("nuevo.xml")
'...o bien lo envias al navegador:
Response.Write xml1.xml
'Y destruyes el objeto XMLDom:
Set xml1 = Nothing
%>

+info:
http://msdn.microsoft.com/library/e...mlprod.asp


Saludos!
Miguel


NNTP escribió:

Si tengo esta estructura:

<principal>
<datos>
<info name="1">Nombre</info>
<info name="2">Email</info>
</datos>
</principal>


Que codigo XML en VB o ASP puedo usar para una vez esa estructura en un
archivo poder añadir un nuevo nodo para que quede asi:

<principal>
<datos>
<info name="1">Nombre</info>
<info name="2">Email</info>
<info name="3">NUEVO NODO</info>
</datos>
</principal>