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 dados em uma tabela com dois critério

    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1415
    Registrado : 07/12/2011

    [Resolvido]Excluir dados em uma tabela com dois critério Empty [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  tauron 4/8/2021, 23:03

    No meu projeto, possuo um formulário "A" com um subformulário "A" e neste subformulário (vinculado a tabela "A") possui um código que de acordo com a resposta, abre um outro subformulário "B" (vinculado a tabela "B") como outra janela.

    Vale esclarecer que o subformulário "B" somente será aberto se ao "passar" por um determinado campo e optar por abrir.

    Pretendo excluir um determindo registro nas duas tabelas ( A e B), através de um botão existente no formulário "A". Consigo excluir os dados da tabela "A" mas, não da tabela "B".

    Codigo para excluir na tabela "A"
    Código:
    If MsgBox("Deseja excluir o registro ?", _
                  vbQuestion + vbYesNo, "Excluir Registro") = vbYes Then
        DoCmd.RunCommand acCmdSelectRecord
        DoCmd.RunCommand acCmdDeleteRecord
      End If
    [Forms]![frmA]![SfA].Form.Requery

    Para excluir na tabela "B" tentei adaptar este, mas sem sucesso.
    Código:
    Dim sql As String

    sql = "DELETE * FROM tblB "
    sql = sql & " WHERE codigo=" & Me.codigo & "  "
    sql = sql & " AND datasaida = " & Me.datasaida & ""

    CurrentDb.Execute sql
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  DamascenoJr. 4/8/2021, 23:27

    Vai usar SQL?

    Precisa saber que verificações em campo do tipo:

    1. Texto: deve considerar que fiquem entre aspas ("Exemplo Disso")
    2. Número: troca-se a vírgula que faz separação decimal por ponto. (1234567.89)
    3: Datas ficam entre # e formatadas como Mês/Dia/Ano. (#12/31/2021#)

    Na prática:

    Código:
    Dim sql As String

    sql = "DELETE * FROM tblB "
    sql = sql & " WHERE codigo=" & Me.codigo & "  "
    sql = sql & " AND datasaida = #" & Format(Me.datasaida, "mm/dd/yyyy") & "#"

    CurrentDb.Execute sql


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1415
    Registrado : 07/12/2011

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  tauron 6/8/2021, 20:44

    Com o código que o DamascenoJr postou está dando erro 3061 "Parâmetros insuficiente. Eram esperados 1.


    Os objetos envolvidos são: frmEditaDiarias, subEdDiarias (tblLancamento), e frmEdHist (tblDiarias).
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  DamascenoJr. 6/8/2021, 21:20

    Me dê o passo a passo.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3347
    Registrado : 13/12/2016

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  Alexandre Fim 6/8/2021, 21:31


    Na instrução SQL tem um ASTERISCO (*).
    Remova-o e veja se funfa!!




    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Excluir dados em uma tabela com dois critério Setinf11
    Sistemas e Tecnologia Ltda
    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1415
    Registrado : 07/12/2011

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  tauron 6/8/2021, 23:29

    No frmEditaDiarias, ao digitar o nome do funcionário, preenche o campo [matricula] que está oculto e depois informa a data da saida (não é a do registro), a sair do segundo campo de filtro, o subEDDiarias será preenchido com os dados referentes ao filtro.

    Nome do Funcionário = Tauron
    Data da Viagem = 06/08/2020

    Enter ou TAB


    Ao clicar no botão Editar, o botão Excluir será habilitado.

    A pretensão é que ao clicar em excluir, os dados referente ao registro visível no formulário sejam excluídos das tabelas tblLancamento e os dados relacionados a este registro, existentes na tblDiarias.

    Para se ter acesso formulário onde estão os dados complementares existente na tblDiarias, basta tirar o foco do campo Transporte de Pacientes.

    OBS: Estou repostando o arquivo em virtude de ter retirado parte do código do botão Excluir.

    Ao retirar ou manter o asterisco dá o seguinte erro: Erro em Tempo de execução "3464" Tipos de dados incompatível na expressão de critério.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  DamascenoJr. 6/8/2021, 23:42

    Analisemos...

    Usando as dicas do tópico abaixo
    https://www.maximoaccess.com/t37958-dicas-de-ouro#259188

    resolvi fazer perguntas a janela de verificação imediata

    olha a resposta obtida
    [Resolvido]Excluir dados em uma tabela com dois critério Estrin10

    É um campo do tipo texto. E sendo texto, como dito há duas mensagens minhas atrás, fica entre aspa simples (ou duas aspas normais) para que o código entenda como um só bloco, haja visto a possibilidade de um texto poder conter espaços.

    Feito a adaptação
    [Resolvido]Excluir dados em uma tabela com dois critério Entrea10



    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    tauron gosta desta mensagem

    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1415
    Registrado : 07/12/2011

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  tauron 7/8/2021, 00:31

    Quando tento usar o código para excluir na tabela tblLancamento, da erro:

    erro em tempo de execução '3061'
    Parâmetros insuficiente. Eram esperados 1

    Código:
    Dim sql As String

    sql = "DELETE * FROM tblLancamento "
    sql = sql & " WHERE Matricula = '" & Me.Matricula & "'"
    sql = sql & " AND DtaSaida = #" & Format(Me.TxtData, "mm/dd/yyyy") & "#"

    CurrentDb.Execute sql
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  DamascenoJr. 7/8/2021, 00:50

    Qual o passo a passo para o arquivo que você enviou?

    Não encontrei esse trecho de código.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1415
    Registrado : 07/12/2011

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  tauron 7/8/2021, 10:49

    Me desculpe achei que havia postado o arquivo com as modificações.

    OBS: vou excluir os arquivos das mensagens anteriores.
    Anexos
    [Resolvido]Excluir dados em uma tabela com dois critério AttachmentDiarias.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (129 Kb) Baixado 10 vez(es)
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  DamascenoJr. 7/8/2021, 14:32

    Na tabela lançamentos não existe o campo DtaSaida.

    [Resolvido]Excluir dados em uma tabela com dois critério Cade10


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    tauron gosta desta mensagem

    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1415
    Registrado : 07/12/2011

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  tauron 8/8/2021, 10:46

    DamascenoJr, muitíssimo obrigado. Não estou conseguindo me concentrar esses tempo. Acho que levaria um bom tempo para perceber que o nome do campo estava errado.
    Mais uma vez muito obrigado.
    tauron
    tauron
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1415
    Registrado : 07/12/2011

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  tauron 8/8/2021, 10:47

    cheers
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  DamascenoJr. 8/8/2021, 15:46

    Tauron, acontece com todos. Sempre há algo que passa batido. Sleep

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    Conteúdo patrocinado


    [Resolvido]Excluir dados em uma tabela com dois critério Empty Re: [Resolvido]Excluir dados em uma tabela com dois critério

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 15/7/2024, 16:26