MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Excluir registros automaticamente anteriores a um periodo

    Compartilhe

    enf_bruno
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 25/11/2016

    Excluir registros automaticamente anteriores a um periodo

    Mensagem  enf_bruno em Qui 01 Dez 2016, 1:50 am

    Olá, gostaria de ajuda para excluir automaticamente os registros da tabela anteriores a 1 ano, onde sempre que o fomulário principal fosse aberto, fossem verificados a existência de tais registros e excluídos.

    davipaulino
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 15
    Registrado : 18/02/2016

    Re: Excluir registros automaticamente anteriores a um periodo

    Mensagem  davipaulino em Qui 01 Dez 2016, 11:02 am

    Seria mais ou menos assim amigo

    DoCmd.RunSQL"DELETE Tabela.id, Date()-[Tabela].[campo_data] AS Periodo FROM Tabela WHERE (((Date()-[Tabela].[campo_data])>365));"

    enf_bruno
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 25/11/2016

    Show de Bola

    Mensagem  enf_bruno em Dom 04 Dez 2016, 6:50 pm

    Funcionou perfeitamente meu amigo, obrigado. No fim, o código aplicado ficou assim:

    DoCmd.RunSQL "DELETE tabela.id, Date()-[Plantão].[Data] AS Periodo FROM Plantão WHERE (((Date()-[Plantão].[Data])>365));"


      Data/hora atual: Qui 08 Dez 2016, 1:02 am