Generar archivo xml con visual basic 6

Question

Necesito generar un archivo xml desde visual 6, ya casi lo tengo pero al momento de generar un nodo hijo con el mismo nombre que el anterion lo lo hace y necesito ke se llamen igual, esto es lo ke necesito:

<titulo>

  <name>

  <s> </s>

  </name>

  <name>

  <s> </s>

  </name>

</titulo>

y esto es lo ke me deja el save

<titulo>

  <name>

  <s> </s>

  </name>

  

   </s>

  </name>

</titulo>

ayuda ya me desespere!!!!!!!!!!!!

Answer 1

Hola Anilu70,
Podrías probar con éste código que te envío.

VB6

Private Sub CrearXML_Click(Ruta As String, NombreArchivo As String)
    Dim MiXML As String
    MiXML = "<titulo><nombre>Nombre1</nombre><nombre>Nombre2</nombre></titulo>"

    Open Ruta & "\" & NombreArchivo & ".xml" For Output As #1
        Print #1, MiXML
    Close #1
End Sub

No olvides agregarle la cabecera al archivo XML, no es necesario pero es recomendable (<?xml version="1.0" encoding="UTF-8" ?>).

Saludos.

-
Esteban Murchio.

Si éste post te ha ayudado, por favor, márcalo como respuesta para que pueda ayudar a otros.