GERAR CLASSE CTE
é só adicionar a classe no seu projeto. Não tem referência nenhuma. E o que você não conseguiu?
Adicionei a classe, ai estou tentando iniciar a codificação, em um botão, partindo de TCTe, mas da essa msg ai da imagem.
Minha nossa...
Você sabe que essa sintaxe que você colocou é C#, não é?
Para instanciar um objeto em VB.NET é assim:
Você sabe que essa sintaxe que você colocou é C#, não é?
Para instanciar um objeto em VB.NET é assim:
Dim ctexml As New TCTe = new TCTe()
Minha nossa, ta errado sua string em vb, é assim:
Dim ctexml As New TCTe()
rsssss.. Deu um inÃcio agora, muito obrigado por eqto, eu não sei se vou conseguir, mas vou tentar, pois não quero continuar gerando o xml pelo doom no vb6, vamos ver o que vai virar..
Dim ctexml As New TCTe()
rsssss.. Deu um inÃcio agora, muito obrigado por eqto, eu não sei se vou conseguir, mas vou tentar, pois não quero continuar gerando o xml pelo doom no vb6, vamos ver o que vai virar..
Eu sugiro que antes de tentar fazer a NFe, que entenda muito bem o conceito de OOP e um mÃnimo da sintaxe VB.NET, mas comece a dar preferência para C#...
concordo, eu que eu tenho um projeto em vb.net aqui, que ja faz assinatura, valida, envia, pega retorno, uma tela montada ja gerenciando as informações do BD, tudo funcionando bem, mas o xml, é feito no ERP que esta em vb6, e na parte de xml em .net, estou iniciando, mas chego la. Estou passando uns dados para testar apenas a geração do arquivo em disco, é lógico, que a próxima etapa, é preencher com os dados do banco. Sabe me dizer o que é esse tipo a ser informado ai na imagem ?
Isso é o construtor do objeto XmlSerializer. Ele recebe qualquer tipo serializável. Aquele [Ô]Is[Ô] não é necessário. Seria apenas:
Além disso, [Ô]infCte[Ô] não foi inicializado e você terá uma NullException, teria que ser:
Só depois de instanciar passar os parâmetros. Sempre que uma coisa for uma classe(um tipo) ele precisa ser instanciado.
Dim ser As New XmlSerializer(TypeOf(TCTe))
Além disso, [Ô]infCte[Ô] não foi inicializado e você terá uma NullException, teria que ser:
ctexml.infCte = New infCte()
Só depois de instanciar passar os parâmetros. Sempre que uma coisa for uma classe(um tipo) ele precisa ser instanciado.
Dim ctexml As New TCTe()
ctexml.infCte = New infCte() <- não deu certo assim
ctexml.infCte = New TCTeInfCte() <- assim deu....
ctexml.infCte.ide.cCT = 1
ctexml.infCte.ide.CFOP = [Ô]5252[Ô]
ctexml.infCte.versao = [Ô]1.0[Ô]
ctexml.infCte.emit.CNPJ = [Ô]12563578965412[Ô]
ctexml.infCte.emit.IE = [Ô]0000000000[Ô]
ctexml.infCte.emit.enderEmit.CEP = [Ô]13660000[Ô]
Dim serializar As New XmlSerializer(TypeOf (TCTe) ) <- AQUI CONTINUA SOLICITANDO OS (IS) , e o tipo...
Dim novoxml As New FileStream([Ô]c:\\ctenovo.xml[Ô], FileMode.CreateNew)
serializar.Serialize(novoxml, ctexml)
ctexml.infCte = New infCte() <- não deu certo assim
ctexml.infCte = New TCTeInfCte() <- assim deu....
ctexml.infCte.ide.cCT = 1
ctexml.infCte.ide.CFOP = [Ô]5252[Ô]
ctexml.infCte.versao = [Ô]1.0[Ô]
ctexml.infCte.emit.CNPJ = [Ô]12563578965412[Ô]
ctexml.infCte.emit.IE = [Ô]0000000000[Ô]
ctexml.infCte.emit.enderEmit.CEP = [Ô]13660000[Ô]
Dim serializar As New XmlSerializer(TypeOf (TCTe) ) <- AQUI CONTINUA SOLICITANDO OS (IS) , e o tipo...
Dim novoxml As New FileStream([Ô]c:\\ctenovo.xml[Ô], FileMode.CreateNew)
serializar.Serialize(novoxml, ctexml)
Experimente:
Dim serializar As New XmlSerializer(TCTe.GetType)
não...
Tópico encerrado , respostas não são mais permitidas