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]Up Registro em duas tabelas e um formulário

    avatar
    Helden
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 27/05/2016

    [Resolvido]Up Registro em  duas tabelas e um formulário Empty [Resolvido]Up Registro em duas tabelas e um formulário

    Mensagem  Helden em 2/6/2019, 04:00

    Boa tarde amigos! Gostaria de mais uma ajuda de vocês.

    Gostaria de inserir registro (nome e convênio) na tblControle de honorários médicos através de um botão "executar" em um formulário "Prontuário" cuja fonte de registro é outra tabela chamada "Prontuário"
    Desculpa os erros nos nomes dos objetos, fiz esse banco há uns 10 anos e agora estou reformulando.

    Private Sub Executar_Click()
    CurrentDb.Execute "INSERT INTO tblControle de honorários médicos (Nome, Convênio) VALUES ('" & txtNome.Value & "', '" & txtConvênio & "')"
    MsgBox ("Executada."), vbInformation, "Dados"
    End Sub

    Não esta dando certo, pede para depurar. Algum erro no código?
    Realizei o código com ajuda do video do Giberlânio Rocha no you tube
    Obrigado!!
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6395
    Registrado : 15/03/2013

    [Resolvido]Up Registro em  duas tabelas e um formulário Empty Re: [Resolvido]Up Registro em duas tabelas e um formulário

    Mensagem  ahteixeira em 2/6/2019, 11:03

    Olá Heldenrson,

    Teste assim:
    Código:
    CurrentDb.Execute "INSERT INTO [tblControle de honorários médicos] (Nome, Convênio) VALUES ('" & txtNome.Value & "', '" & txtConvênio & "')"

    Abraço
    avatar
    Helden
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 27/05/2016

    [Resolvido]Up Registro em  duas tabelas e um formulário Empty Re: [Resolvido]Up Registro em duas tabelas e um formulário

    Mensagem  Helden em 2/6/2019, 16:44

    Show resolveu muitíssimo obrigado!!!!!
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6395
    Registrado : 15/03/2013

    [Resolvido]Up Registro em  duas tabelas e um formulário Empty Re: [Resolvido]Up Registro em duas tabelas e um formulário

    Mensagem  ahteixeira em 2/6/2019, 16:55

    Olá Heldenrson,

    Obrigado pelo retorno, o fórum agradece.

    Abraço
    avatar
    Helden
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 27/05/2016

    [Resolvido]Up Registro em  duas tabelas e um formulário Empty Re: [Resolvido]Up Registro em duas tabelas e um formulário

    Mensagem  Helden em 2/6/2019, 20:51

    Boa tarde, testando o código ele registra o nome, mas não registra o convênio. Alguma idéia?
    Valeu!!
    avatar
    Helden
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 27/05/2016

    [Resolvido]Up Registro em  duas tabelas e um formulário Empty Re: [Resolvido]Up Registro em duas tabelas e um formulário

    Mensagem  Helden em 2/6/2019, 21:01

    opa! era o nome do campo no meu formulario prontuário que estava errado (txtConvênio)
    Agora deu, sucesso!
    Obrigado
    avatar
    Helden
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 27/05/2016

    [Resolvido]Up Registro em  duas tabelas e um formulário Empty Re: [Resolvido]Up Registro em duas tabelas e um formulário

    Mensagem  Helden em 2/6/2019, 22:00

    Seria possivel incerir outro item "Código do convênio"

    já tentei horas seguindo a sequencia no código e não consigo
    Valeu
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6395
    Registrado : 15/03/2013

    [Resolvido]Up Registro em  duas tabelas e um formulário Empty Re: [Resolvido]Up Registro em duas tabelas e um formulário

    Mensagem  ahteixeira em 3/6/2019, 08:18

    Olá, e seguir a mesma lógica.

    Pois como "Código do convênio" tem espaços deve colocar entre parênteses retos, assim:
    [Código do convênio]

    Outra coisa apesar de ser possível usar acentuação no nome dos campos não é recomendado.

    Abraço
    avatar
    Helden
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 27/05/2016

    [Resolvido]Up Registro em  duas tabelas e um formulário Empty Re: [Resolvido]Up Registro em duas tabelas e um formulário

    Mensagem  Helden em 4/6/2019, 00:45

    Boa noite
    Retirei os espaços e coloquei o "txt" no nome do campo "txtCódigo_do_convênio" no formulário.
    Deu tudo certo cheers  cheers
    Deu trabalho de uns tres ou mais dias até vir a sua ajuda.
    Muitissimo obrigado ahteixeira!
    o código ficou assim:

    Código:
    Private Sub Executar_Click()
    CurrentDb.Execute "INSERT INTO [tblControle de honorários médicos] (Nome, Convênio, Código_do_convênio) VALUES ('" & txtNome.Value & "', '" & txtConvênio & "', '" & txtCódigo_do_convênio & "')"
    MsgBox ("Executada."), vbInformation, "Dados"
    End Sub
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6395
    Registrado : 15/03/2013

    [Resolvido]Up Registro em  duas tabelas e um formulário Empty Re: [Resolvido]Up Registro em duas tabelas e um formulário

    Mensagem  ahteixeira em 4/6/2019, 09:35

    Olá Heldenrson,

    Obrigado pelo retorno, o fórum agradece.

    Abraço

    Conteúdo patrocinado

    [Resolvido]Up Registro em  duas tabelas e um formulário Empty Re: [Resolvido]Up Registro em duas tabelas e um formulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/12/2019, 01:42