LER ARQUIVO XML
bom dia pessoal estou precisando da ajuda de voces.
é o seguinte, como pode verificar no ex em anexo to lendo uma rotina para ler os dados do xml
sendo o que acontece:
ele nao esta lendo os campos <saida> esta sempre repetindo um
neste arquivo o era para mostrar o seguinte:
<icmsCstSaida>000</icmsCstSaida>
<icmsCstSaida>000</icmsCstSaida>
<icmsCstSaida>060</icmsCstSaida>
<icmsCstSaida>060</icmsCstSaida>
ou seja era para mostra dois 000 e dois 060
sendo que nao ta mostrando, pode ser que eu esteja fazendo algo de errado ou exista uma maneira mas facil de fazer isso.
estou do desespero.
obrigado a todos
é o seguinte, como pode verificar no ex em anexo to lendo uma rotina para ler os dados do xml
sendo o que acontece:
ele nao esta lendo os campos <saida> esta sempre repetindo um
neste arquivo o era para mostrar o seguinte:
<icmsCstSaida>000</icmsCstSaida>
<icmsCstSaida>000</icmsCstSaida>
<icmsCstSaida>060</icmsCstSaida>
<icmsCstSaida>060</icmsCstSaida>
ou seja era para mostra dois 000 e dois 060
sendo que nao ta mostrando, pode ser que eu esteja fazendo algo de errado ou exista uma maneira mas facil de fazer isso.
estou do desespero.
obrigado a todos
Você está tentando ler o XML manualmente, tratando como um simples arquivo de texto, você vai ter muitos problemas se ele vier um pouquinho diferente do que você espera.
Você deveria usar algum componente para isso, por exemplo o MSXML, você vai achar ele nas referências como [Ô]Microsoft XML[Ô], qualquer versão deve servir, sendo que as versões mais antigas é mais comum ter instalado em todos os PCs
Por exemplo, fazendo referencia ao [Ô]Microsoft XML, version 2.0[Ô], para pegar todos os valores do icmsCstSaida e jogar para um listbox seria assim
Como resultador você teria no List1 os valores
00
00
60
60
Você deveria usar algum componente para isso, por exemplo o MSXML, você vai achar ele nas referências como [Ô]Microsoft XML[Ô], qualquer versão deve servir, sendo que as versões mais antigas é mais comum ter instalado em todos os PCs
Por exemplo, fazendo referencia ao [Ô]Microsoft XML, version 2.0[Ô], para pegar todos os valores do icmsCstSaida e jogar para um listbox seria assim
Dim xmlDoc As New DOMDocument
xmlDoc.Load [Ô]C:\Documents and Settings\Administrador\Desktop\consultafigurafiscal.xml[Ô]
Dim nodes As IXMLDOMNodeList
Set nodes = xmlDoc.selectNodes([Ô]/tributacoes/segmento/saida/icmsCstSaida[Ô])
Dim node As IXMLDOMNode
For Each node In nodes
List1.AddItem node.Text
NextComo resultador você teria no List1 os valores
00
00
60
60
MAS EU PRECISAVA PEGAR TUDO JUNTO POR EX:
<ncm>0403.90.00</ncm>
<ncm_ex>01</ncm_ex>
<idSegmento>415</idSegmento>
<nomeSegmento>Bebida lactea</nomeSegmento>
<descricaoNcm>(Tributado) Outros Leitelho, leite e creme de leite coalhados, iogurte, quefir e outros leites e cremes de leite fermentados ou acidificados, mesmo concentrados ou adicionados de açúcar ou de outros edulcorantes, ou aromatizados ou adicionados de frutas o</descricaoNcm>
<tipoProduto>sem ean</tipoProduto>
<observacao> </observacao>
<dtCadastro>13/03/2013 12:27</dtCadastro>
<dtUltimaAtualizacao>17/10/2013 10:42</dtUltimaAtualizacao>
</detalhes>
<saida>
<icmsSaida>19.00</icmsSaida>
<icmsSituacao>Tributado</icmsSituacao>
<icmsCstSaida>000</icmsCstSaida>
<icmsLeiSaida>Lei 2.657, Artigo 14, Inciso I</icmsLeiSaida>
<icmsLeiLinkSaida>http://www.fazenda.rj.gov.br/portal/index.portal?_nfpb=true&_pageLabel=tributaria&file=/legislacao/tributaria/basica/lei2657.shtml#capitulo_III</icmsLeiLinkSaida>
<ipi>0.00</ipi>
<federal>
<piscofinsSituacao>AlÃquota Zero</piscofinsSituacao>
<piscofinsCstEntrada>73</piscofinsCstEntrada>
<piscofinsCstSaida>06</piscofinsCstSaida>
<pisEntrada>0.000</pisEntrada>
<cofinsEntrada>0.000</cofinsEntrada>
<pisSaida>0.000</pisSaida>
<cofinsSaida>0.000</cofinsSaida>
<piscofinsLei>ART. 1º, INCISO XI LEI 10.925/04</piscofinsLei>
<piscofinsLeiLink>http://www.receita.fazenda.gov.br/legislacao/leis/2004/lei10925.htm</piscofinsLeiLink>
<piscofinsNatRec>110</piscofinsNatRec>
</federal>
<ncm>0403.90.00</ncm>
<ncm_ex>01</ncm_ex>
<idSegmento>415</idSegmento>
<nomeSegmento>Bebida lactea</nomeSegmento>
<descricaoNcm>(Tributado) Outros Leitelho, leite e creme de leite coalhados, iogurte, quefir e outros leites e cremes de leite fermentados ou acidificados, mesmo concentrados ou adicionados de açúcar ou de outros edulcorantes, ou aromatizados ou adicionados de frutas o</descricaoNcm>
<tipoProduto>sem ean</tipoProduto>
<observacao> </observacao>
<dtCadastro>13/03/2013 12:27</dtCadastro>
<dtUltimaAtualizacao>17/10/2013 10:42</dtUltimaAtualizacao>
</detalhes>
<saida>
<icmsSaida>19.00</icmsSaida>
<icmsSituacao>Tributado</icmsSituacao>
<icmsCstSaida>000</icmsCstSaida>
<icmsLeiSaida>Lei 2.657, Artigo 14, Inciso I</icmsLeiSaida>
<icmsLeiLinkSaida>http://www.fazenda.rj.gov.br/portal/index.portal?_nfpb=true&_pageLabel=tributaria&file=/legislacao/tributaria/basica/lei2657.shtml#capitulo_III</icmsLeiLinkSaida>
<ipi>0.00</ipi>
<federal>
<piscofinsSituacao>AlÃquota Zero</piscofinsSituacao>
<piscofinsCstEntrada>73</piscofinsCstEntrada>
<piscofinsCstSaida>06</piscofinsCstSaida>
<pisEntrada>0.000</pisEntrada>
<cofinsEntrada>0.000</cofinsEntrada>
<pisSaida>0.000</pisSaida>
<cofinsSaida>0.000</cofinsSaida>
<piscofinsLei>ART. 1º, INCISO XI LEI 10.925/04</piscofinsLei>
<piscofinsLeiLink>http://www.receita.fazenda.gov.br/legislacao/leis/2004/lei10925.htm</piscofinsLeiLink>
<piscofinsNatRec>110</piscofinsNatRec>
</federal>
Tópico encerrado , respostas não são mais permitidas