none
PROBLEMAS CON ![CDATA]] SECTION en xml RRS feed

  • Pregunta

  • Buen día a todos:

     Tengo un archivo donde guardo los datos creados en XML , lo que deseo hacer, es como poner entre una etiqueta CDATA que a la vez estén dentro un ELEMENTO llamado  <comprobante>, atributos , luego elementos y así sucesivamente , como lo muestro el codigo:

    No se como manejar-lo, lo intente  pero me extrae toda la cadena del CDATA mas no hace lo que requiero.

    Esperando su amble  ayuda me  despido.

      Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click

            Dim doc As New XmlDocument()
            Dim autorizacion As XmlElement = doc.CreateElement("autorizacion")
            Dim estado As XmlElement = doc.CreateElement("estado")
            estado.InnerText = TextBox1.Text
            Dim numautorizacion As XmlElement = doc.CreateElement("numeroAutorizacion")
            numautorizacion.InnerText = TextBox2.Text
            Dim fechautorizacion As XmlElement = doc.CreateElement("fechaAutorizacion")
            fechautorizacion.InnerText = TextBox3.Text
            Dim ambiente As XmlElement = doc.CreateElement("ambiente")
            ambiente.InnerText = TextBox4.Text
            Dim comprobante As XmlElement = doc.CreateElement("comprobante")
            Dim infoTributaria As XmlElement = doc.CreateElement("infoTributaria")
            Dim ambiente_ As XmlElement = doc.CreateElement("ambiente")
            ambiente_.InnerText = TextBox5.Text
            Dim CData As XmlCDataSection = doc.CreateCDataSection(autorizacion.ToString())

            autorizacion.AppendChild(estado)
            autorizacion.AppendChild(numautorizacion)
            autorizacion.AppendChild(fechautorizacion)
            autorizacion.AppendChild(ambiente)
            comprobante.AppendChild(CData)
            autorizacion.AppendChild(comprobante)
            comprobante.AppendChild(infoTributaria)

            doc.AppendChild(autorizacion)
            infoTributaria.AppendChild(ambiente_)

            'Dim factura As XmlElement = doc.DocumentElement
            'factura.SetAttribute("id", "comprobante")
            ''autorizacion.AppendChild(CData)

            doc.Save("C:\eejemplos-xml\WindowsApplication1\ad.xml")
        End Sub

    Lo que necesito que salga:

        

    <<?xml version="1.0" encoding="UTF-8"?>
    <autorizacion>
        <estado>AUTORIZADO</estado>
        <numeroAutorizacion>30042018011470013235001211120001034301133092210</numeroAutorizacion>
        <fechaAutorizacion>2019-04-30T19:41:29-05:00</fechaAutorizacion>
        <ambiente>PRODUCCIÓN</ambiente>
        <comprobante><![CDATA[<factura id="comprobante" version="1.1.0">
      <infoTributaria>
        <ambiente>2</ambiente>
    --
      </infoTributaria>

    --

    --

    --

    </factura>]]></comprobante>

    </autorizacion>

    sábado, 9 de noviembre de 2019 14:28