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]Excluir dados do Formulário Principal e do Sub Formulário

    Compartilhe

    Bessa_SP
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

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

    Mensagem  Bessa_SP em 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

    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

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

    Mensagem  Celso Roberto em 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


    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



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

    Bessa_SP
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

    Excluir dados do Formulário Principal e do Sub Formulário

    Mensagem  Bessa_SP em 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.
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

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

    Mensagem  Celso Roberto em 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


    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



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

    Bessa_SP
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

    Excluir dados do Formulário Principal e do Sub Formulário

    Mensagem  Bessa_SP em 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...
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

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

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

    Olá..

    Obrigado pelo retorno

    Abraços



    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



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

      Data/hora atual: 20/11/2018, 18:19