MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


2 participantes

    Ajuda com Código de barras no cadastro de cliente

    avatar
    cjsilva2013
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 259
    Registrado : 26/06/2013

    codigo  barras - Ajuda com Código de barras no cadastro de cliente Empty Ajuda com Código de barras no cadastro de cliente

    Mensagem  cjsilva2013 14/2/2018, 10:38

    Olá, bom dia.

    Venho outra vez, em busca de ajuda, para resolver uma pequena dificuldade com a geração de código de barras para aluno...

    Tenho a seguinte função num botão que gera código de barras... Função essa disponibilizada pelo grande João Paulo...

    '----------------------------------------------------------------------------------------------------------------------------------

    Private Sub cmdCodBarras_Click()
    On Error Resume Next
    Dim CodigoBarras

    ' fonte: Microsoft - Para produzir inteiros aleatórios em um determinado intervalo
    ' Int((Maior Número - Menor Número + 1) * Rnd + Menor Número)

    ' CodigoBarras = Int((9999999999 - 0 +1 ) * Rnd + 0)

    CodigoBarras = Int((9999999999# + 1) * Rnd)
    CodigoB = "789" & CodigoBarras

    End Sub

    No campo "CodigoB" gerou o número: 7897055475115

    Só que ao criar um novo registro, não está acrescentando o número... Pois o que estou fazendo é um crachá com código de barras. Que ao clicar no botão gera um novo código para o crachá...

    Outra pergunta, é possível gerar o código de barras, pelo CPF do aluno

    Peço ajuda aos companheiros...

    Desde já agradeço e que Deus os abençoe...
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    codigo  barras - Ajuda com Código de barras no cadastro de cliente Empty Re: Ajuda com Código de barras no cadastro de cliente

    Mensagem  Noobezinho 14/2/2018, 13:20

    Francisco


    Uma dica:

    Faça você mesmo o código em números e depois cria o código de barras para ele.


    Exemplo:

    Se pegarmos parte do CNPJ da escola: 300400509000

    300400509001 - primeiro registro
    300400509002 - segundo registro

    Veja que o 13º é o verificador, que será criado junto com o código de barras.

    Pode usar o CPF, lembre-se que ele tem 11 letras, tem que completar 12 para depois o access colocar o verificador (13º digito)

    [ ]'S


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    avatar
    cjsilva2013
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 259
    Registrado : 26/06/2013

    codigo  barras - Ajuda com Código de barras no cadastro de cliente Empty Re: Ajuda com Código de barras no cadastro de cliente

    Mensagem  cjsilva2013 15/2/2018, 12:12

    Bom dia, grande Noobezinho...

    Fiz o seguinte:

    No Ao perder foco do campo Nome:

    Private Sub Nome_LostFocus()

    If Not IsNull(Me.IDAluno) Then
    Me.txtRolAluno = Format(Nz(DMax("IDAluno", "tblAluno"), 0), "080084390000") + 1
    End If

    End Sub

    E baixei e instalaei a fonte: IDAHC39M Code 39 Barcode

    No caso aqui, não estou usando o gerador... Só Autonumeração, os campos no relatório da credencial linkado ao campo txtRolAluno (onde é gerado o número) da tabela tblAluno.

    Da certo assim? O que você acha?

    Pergunto, porque estou sempre aberto a aprender... E ouvir mestres como você, João Paulo, Cricrio, Fabio Paes e outros do Fórum, que nos ajudam a crescer...

    Abraços,
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    codigo  barras - Ajuda com Código de barras no cadastro de cliente Empty Re: Ajuda com Código de barras no cadastro de cliente

    Mensagem  Noobezinho 15/2/2018, 16:38


    Melhor seria colocar o primeiro numero direto na tabela (isso economiza escrever código),

    então, usar o algorítmo:

    Me.txtRolAluno = DMax("IDAluno", "tblAluno") + 1

    e pode usar essa numeração como ID do aluno.

    Baixou uma fonte 39, abaixo deixo disponível meu exemplo de code39, sem precisar de fonte.

    Exemplo

    [ ]'s


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    avatar
    cjsilva2013
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 259
    Registrado : 26/06/2013

    codigo  barras - Ajuda com Código de barras no cadastro de cliente Empty Ajuda com Código de barras no cadastro de cliente

    Mensagem  cjsilva2013 15/2/2018, 21:51

    Entendi, vou fazer conforme orientado...

    Seus exemplos são muitos bons... Vou estudar eles...

    Desde já obrigado, fico mais uma vez grato.

    Assim que concluir, vou disponibilizar uma mostra simples para outros que precisarem...

    Abraços a todos.
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    codigo  barras - Ajuda com Código de barras no cadastro de cliente Empty Re: Ajuda com Código de barras no cadastro de cliente

    Mensagem  Noobezinho 15/2/2018, 22:10

    Ótimo!

    Fico aguardando teu retorno para dar o Resolvido no tópico ! Razz

    [ ]'s


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.

    Conteúdo patrocinado


    codigo  barras - Ajuda com Código de barras no cadastro de cliente Empty Re: Ajuda com Código de barras no cadastro de cliente

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 10:45