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


4 participantes

    [Resolvido]Aviso em um determinado horário

    avatar
    Naldo
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 384
    Registrado : 16/02/2011

    [Resolvido]Aviso em um determinado horário Empty [Resolvido]Aviso em um determinado horário

    Mensagem  Naldo 23/2/2012, 21:35

    Saudações a todos.
    Gostaria de uma ajuda de como fazer quando meu form. estiver aberto o sistema me de um aviso todos os dias em um determinado horário (Ex. 12h00min).
    Encontrei alguns exemplos de agenda aqui no fórum, mas não consegui adaptar
    Sou grato pela atenção de todos
    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]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  criquio 23/2/2012, 21:43

    É só colocar algo assim:

    If Time = "#12:00:00#" Then
    MsgBox "Acoooooorda meninoooo", vbInformation, "HORA DE ACORDAR"
    Else
    End If


    .................................................................................
    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
    Naldo
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 384
    Registrado : 16/02/2011

    [Resolvido]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  Naldo 23/2/2012, 22:43

    Saudações Criquio.

    Tentei adicionar ao abrir formulário mas não deu certo, vc poderia me dar uma luz em qual evento seria do formulário.
    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]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  criquio 23/2/2012, 22:59

    Eventos agendados precisam ser colocados no evento "No timer" com o intervalo do cronômetro maior que 0. Se colocar em 1000, significa que será verificado segundo a segundo.


    .................................................................................
    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
    Naldo
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 384
    Registrado : 16/02/2011

    [Resolvido]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  Naldo 23/2/2012, 23:29

    Criquio, fiz o teste e não da a menssagem no horário agendado
    inseri desta maneira

    If Time = "#23:59:30#" Then 'Me avisar todos os dias neste horário
    MsgBox "Acoooooorda meninoooo", vbInformation, "HORA DE ACORDAR"
    Else
    End If
    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]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  criquio 24/2/2012, 10:40

    Dê uma pesquisadinha no help do vba para aprender como trabalhar com data/hora. Tem bastante informação lá.


    .................................................................................
    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
    Naldo
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 384
    Registrado : 16/02/2011

    [Resolvido]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  Naldo 24/2/2012, 11:47

    Ok, Vou ver se consigo resolver.
    Sou muito grato pela sua ajuda
    hugopanzer
    hugopanzer
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 182
    Registrado : 16/11/2010

    [Resolvido]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  hugopanzer 24/2/2012, 12:34

    Oi,
    Teste assim:

    Private Sub Form_Timer()
    If Time = #12:33:00 PM# Then
    MsgBox "Acoooooorda meninoooo", vbInformation, "HORA DE ACORDAR"
    Else
    End If
    End Sub

    No campo intervalo do cronómetro coloque 50

    Testei aqui e funcionou.
    avatar
    Naldo
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 384
    Registrado : 16/02/2011

    [Resolvido]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  Naldo 24/2/2012, 14:56

    Hugopanzer, Deu certinho do mode que vc me explicou, ficou 1000.

    Sou muito grato pela sua atenção e também a do Criquio.

    QUE DEUS LHES ABENÇOE.
    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]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  criquio 24/2/2012, 15:03

    Ótimo. Só faltou o Resolvido. E deixo como dica pesquisar a forma de se trabalhar com Data e Hora, conforme falei acima. Você aprenderá bastante coisa que se pode fazer com cálculos de tempo.


    .................................................................................
    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.

    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 680
    Registrado : 14/12/2010

    [Resolvido]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  julianovv 24/2/2012, 18:41

    Interessante. Agora, se eu quiser mostrar uma mensagem a cada meia hora avisando que o banco de dados está aberto e sem uso?
    Para mim serviria bem porque meu sistema está em rede e o desempenho aumenta quando todos os aplicativos estão fechados.

    Wink
    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]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  criquio 24/2/2012, 19:27

    Coloque uma variável tipo Integer e vá acumulando os segundos nela e programa para quando chegar a 30, avisar e zerar a variável. A variável deve ser declarada no escopo do formulário:

    If T < 30 Then
    T = T + 1
    Else
    T = 0
    MsgBox "Mensagem"
    End If


    .................................................................................
    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.


    Conteúdo patrocinado


    [Resolvido]Aviso em um determinado horário Empty Re: [Resolvido]Aviso em um determinado horário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 2/5/2024, 01:57