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

    [Resolvido]Excluir dados do Formulário Principal e do Sub Formulário

    avatar
    Bessa_SP
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 221
    Registrado : 07/11/2013

    [Resolvido]Excluir dados do Formulário Principal e do Sub Formulário Empty [Resolvido]Excluir dados do Formulário Principal e do Sub Formulário

    Mensagem  Bessa_SP 6/7/2018, 12:19

    Bom dia Srs.

    Meu problema é o seguinte, tenho duas tabelas:
    1 - Tbl_Transf_Banc_Deb, aonde a chave primária e o campo Cod_Transf.
    2 - Tbl_Transf_Banc_Cred, aonde a chave primária e o campo Código.
    Ambas com numeração automática.
    O formulário principal e o primeiro e o sub o segundo, ligado pelos seguintes campos:
    1 - Tbl_Transf_Banc_Deb - Cod_Transf
    2 - Tbl_Transf_Banc_Cred - N_Trans - "Que recebe o mesmo número da Tabela Principal - "Cod_Transf"

    O que desejo é ao clicar no botão excluir, excluísse tanto os dados da tabela principal como da tabela secundária, pegando os códigos que o Sr. Criquio fez em post anteriores tentei adaptar mais não deu certo, segue abaixo:

    Private Sub Btn_Excluir_Click()
    If MsgBox("Tem certeza que deseja excluir os registros com o código selecionado?", vbYesNo + vbQuestion, "Confirmar exclusão") = vbYes Then
    CurrentDb.Execute "DELETE FROM Tbl_Trans_Banc_Cred WHERE N_Trans=" & Me.Cod_transf & "Tbl_Trans_Banc_Deb"
    CurrentDb.Execute "DELETE FROM Tbl_Trans_Banc_Deb WHERE Me.Cod_transf=" & Me.N_Trans & "Tbl_Trans_Banc_Cred"
    MsgBox "Registros excluídos", vbInformation, "Sucesso"
    Else
    MsgBox "Exclusão cancelada", vbInformation, "Cancelado"
    End If

    End Sub

    Por gentileza se alguém puder me ajudar aonde está errado agradeço...

    Obrigado

    Celso Roberto
    Celso Roberto
    VIP
    VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1071
    Registrado : 01/03/2014

    [Resolvido]Excluir dados do Formulário Principal e do Sub Formulário Empty Re: [Resolvido]Excluir dados do Formulário Principal e do Sub Formulário

    Mensagem  Celso Roberto 7/7/2018, 16:40

    Olá..

    Não seria assim?

    CurrentDb.Execute "DELETE FROM Tbl_Trans_Banc_Cred WHERE N_Trans=" & Me.Cod_transf & ""
    CurrentDb.Execute "DELETE FROM Tbl_Trans_Banc_Deb WHERE Cod_transf=" & Me.Cod_transf & ""

    Se existir espaços nos nomes das tabelas e nos nomes dos campos, coloque entre colchetes [ ]

    Aguardamos

    Abraços


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


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....
    avatar
    Bessa_SP
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 221
    Registrado : 07/11/2013

    [Resolvido]Excluir dados do Formulário Principal e do Sub Formulário Empty Excluir dados do Formulário Principal e do Sub Formulário

    Mensagem  Bessa_SP 9/7/2018, 14:44

    Bom dia Amigo Celso Roberto

    Primeiro quero agradecer pela sua ajuda...

    Fiz a alteração conforme o código que me passou e deu o seguinte erro:
    Erro de Compilação:
    Método ou membro de dados não encontrado

    Ele para nessa linha:
    CurrentDb.Execute "DELETE FROM Tbl_Trans_Banc_Cred WHERE N_Trans=" & Me.Cod_transf & ""

    E grifa o Me.Cod_Transf.

    O que está errado?

    Aguardo o vosso retorno.

    Obrigado.
    Celso Roberto
    Celso Roberto
    VIP
    VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1071
    Registrado : 01/03/2014

    [Resolvido]Excluir dados do Formulário Principal e do Sub Formulário Empty Re: [Resolvido]Excluir dados do Formulário Principal e do Sub Formulário

    Mensagem  Celso Roberto 9/7/2018, 15:20

    Olá...

    Verifique se o nome do campo esta correto no formulário.
    Tem que ser o nome dado ao campo

    Ou anexe seu Bd com dados

    Aguardo


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


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....
    avatar
    Bessa_SP
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 221
    Registrado : 07/11/2013

    [Resolvido]Excluir dados do Formulário Principal e do Sub Formulário Empty Excluir dados do Formulário Principal e do Sub Formulário

    Mensagem  Bessa_SP 9/7/2018, 15:43

    Bom dia Professor Celso

    Estou colocando como resolvido...
    Deu certo, realmente estava errado, pois eu estava colocando o nome do campo da tabela, porém quando coloco o campo no formulário tenho por hábito de renomear esse referido campo.

    Obrigado por sua ajuda...
    Celso Roberto
    Celso Roberto
    VIP
    VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1071
    Registrado : 01/03/2014

    [Resolvido]Excluir dados do Formulário Principal e do Sub Formulário Empty Re: [Resolvido]Excluir dados do Formulário Principal e do Sub Formulário

    Mensagem  Celso Roberto 9/7/2018, 16:00

    Olá..

    Obrigado pelo retorno

    Abraços



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


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

      Data/hora atual: 17/4/2021, 16:36