Hola
Trato de escribir en un documento xml, lo que quisiera saber es como agregar etiquetas de apertura y que contengan atributos, el código es el siguiente:
Open CommonDialog1.FileName For Output As #1
ruta = CommonDialog1.FileName
'Escribimos en el archivo el contenido del Text1
Print #1, Text1
'Cerramos el archivo
Close
'procedo a la declaracion del archivo xml
Dim documento As MSXML2.DOMDocument30
Set documento = New DOMDocument30
Set documento.documentElement = documento.createElement("pulsaciones")
documento.Save (ruta)
Set documento = Nothing
End If
Este código sólo agrega una etiqueta así:
<pulsaciones/>
y quiero crear algo así:
<?xml version ="1.0" encoding = "utf-8" ?>
<Etiquetanombre1 atributo="1" atributo ="2">
<Etiquetanombre2>
<otra etiqueta> </otra etiqueta>
<otra etiqueta> </otra etiqueta>
<otra etiqueta> </otra etiqueta>
</Etiquetanombre2>
</Etiquetanombre1>