MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Avelino Sampaio - Erro no Codigo para Emissão de Boleto do Banco Itau

    Compartilhe

    Connekta Informatica
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 973
    Registrado : 01/07/2011

    [Resolvido]Avelino Sampaio - Erro no Codigo para Emissão de Boleto do Banco Itau

    Mensagem  Connekta Informatica em Seg 22 Dez 2014, 12:06

    Bom dia

    Alguém pode acender uma luz, a dias venho modificando o Exemplo do Mestre Avelino Sampaio, mais não gera o boleto.

    Esta aqui o Banco de dados.
    Anexos
    BoletosConnekta.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (434 Kb) Baixado 31 vez(es)


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    [Você precisa estar registrado e conectado para ver este link.]


    Lembrete: Desfrutar e Preservar é um direito de Todos.





    Connekta Informatica
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 973
    Registrado : 01/07/2011

    Re: [Resolvido]Avelino Sampaio - Erro no Codigo para Emissão de Boleto do Banco Itau

    Mensagem  Connekta Informatica em Ter 23 Dez 2014, 10:59

    Bom dia

    Alguém???


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    [Você precisa estar registrado e conectado para ver este link.]


    Lembrete: Desfrutar e Preservar é um direito de Todos.





    Connekta Informatica
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 973
    Registrado : 01/07/2011

    Re: [Resolvido]Avelino Sampaio - Erro no Codigo para Emissão de Boleto do Banco Itau

    Mensagem  Connekta Informatica em Qua 24 Dez 2014, 17:01

    Up, alguém ?


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    [Você precisa estar registrado e conectado para ver este link.]


    Lembrete: Desfrutar e Preservar é um direito de Todos.





    Connekta Informatica
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 973
    Registrado : 01/07/2011

    Re: [Resolvido]Avelino Sampaio - Erro no Codigo para Emissão de Boleto do Banco Itau

    Mensagem  Connekta Informatica em Sex 26 Dez 2014, 10:41

    Alguém com conhecimento sobre boleto?


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    [Você precisa estar registrado e conectado para ver este link.]


    Lembrete: Desfrutar e Preservar é um direito de Todos.





    Connekta Informatica
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 973
    Registrado : 01/07/2011

    Re: [Resolvido]Avelino Sampaio - Erro no Codigo para Emissão de Boleto do Banco Itau

    Mensagem  Connekta Informatica em Sex 26 Dez 2014, 11:18

    Bom dia

    Vi no proprio site do Avelino a mesma dúvida que a minha.

    Mais não consigo resolver o erro. Veja:

    Function fncCalculaDVCodBarras(sequencia)
    Dim fator As Byte
    Dim total
    Dim numero
    Dim resto
    Dim resultado
    Dim i As Integer

    fator = 2
    total = 0
    For i = 43 To 1 Step -1
    numero = Mid(sequencia, i, 1)
    If fator > 9 Then
    fator = 2
    End If
    numero = numero * fator
    total = total + numero
    fator = fator + 1
    Next
    resto = total Mod 11
    resultado = 11 - resto
    If resultado >= 10 Or resultado = 0 Then
    fncCalculaDVCodBarras = 1
    Else
    fncCalculaDVCodBarras = resultado
    End If
    End Function

    Alguém pode me ajudar?


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    [Você precisa estar registrado e conectado para ver este link.]


    Lembrete: Desfrutar e Preservar é um direito de Todos.





    lh programas
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 24/12/2014

    Re: [Resolvido]Avelino Sampaio - Erro no Codigo para Emissão de Boleto do Banco Itau

    Mensagem  lh programas em Sex 26 Dez 2014, 21:51

    vi hoje sua mesagen de ajuda mas niquen ajuda cherry cherry


    o codigo teria que ser no relatorio

    Connekta Informatica
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 973
    Registrado : 01/07/2011

    Re: [Resolvido]Avelino Sampaio - Erro no Codigo para Emissão de Boleto do Banco Itau

    Mensagem  Connekta Informatica em Sex 26 Dez 2014, 22:08

    Não entendi, será que você pode me ajudar?


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    [Você precisa estar registrado e conectado para ver este link.]


    Lembrete: Desfrutar e Preservar é um direito de Todos.





    Connekta Informatica
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 973
    Registrado : 01/07/2011

    Re: [Resolvido]Avelino Sampaio - Erro no Codigo para Emissão de Boleto do Banco Itau

    Mensagem  Connekta Informatica em Dom 28 Dez 2014, 21:39

    Help.


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    [Você precisa estar registrado e conectado para ver este link.]


    Lembrete: Desfrutar e Preservar é um direito de Todos.





    Connekta Informatica
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 973
    Registrado : 01/07/2011

    Re: [Resolvido]Avelino Sampaio - Erro no Codigo para Emissão de Boleto do Banco Itau

    Mensagem  Connekta Informatica em Ter 30 Dez 2014, 02:01

    Resolvido.

    [Você precisa estar registrado e conectado para ver este link.]


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    [Você precisa estar registrado e conectado para ver este link.]


    Lembrete: Desfrutar e Preservar é um direito de Todos.





      Data/hora atual: Dom 04 Dez 2016, 01:55