Console.WriteLine("Hello World") Dim doc As New XmlDocument()
doc.LoadXml("<?xml version='1.0' encoding='UTF-8'?><facture><prm>30002320134407</prm><tso>erdf</tso><tso_identification>30002320134407</tso_identification><type_contract>cu</type_contract><LpInvoiceId>7836</LpInvoiceId><LpXmlInvoiceId>133</LpXmlInvoiceId><debut>2016-06-01</debut><fin>2016-06-30</fin><type_document>facture</type_document><tva_intracommunautaire>FR54493254908</tva_intracommunautaire><adresse_facturation><intitule>Smurfit Kappa France La Fran</intitule><contact/><adresse>BP 16</adresse><complement/><code_postal>33660</code_postal><ville>SAINT SEURIN SUR LapoISLE</ville><pays>France</pays></adresse_facturation><adresse_livraison><intitule>Smurfit Kappa France La Fran</intitule><contact/><adresse>LE SAULA N</adresse><complement/><code_postal>82130</code_postal><ville>LA FRAN</ville><pays>France</pays></adresse_livraison><avec_conso>oui</avec_conso><montant_total>757.99</montant_total><conso_mesuree/><conso_facturee/><mode_paiement>prelevement</mode_paiement><terme_paiement>30</terme_paiement><nomenclature_deb>27 16 00 00</nomenclature_deb><code_client_sage>SMURFITLAFRAN4407</code_client_sage><ref_nom_site>TODO</ref_nom_site><ref_telephone>0389383400</ref_telephone><ref_email>vattenfall@vattenfall.fr</ref_email><maj_fiche_tiers>oui</maj_fiche_tiers><centralisation_bl>non</centralisation_bl><article><reference>ELEC_CU000</reference><designation>Consommation: Prix unique (du 01/06/2016 au 30/06/2016)</designation><prix>42.41</prix><quantite>7.652</quantite></article><article><reference>TR_CU000</reference><designation>Transport (TURPE)</designation><prix>206.02</prix><quantite>1</quantite></article><article><reference>TX_CTA000</reference><designation>CTA (taux à 0.2704)</designation><prix>0.2704</prix><quantite>109.98</quantite></article><article><reference>TC_FRAIS_RE000</reference><designation>Frais RE</designation><prix>0.15</prix><quantite>7.652</quantite></article><article><reference>TX_CSPE000</reference><designation>CSPE: 22.5 €/MWh</designation><prix>22.5</prix><quantite>7.652</quantite></article><article><reference>TX_TDCFE000</reference><designation>TDCFE (82) 0.25 x 4.25</designation><prix>1.0625</prix><quantite>7.652</quantite><code_dpt>82</code_dpt></article><article><reference>TX_TCCFE000</reference><designation>TCCFE (82087) 0.25 x 8.5</designation><prix>2.125</prix><quantite>7.652</quantite><code_insee>82087</code_insee></article><annexe><reference_comptage><titre>Référence de comptage</titre><label_client>LA FRANÇAISE</label_client><tarif>HTA5</tarif><reference>30002320134407</reference><distributeur>ERDF</distributeur><numero_urgence>0811010211</numero_urgence></reference_comptage><mesures><titre>Référence de comptage</titre><debut>01/06/2016</debut><fin>30/06/2016</fin><statut_debut/><statut_fin/><mesure><poste>HCE</poste><nom>energieActive</nom><intitule>Énergie active</intitule><valeur>956</valeur><unite>kWh</unite></mesure><mesure><poste>HPE</poste><nom>energieActive</nom><intitule>Énergie active</intitule><valeur>6696</valeur><unite>kWh</unite></mesure><mesure><poste>HCE</poste><nom>energieReactive</nom><intitule>Énergie réactive</intitule><valeur>414</valeur><unite>kVArh</unite></mesure><mesure><poste>HPE</poste><nom>energieReactive</nom><intitule>Énergie réactive</intitule><valeur>3942</valeur><unite>kVArh</unite></mesure><mesure><poste>HCE</poste><nom>puissanceAtteinte</nom><intitule>Puissance atteinte</intitule><valeur>20</valeur><unite>kW</unite></mesure><mesure><poste>HPE</poste><nom>puissanceAtteinte</nom><intitule>Puissance atteinte</intitule><valeur>47</valeur><unite>kW</unite></mesure><mesure><poste>HCE</poste><nom>puissanceSouscrite</nom><intitule>Puissance souscrite</intitule><valeur>82</valeur><unite>kW</unite></mesure><mesure><poste>HPE</poste><nom>puissanceSouscrite</nom><intitule>Puissance souscrite</intitule><valeur>82</valeur><unite>kW</unite></mesure><mesure><poste>HCH</poste><nom>puissanceSouscrite</nom><intitule>Puissance souscrite</intitule><valeur>82</valeur><unite>kW</unite></mesure><mesure><poste>HPH</poste><nom>puissanceSouscrite</nom><intitule>Puissance souscrite</intitule><valeur>82</valeur><unite>kW</unite></mesure><mesure><poste>P</poste><nom>puissanceSouscrite</nom><intitule>Puissance souscrite</intitule><valeur>82</valeur><unite>kW</unite></mesure></mesures><fourniture><titre>Fourniture dapoÉlectricité</titre><composante_fourniture><nom>Prix unique (du 01/06/2016 au 30/06/2016)</nom><debut>2016-06-01</debut><fin>2016-06-30</fin><conso>7.652</conso><prix>42.41</prix><montant>324.52</montant></composante_fourniture><titre_total>Total fourniture dapoélectricité</titre_total><montant_total>0</montant_total></fourniture><transport><titre>Utilisation du réseau public de distribution *</titre><composante_transport><titre>Composante de gestion</titre><montant>5.67</montant></composante_transport><composante_transport><titre>Composante de comptage</titre><montant>42.19</montant></composante_transport><composante_transport><titre>Composante de soutirage (part fixe)</titre><montant>62.12</montant></composante_transport><composante_transport><titre>Composante de soutirage (part variable)</titre><montant>96.04</montant></composante_transport><titre_total>Total utilisation du réseau public de distribution (TURPE)</titre_total><montant_total>206.02</montant_total></transport><taxes><titre>Taxes et contributions</titre><taxe><titre>CTA</titre><ligne><colonne style='gras'>Assiette</colonne><colonne style='gras'>Taux</colonne><colonne style='gras'>Montant (EUR)</colonne></ligne><ligne><colonne>109.98</colonne><colonne>0.2704</colonne><colonne>29.74</colonne></ligne></taxe><taxe><titre>Frais RE</titre><ligne><colonne style='gras'>Cons. (MWh)</colonne><colonne style='gras'>PU</colonne><colonne style='gras'>Montant (€)</colonne></ligne><ligne><colonne>7.652</colonne><colonne>0.15</colonne><colonne>1.15</colonne></ligne></taxe><taxe><titre>TCFE</titre><ligne><colonne style='gras'>taxe</colonne><colonne style='gras'>Cons.(MWh)</colonne><colonne style='gras'>PU (€/MWh)</colonne><colonne style='gras'>Taux</colonne><colonne style='gras'>Montant (€)</colonne></ligne><ligne><colonne style='gras'>TCCFE</colonne><colonne>7.652</colonne><colonne>0.25</colonne><colonne>8.5</colonne><colonne>16.26</colonne></ligne><ligne><colonne style='gras'>TDCFE</colonne><colonne>7.652</colonne><colonne>0.25</colonne><colonne>4.25</colonne><colonne>8.13</colonne></ligne></taxe><taxe><titre>CSPE</titre><ligne><colonne style='gras'>%</colonne><colonne style='gras'>Cons.(MWh)</colonne><colonne style='gras'>PU (€/MWh)</colonne><colonne style='gras'>Montant (€)</colonne></ligne><ligne><colonne>100</colonne><colonne>7.652</colonne><colonne>22.5</colonne><colonne>172.17</colonne></ligne></taxe><taxe><titre>CEE</titre><ligne><colonne/><colonne style='gras'>Cons.(MWh)</colonne><colonne style='gras'>PU (€/MWh)</colonne><colonne style='gras'>Montant (€)</colonne></ligne></taxe></taxes><pied_de_page>* Montant collecté par Vattenfall et reversé au gestionnaire de réseau selon le tarif TURPE.Origine 2014 de lapoélectricité (mix énergétique français): 82.2% nucléaire, 7.9% hydraulique, etc.</pied_de_page></annexe><releve_tso><reference>erdf_323404276973</reference><montant>206.02</montant><type_releve>cycl</type_releve><LpTsoReportId>9061</LpTsoReportId></releve_tso></facture>") Dim racine As XmlNode = doc.DocumentElement
Dim nsmgr As New XmlNamespaceManager(doc.NameTable)
nsmgr.AddNamespace("", "") Dim node As XmlNode = racine.SelectSingleNode("/facture/prm", nsmgr) Console.WriteLine(node.InnerXml)
Dim taxes As XmlNodeList = racine.SelectNodes("/facture/annexe/taxes/taxe", nsmgr) For Each taxe As XmlNode In taxes
Console.WriteLine("Nouvelle Taxe") Console.WriteLine( taxe.SelectSingleNode("titre").InnerText ) For Each ligne As XmlNode In taxe.SelectNodes("ligne",nsmgr) For Each colonne As XmlNode In ligne.SelectNodes("colonne",nsmgr) Console.WriteLine( colonne.InnerText )
