Leer un XML CFD con VB6 o C#

La factura esta basada en XML, independiente del lenguaje de programacion todos debemos saber acerca de esta tecnologia
[[ FORO CERRADO DEBIDO A QUE YA LA INFORMACION YA NO ES VIGENTE ]]
smartstore
Mensajes: 33
Registrado: Jue Ene 24, 2013 3:12 pm

Leer un XML CFD con VB6 o C#

Mensajepor smartstore » Mar Jul 02, 2013 1:38 pm

Hola buenas tardes,

alguien tiene un ejemplo del codigo en visual basic 6 para leer un XML (Factura timbrada) que genero el CFDLib.dll

Muchas gracias.

Edcoram
Mensajes: 205
Registrado: Sab Nov 03, 2012 12:48 pm

Re: Leer un XML CFD con VB6 o C#

Mensajepor Edcoram » Mar Jul 02, 2013 2:07 pm


smartstore
Mensajes: 33
Registrado: Jue Ene 24, 2013 3:12 pm

Re: Leer un XML CFD con VB6 o C#

Mensajepor smartstore » Mar Jul 02, 2013 3:02 pm

Gracias. Aporto este codigo por si les sirve en C#

Hice este codigo en C# y si sirve

myfile es la ruta donde esta el xml a leer.


Código: Seleccionar todo

void uuid_get(string myfile)
        {
            string uuid = "";
            string folio = "";
            string rfc = "";
            string rfc_cliente = "";
            XmlReader reader = XmlReader.Create(myfile)  ;
            {
                while (reader.Read())
                {
                    if (reader.IsStartElement())   // checa si hay algo que leer.
                    {
                        // obtiene el nombre de cada elemento
                        switch (reader.Name)
                        {

                            case "cfdi:Comprobante":
                                folio = reader["folio"];                               
                                break;

                               
                            case "cfdi:Emisor":
                                rfc = reader["rfc"];
                                break;

                            case "cfdi:Receptor":
                                rfc_cliente = reader["rfc"];
                                break;

                            case "tfd:TimbreFiscalDigital":
                                // Detect this element.
                                uuid = reader["UUID"];
                                break;
                           
                        }

                    }
                }
                db_grabar(folio,uuid,rfc,rfc_cliente,reader.Depth.ToString()); //Esta rutina depende de cada quien es para implementarla para grabar a la base de datos
            }
        }

cie67
Mensajes: 5
Registrado: Jue Dic 01, 2016 3:25 pm

Re: Leer un XML CFD con VB6 o C#

Mensajepor cie67 » Mié Dic 21, 2016 4:04 pm

El codigo en C# esta genial, muchas gracias. lo converti a Vb. net 2015 por si a alguien le sirve.
funciona al 100.

muchas gracias!!!

Código: Seleccionar todo

    Private Sub uuid_get(myfile As String)
        Dim uuid As String = ""
        Dim folio As String = ""
        Dim rfc As String = ""
        Dim rfc_cliente As String = ""
        Dim reader As XmlReader = XmlReader.Create(myfile)
        If True Then
            While reader.Read()
                If reader.IsStartElement() Then
                    ' checa si hay algo que leer.
                    ' obtiene el nombre de cada elemento
                    Select Case reader.Name

                        Case "cfdi:Comprobante"
                            folio = reader("folio")
                            Exit Select


                        Case "cfdi:Emisor"
                            rfc = reader("rfc")
                            Exit Select

                        Case "cfdi:Receptor"
                            rfc_cliente = reader("rfc")
                            Exit Select

                        Case "tfd:TimbreFiscalDigital"
                            ' Detect this element.
                            uuid = reader("UUID")
                            Exit Select


                    End Select
                End If
            End While
            '    db_grabar(folio, uuid, rfc, rfc_cliente, reader.Depth.ToString())
            'Esta rutina depende de cada quien es para implementarla para grabar a la base de datos
        End If
    End Sub


Volver a “XML”

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 4 invitados