MANIFESTA?ÃO DO DESTINAT?RIO ELETRÔNICO
consegui fazer o pedido de Notas Fiscais destinadas . Utilizando o certificado digital.
daêh ja recebi o Retorno da Sefaz. com todas as NFe que foram solicitadas. na Consulta NSU. [Ô]00000000000001[Ô]
abaixo no print estao todas os XML no qual irei alimentar meu Datagrid.
em cada XML as tags são as seguinte
- <resNFe xmlns:xsd=[Ô]http://www.w3.org/2001/XMLSchema[Ô] xmlns:xsi=[Ô]http://www.w3.org/2001/XMLSchema-instance[Ô] versao=[Ô]1.00[Ô] xmlns=[Ô]http://www.portalfiscal.inf.br/nfe[Ô]>
<chNFe>25160541221516000143550010007783271112395017</chNFe>
<CNPJ>41221516000143</CNPJ>
<xNome>Laticinio Belo Vale Ltda.</xNome>
<IE>161003095</IE>
<dhEmi>2016-05-31T00:00:00-03:00</dhEmi>
<tpNF>1</tpNF>
<vNF>340.37</vNF>
<digVal>sdXbJWYJPESL2Drros/cJ16Pa7g=</digVal>
<dhRecbto>2016-05-31T17:38:41-03:00</dhRecbto>
<nProt>325160008760865</nProt>
<cSitNFe>1</cSitNFe>
</resNFe> Daêh galera eu preciso pegar de todos os XMl que estao nessa baixa que estarei anexando.no Anexo . são varios XML.
as tags que quero pegar e alimentar meu Grid são
*chNFe
*CNPJ
*xNome
*vNF
*nProt
-----Galera daêh minha duvida que nao sei como começar. é o seguinte. como pegar todos esses XMl que estão nessa Pasta de Retorno [Ô]Retorno\dfe\[Ô]
dentro dessa pasta contém todos os xml que recebi da consulta. ---
* na minha logica, seria o seguinte. fazer um loop dentro de uma pasta do local C:\XML\Retorno\DFE\
alguem poderia me da umas dicas como faço para fazer um loop dentro de uma pasta. pegando esses XML e pegando as Tags. para alimentar um Datagrid.
Agradeço desde de já a todos.
Citação::
Percorrer os arquivos é a parte fácil. O caso é se você conhece desserialização? Caso não conheça, tenho um vÃdeo mostrando isso.
consegui kerplunk ler o diretorio onde se encontra-se todos os XML de retorno da sefaz.
For Each arq As String In Directory.GetFiles([Ô]C:\XML\Retorno\dfe\[Ô], [Ô]*.xml[Ô])
Test = (arq)
LErdadosXMl()
Next kerplunk sobre a desserialização. eu não tinha conhecido ainda.
fiz de outra forma. usando o dataset.
Dim Ds As New DataSet
Ds.ReadXml(Test)
Dim bdsAux As New BindingSource
bdsAux.DataSource = Ds
bdsAux.DataMember = [Ô]resNFe[Ô] tava aqui assistindo o video. e qnd fui fazer a classe. no vb.net não tem essa opção
Citação::
Framework, qual vc esta ? Deve ser 4.0 ou >, se não me engano.
Nilsontres uso o 3.5
Citação::
Kerplunk, no vb.net nao tem essa Paste Special > Paste XML as Classes
tava aqui assistindo o video. e qnd fui fazer a classe. no vb.net não tem essa opção
Não existe [Ô]no vb.net não tem a opção[Ô]. O que tem a opção é o Visual Studio, que deve ser uma versão antiga que você está usando.
Citação::
:
Kerplunk, no vb.net nao tem essa Paste Special > Paste XML as Classes
tava aqui assistindo o video. e qnd fui fazer a classe. no vb.net não tem essa opção
Não existe [Ô]no vb.net não tem a opção[Ô]. O que tem a opção é o Visual Studio, que deve ser uma versão antiga que você está usando.
Kerplunk, Estou usando o Visual Studio 2012
Citação::
:
:
Kerplunk, no vb.net nao tem essa Paste Special > Paste XML as Classes
tava aqui assistindo o video. e qnd fui fazer a classe. no vb.net não tem essa opção
Não existe [Ô]no vb.net não tem a opção[Ô]. O que tem a opção é o Visual Studio, que deve ser uma versão antiga que você está usando.
Kerplunk, Estou usando o Visual Studio 2012
Atualize para 2015 Community. é gratuito.