Ver Mensaje Individual
  #289 (permalink)  
Antiguo 07/12/2010, 00:50
wwwmaster
 
Fecha de Ingreso: noviembre-2002
Ubicación: DF
Mensajes: 1.056
Antigüedad: 21 años, 11 meses
Puntos: 37
Respuesta: Factura electroncia sat mexico

Si, el XML se genera desde cero, con xml document, el codigo me quedo algo incomodo, aun no lo optimizo, asi:

Dim Doc As System.Xml.XmlDocument
Dim version As System.Xml.XmlDeclaration
version = Doc.CreateXmlDeclaration("1.0", "utf-8", "")
version.Encoding = "utf-8"
Doc.PreserveWhitespace = True
Doc.AppendChild(version)

Me.xmlns = "http://www.sat.gob.mx/cfd/2"
NdCom = Doc.CreateNode(XmlNodeType.Element, "Comprobante", Me.xmlns)

Dim NdReceptor As XmlNode
NdReceptor = Doc.CreateNode(XmlNodeType.Element, "Receptor", Me.xmlns)


Dim atributoRECEP1 As XmlAttribute = Doc.CreateAttribute("rfc") : atributoRECEP1.Value = Receptor.rfc
Dim atributoRECEP2 As XmlAttribute = Doc.CreateAttribute("nombre") : atributoRECEP2.Value = Receptor.nombre

NdReceptor.Attributes.Append(atributoRECEP1)
NdReceptor.Attributes.Append(atributoRECEP2)

etc, etc.