MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Compartilhe
    avatar
    famaso
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/11/2017

    [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  famaso em 10/11/2017, 18:54

    Prezados colegas,

    Criei um sistema para cadastrar e controlar meu acervo de filmes, pois cansei de emprestar, esquecer para quem foi e não ter o filme devolvido. É simples, mas funcionando perfeitamente.
    o problema é que quero implementar uma rotina e não consigo. Tentei de várias formas e sem sucesso.
    Quero preencher o campo loc_codigobarras do form_Locacao, após salvar os dados comparar esse campo com o campo fil_codigobarras (campo digitável) do form_Filmes. Se forem iguais marcar o campo Empréstimo (campo sim/não) do form_Filmes.

    Espero que consigam me ajudar.

    Att.,

    Fabrízio
    avatar
    rfnunes01
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 77
    Registrado : 05/09/2016

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  rfnunes01 em 17/11/2017, 01:40

    Ola boa noite tem como voce disponibilizar o bd para dar uma olhada para vc
    avatar
    famaso
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/11/2017

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  famaso em 17/11/2017, 03:22

    Boa noite, rfnunes01!

    Segue banco de dados.

    Espero que me ajude. Já tentei os códigos para verificar duplicidade em cpf e cnpj, mas só resulta em erro.

    Att.,

    Fabrízio
    Anexos
    teste3.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (126 Kb) Baixado 9 vez(es)
    avatar
    caiosouza
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 305
    Registrado : 05/12/2016

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  caiosouza em 17/11/2017, 12:01

    Bom dia,



    Teste no evento Ao Clicar do Botão SALVAR.

    Código:
    Private_Sub Bt_Salvar_Click()
    If Forms!form_Locacao!loc_codigobarras = Forms!form_Filmes!fil_codigobarras Then
    Forms!form_Filmes!Empréstimo = True
    End if
    End Sub


    .................................................................................
    A persistência leva ao sucesso!
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3509
    Registrado : 06/11/2009

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  Assis em 17/11/2017, 13:19

    Boa tarde
    Já vi o BD. Atenção que um campo é texto  numa tabela e na outra é número.


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3509
    Registrado : 06/11/2009

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  Assis em 17/11/2017, 17:13

    Boa tarde

    Teste no formulário "frm_Locacao" , e no frm_devolucao faz o contrário.

    No botão "Salvar"

    Atenção alterei na tabela tab_Filmes o campo " fil_codigobarras " para texto.

    Aguardo


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    famaso
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/11/2017

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  famaso em 17/11/2017, 22:02

    Boa noite, Assis!

    Testei as alterações realizadas e não funcionou. Retornou a seguinte mensagem:"Parâmetros insuficientes. Eram esperados 1".

    Att.,

    Fabrízio
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3509
    Registrado : 06/11/2009

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  Assis em 17/11/2017, 22:10

    Boa noite

    Testou o meu exemplo ou adaptou ao seu, aqui no meu funciona direito.

    Qual o seu Office ?

    Aguardo


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    famaso
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/11/2017

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  famaso em 17/11/2017, 22:14

    Boa noite, caiosouza!

    Testei seu código e não funcionou. Alterei o bd conforme sugerido pelo Assis, mudei o campo loc_codigobarras para texto. Eu já tinha tentado antes da forma que você sugeriu e não retorna o campo marcado como emprestado.

    Espero que vocês me ajudem a solucionar esse problema.

    Att.,

    Fabrízio
    avatar
    famaso
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/11/2017

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  famaso em 17/11/2017, 22:22

    Assis,

    Testei o seu exemplo. Meu office é o 2016. Oh trem danado...

    Att.,

    Fabrízio
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3509
    Registrado : 06/11/2009

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  Assis em 17/11/2017, 22:30

    Veja


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3509
    Registrado : 06/11/2009

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  Assis em 17/11/2017, 22:40

    Famoso

    1ª Remover as relações nas tabelas para puder alterar o campo codiogo barras para texto

    Tem que alterar para texto o campo codigo barras na tabela filmes

    Volta a fazer as relações.

    Depois nos respetivos formulários coloca os cógigos abaixo.


    No Locação no botão salvar

    CurrentDb.Execute "UPDATE Tab_Filmes SET fil_emprestimo=" & True & " WHERE fil_codigobarras = '" & Me.loc_codigobarras.Column(1) & "'"


    No Devolução no botão salvar

    CurrentDb.Execute "UPDATE Tab_Filmes SET fil_emprestimo=" & False & " WHERE fil_codigobarras = '" & Me.dev_codigobarras.Column(1) & "'"


    Aguardo


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    famaso
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/11/2017

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  famaso em 17/11/2017, 22:42

    Assis,

    Eu vi o vídeo e fiquei "babando aqui", pois é do jeitinho que eu queria.

    Segue print da tela com o erro.
    Anexos
    tela erro.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (116 Kb) Baixado 3 vez(es)
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3509
    Registrado : 06/11/2009

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  Assis em 17/11/2017, 22:46


    Viu o Video ?



    Mudou Este da imagem ?

    [Você precisa estar registrado e conectado para ver esta imagem.]


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    famaso
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/11/2017

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  famaso em 17/11/2017, 22:49

    Assis,

    Fiz da mesma forma que você orientou e retornou o mesmo erro da tela printada.

    Att.,

    Fabrízio
    avatar
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3509
    Registrado : 06/11/2009

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  Assis em 17/11/2017, 22:55

    Não posso fazer mais nada

    Só esperando alguém com o 2016 para ajudar.

    Já agora ...... 32 ou 64 ?

    Também tem interesse em dizer.

    Boa noite


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    famaso
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/11/2017

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  famaso em 17/11/2017, 23:02

    Assis,

    Muito obrigado pelo seu esforço e dedicação em me ajudar. Fiquei triste aqui com esses erros que apareceram. Estava esperançoso!

    Aqui é windows 7 Ultimate 32 bits com Office 2016.

    Boa noite e fica com Deus!

    Abraços,

    Fabrízio
    avatar
    famaso
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/11/2017

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  famaso em 28/11/2017, 13:24

    Consegui resolver o erro que aparecia.

    Conforme o Assis orientou:

    No Locação no botão salvar

    CurrentDb.Execute "UPDATE Tab_Filmes SET fil_emprestimo=" & True & " WHERE fil_codigobarras = '" & Me.loc_codigobarras.Column(1) & "'"


    No Devolução no botão salvar

    CurrentDb.Execute "UPDATE Tab_Filmes SET fil_emprestimo=" & False & " WHERE fil_codigobarras = '" & Me.dev_codigobarras.Column(1) & "'"

    No access 2016 basta trocar True e False pelo valor numérico de sim e não. Coloquei 1 para sim e 0 para não. Assim funcionou perfeitamente.
    avatar
    famaso
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 09/11/2017

    Re: [Resolvido]Preencher o campo de um form, comparar com campo de outro form e marcar automaticamente outro campo

    Mensagem  famaso em 28/11/2017, 13:25

    Finalizando tópico!

      Data/hora atual: 25/9/2018, 04:47