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 : 1394
    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 Qua 04 Ago 2021, 10:03 pm

    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. Qua 04 Ago 2021, 10:27 pm

    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 : 1394
    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 Sex 06 Ago 2021, 7:44 pm

    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. Sex 06 Ago 2021, 8:20 pm

    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 : 3190
    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 Sex 06 Ago 2021, 8:31 pm


    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 : 1394
    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 Sex 06 Ago 2021, 10:29 pm

    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. Sex 06 Ago 2021, 10:42 pm

    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 : 1394
    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 Sex 06 Ago 2021, 11:31 pm

    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. Sex 06 Ago 2021, 11:50 pm

    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 : 1394
    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 Sáb 07 Ago 2021, 9:49 am

    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 9 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. Sáb 07 Ago 2021, 1:32 pm

    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 : 1394
    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 Dom 08 Ago 2021, 9:46 am

    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 : 1394
    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 Dom 08 Ago 2021, 9:47 am

    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. Dom 08 Ago 2021, 2:46 pm

    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: Qui 28 Mar 2024, 7:54 pm