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


3 participantes

    [Resolvido]Excluir registro específico em SubFormulário

    avatar
    silvasantos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 51
    Registrado : 29/01/2012

    [Resolvido]Excluir registro específico em SubFormulário Empty Excluir registro específico em SubFormulário

    Mensagem  silvasantos 23/2/2012, 20:16

    Olá, gostaria de saber se alguém poderia me ajudar em um problema aqui:
    Tenho um Form principal baseado em uma consulta e no mesmo, um SubFormulário em modo de folha de dados associado ao Form.
    Gostaria de saber se há a possibilidade de criar um botão no Form que exclua um registro previamente selecionado no SubFormulário.
    Desde já agradeço a atenção!
    avatar
    Convidad
    Convidado


    [Resolvido]Excluir registro específico em SubFormulário Empty Re: [Resolvido]Excluir registro específico em SubFormulário

    Mensagem  Convidad 23/2/2012, 20:38


    Olá!

    Usar os Seletores de registro e o Delete está fora de questão?
    avatar
    silvasantos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 51
    Registrado : 29/01/2012

    [Resolvido]Excluir registro específico em SubFormulário Empty Re: [Resolvido]Excluir registro específico em SubFormulário

    Mensagem  silvasantos 23/2/2012, 20:57

    Olá, mas como você mesmo disse, fora de questão.
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]Excluir registro específico em SubFormulário Empty Re: [Resolvido]Excluir registro específico em SubFormulário

    Mensagem  Dilson 23/2/2012, 21:45

    Se para selecionar o registro especifico, você utilize CheckBox, pode utilizar as dicas deste tópico:
    apagar - [Resolvido]Apagar dados de subformulário
    avatar
    silvasantos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 51
    Registrado : 29/01/2012

    [Resolvido]Excluir registro específico em SubFormulário Empty Re: [Resolvido]Excluir registro específico em SubFormulário

    Mensagem  silvasantos 23/2/2012, 22:16

    Muito obrigado pela atenção mas eu já havia lido este, mas o meu problema é outro.
    Assim, Gostaria de selecionar a linha no SubFormulário ( em modo de folha de dados) referente ao registro desejado e ao clicar em um botão no Form Principal, o registro selecionado seja excluído.
    avatar
    Convidad
    Convidado


    [Resolvido]Excluir registro específico em SubFormulário Empty Re: [Resolvido]Excluir registro específico em SubFormulário

    Mensagem  Convidad 23/2/2012, 22:21


    O problema é que: quando vc clicar no botão este recebe o foco, e a seleção do registro no subform se perde.
    Daí não é possível passar o critério que especifica o(s) registro(s) a serem deletados.

    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Excluir registro específico em SubFormulário Empty Re: [Resolvido]Excluir registro específico em SubFormulário

    Mensagem  criquio 23/2/2012, 22:26

    Coloque um botão na frente dos campos do registro mesmo com algo assim:

    CurrentDb.Execute "DELETE * FROM NomeTabela WHERE Código=" & Me.Código & ""

    ou então coloque uma variável no escopo do formulário para receber o número da id do registro quando o usuário clicar no campo e mude o Me.Código para o nome da variável com o código acima no botão do formulário principal. Nesse caso, é aconselhável zerar a variável após a exclusão para não apagar algo por acidente.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    silvasantos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 51
    Registrado : 29/01/2012

    [Resolvido]Excluir registro específico em SubFormulário Empty Re: [Resolvido]Excluir registro específico em SubFormulário

    Mensagem  silvasantos 23/2/2012, 22:58

    Obrigado pela atenção de vocês, mas optei por deixar a opção de excluir registros no SubFormulário, sendo assim, mais uma vez agradeço!
    avatar
    Convidad
    Convidado


    [Resolvido]Excluir registro específico em SubFormulário Empty Re: [Resolvido]Excluir registro específico em SubFormulário

    Mensagem  Convidad 23/2/2012, 23:23


    Disponha.
    Se mudar de ideia, creio que a dica do Criquio resolve.

    Grato pelo retorno!
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]Excluir registro específico em SubFormulário Empty Re: [Resolvido]Excluir registro específico em SubFormulário

    Mensagem  Dilson 23/2/2012, 23:33

    Já havia escrito há um tempo, minha internet caiu e só agora voltou.
    Apesar de ter optado por outra forma, deixo o que escrevi. Pode servir para outra pessoa que busque:

    Abra um módulo e colque essa função:
    Código:
    Global nId As Integer
    Function SelecionaId(ByRef argId As Integer)
               
                nId = argId
               
    End Function

    Dê o nome que desejar a esse módulo.


    No botão do seu formulário coloque:
    Código:
    Dim nSql As String

    nSql = "DELETE * FROM SuaTabelaOrigemDoSubForm WHERE SuaChavePrimária =" & nId


        If MsgBox("Deseja realmente deletar o registro: " & nId & " ?", vbYesNo, "Atenção") = vbYes Then
              CurrentDb.Execute nSql
              Me.SeuSubformulário.Requery
      End If

    No evento ao clicar dos campos de seu subformulário coloque:
    Call SelecionaId(Nz(SuaChavePrimária))

    Até!


    Conteúdo patrocinado


    [Resolvido]Excluir registro específico em SubFormulário Empty Re: [Resolvido]Excluir registro específico em SubFormulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 03:21