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


2 participantes

    [Resolvidos]Excluir registro após intervalo de horas (tempo)

    michel_sys
    michel_sys
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 31
    Registrado : 07/06/2010

    [Resolvidos]Excluir registro após intervalo de horas (tempo) Empty [Resolvidos]Excluir registro após intervalo de horas (tempo)

    Mensagem  michel_sys 30/6/2010, 01:29

    Boa noite galera, Very Happy

    É o seguinte: Eu possuo um formulário para efetuar cadastros reservas de cursos e dentro deste formulário existe uma combox chamada "Confirmação" donde dentro dela existem duas opções: "Sim" e Não". A minha dúvida é a seguinte: Como faço para que quando fosse cadastrar um registro e se este registro não fosse confirmado em 12 horas ocorresse a exclusão automática deste registro. A princípio pensei em criar uma consulta exclusão mas não sei ao certo como fazer isto. É possível? Desde já agradeço a atenção!!! valeu! cheers
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvidos]Excluir registro após intervalo de horas (tempo) Empty Re: [Resolvidos]Excluir registro após intervalo de horas (tempo)

    Mensagem  JPaulo 30/6/2010, 11:00

    Bom dia Michel, é o simples;

    Entre na aba Eventos no seu formulario, linha No Cronómetro entre no VBA, cole isto e altere para os nomes corretos.

    Private Sub Form_Timer()
    Dim RS As Recordset
    Set RS = CurrentDb.OpenRecordset("SuaTabela")
    If RS.RecordCount = 0 Then Exit Sub

    RS.MoveFirst
    Do While Not RS.EOF
    'Verifica se existe registros não confirmados à 12 horas
    If DateDiff("h", RS.Fields("SeuCampoDataCadastro"), Now()) >= 12 And RS.Fields("SeuCampoConfirmado") = "Não" Then

    RS.Delete
    End If
    RS.MoveNext
    Loop
    Me.Requery
    End Sub


    No intervalo do Cronómetro que funciona em milisegundos, ou seja 60000 corresponde a um (1) minuto, você coloca os 60000.
    Deste modo, o seu formulario de minuto a minuto vai chekar se existe algum registro na tabela que a data de cadastrado seja >= 12 horas sem confirmação = Sim


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvidos]Excluir registro após intervalo de horas (tempo) Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvidos]Excluir registro após intervalo de horas (tempo) Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvidos]Excluir registro após intervalo de horas (tempo) Folder_announce_new Instruções SQL como utilizar...
    michel_sys
    michel_sys
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 31
    Registrado : 07/06/2010

    [Resolvidos]Excluir registro após intervalo de horas (tempo) Empty Re: [Resolvidos]Excluir registro após intervalo de horas (tempo)

    Mensagem  michel_sys 1/7/2010, 23:29

    Fala galera ... Very Happy

    Quero agradecer ao waraujo, criquio e ao Grande JPaulo pela atenção. usei o código criado pelo JPaulo e acabei acoplando no meu projeto aqui. valeu mais uma vez ... Vou postar esta resposta em um outro forum que postei essa mesma dúvida. Valeu JPaulo ... cheers fuizzz!!!
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvidos]Excluir registro após intervalo de horas (tempo) Empty Re: [Resolvidos]Excluir registro após intervalo de horas (tempo)

    Mensagem  JPaulo 2/7/2010, 21:27

    Valew pelo retorno.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvidos]Excluir registro após intervalo de horas (tempo) Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvidos]Excluir registro após intervalo de horas (tempo) Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvidos]Excluir registro após intervalo de horas (tempo) Folder_announce_new Instruções SQL como utilizar...

      Data/hora atual: 8/11/2024, 09:48