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] Solicitar Data e Hora via internet

    RneoX
    RneoX
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 246
    Registrado : 26/07/2011

    [Resolvido] Solicitar Data e Hora via internet Empty [Resolvido] Solicitar Data e Hora via internet

    Mensagem  RneoX Sex 31 Ago 2012, 9:49 am

    Bom dia a todos!
    Estou a procura de um código que retorna uma Data e Hora de um site ou ip como: time.windows.com

    É uma ação preventiva que percebi, pois usando o Agora() Data() ou Hora() isto vai pegar do meu computador no horário e data em que ele está programado, fácil de enganar qualquer programa. Como aqueles que tem data para término, só ficar retrocedendo a data que o tempo é infinito...

    Existe algo em que eu possa fazer?


    Última edição por dhtm15 em Sex 31 Ago 2012, 2:53 pm, editado 1 vez(es)


    .................................................................................
    Conhece meus projetos que ajudam os usuários a entender o funcionamento de várias funções encontradas aqui no fórum? também pode usa-lo para seus negócios ou para uso pessoal, não conhece? então visite aqui e veja como está bacana: Projeto Casco do Máximo Access v3.0 (Pré-Release 4.0) 
    Ser livre é ter liberdade para expressar suas idéias,
    Ser diferente é ser especial e o reverso da igualdade,
    Ser criativo é ser poderoso,
    Ter conhecimentos e não dividir-los é ser egoísta e orgulhoso,
    Ensinar é um prazer que todos devem ter por seus alunos, pois é dele que vem nossos troféus.
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12226
    Registrado : 01/03/2011

    [Resolvido] Solicitar Data e Hora via internet Empty Re: [Resolvido] Solicitar Data e Hora via internet

    Mensagem  HARYSOHN Sex 31 Ago 2012, 12:07 pm

    Boas Dhtm no repositório de Códigos VBA há um Script para isto.

    Cumprimentos.
    RneoX
    RneoX
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 246
    Registrado : 26/07/2011

    [Resolvido] Solicitar Data e Hora via internet Empty Re: [Resolvido] Solicitar Data e Hora via internet

    Mensagem  RneoX Sex 31 Ago 2012, 12:14 pm

    como consigo localizar? eu já usei o buscar mas não encontrei, talvez eu não consiga achar da maneira que escrevo...

    eu usei:
    Update de data online
    Data e hora via internet
    Data via internet
    Data() Internet
    e etc...

    não achei...

    sou péssimo para encontrar coisas Sad

    Ok agora achei! eu estava olhando em VBA e Módulos, mas não vi que tinha uma ultima lá em baixo com Script...


    .................................................................................
    Conhece meus projetos que ajudam os usuários a entender o funcionamento de várias funções encontradas aqui no fórum? também pode usa-lo para seus negócios ou para uso pessoal, não conhece? então visite aqui e veja como está bacana: Projeto Casco do Máximo Access v3.0 (Pré-Release 4.0) 
    Ser livre é ter liberdade para expressar suas idéias,
    Ser diferente é ser especial e o reverso da igualdade,
    Ser criativo é ser poderoso,
    Ter conhecimentos e não dividir-los é ser egoísta e orgulhoso,
    Ensinar é um prazer que todos devem ter por seus alunos, pois é dele que vem nossos troféus.
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12226
    Registrado : 01/03/2011

    [Resolvido] Solicitar Data e Hora via internet Empty Re: [Resolvido] Solicitar Data e Hora via internet

    Mensagem  HARYSOHN Sex 31 Ago 2012, 2:44 pm

    Pois é... é o primeiro na sala de repositório VbScript.

    Resolvido o Tópico então?


    Saudações.
    RneoX
    RneoX
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 246
    Registrado : 26/07/2011

    [Resolvido] Solicitar Data e Hora via internet Empty Re: [Resolvido] Solicitar Data e Hora via internet

    Mensagem  RneoX Sex 31 Ago 2012, 2:49 pm

    na verdade não tive tempo de verificar este script, pois tinha surgido outros problemas, mas creio que seja fácil de fazer este então por enquanto resolvido! Smile


    .................................................................................
    Conhece meus projetos que ajudam os usuários a entender o funcionamento de várias funções encontradas aqui no fórum? também pode usa-lo para seus negócios ou para uso pessoal, não conhece? então visite aqui e veja como está bacana: Projeto Casco do Máximo Access v3.0 (Pré-Release 4.0) 
    Ser livre é ter liberdade para expressar suas idéias,
    Ser diferente é ser especial e o reverso da igualdade,
    Ser criativo é ser poderoso,
    Ter conhecimentos e não dividir-los é ser egoísta e orgulhoso,
    Ensinar é um prazer que todos devem ter por seus alunos, pois é dele que vem nossos troféus.
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12226
    Registrado : 01/03/2011

    [Resolvido] Solicitar Data e Hora via internet Empty Re: [Resolvido] Solicitar Data e Hora via internet

    Mensagem  HARYSOHN Sex 31 Ago 2012, 2:55 pm

    O Fórum agradece o Retorno.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2322
    Registrado : 23/01/2018

    [Resolvido] Solicitar Data e Hora via internet Empty Re: [Resolvido] Solicitar Data e Hora via internet

    Mensagem  crysostomo Ter 03 Mar 2020, 6:19 pm

    o que eu uso feito pelo teixeira está dando erro , está como desligamento agendado do sistema


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7701
    Registrado : 15/03/2013

    [Resolvido] Solicitar Data e Hora via internet Empty Re: [Resolvido] Solicitar Data e Hora via internet

    Mensagem  Alvaro Teixeira Ter 03 Mar 2020, 7:50 pm

    Ola Gilliard,

    Qual o exempo que usa que está a dar erros?

    Veja este se ajuda, acabei de testar e funciona:
    https://www.maximoaccess.com/t33653-capturar-obter-data-e-hora-de-website

    Abraço
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2322
    Registrado : 23/01/2018

    [Resolvido] Solicitar Data e Hora via internet Empty Re: [Resolvido] Solicitar Data e Hora via internet

    Mensagem  crysostomo Qua 04 Mar 2020, 10:28 am

    Bom dia Teixeira.  Cheguei a te enviar uma mensagem privada, pois o exemplo que está dando erro e aquele que você criou.
    Até então estava tudo certo. Agora que começou dar.esse erro.
    é parecido mas vou dar uma olhada. e retornarei


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2322
    Registrado : 23/01/2018

    [Resolvido] Solicitar Data e Hora via internet Empty Re: [Resolvido] Solicitar Data e Hora via internet

    Mensagem  crysostomo Qua 04 Mar 2020, 10:41 am

    Deu certo ,então o problema é em outro computador, que mostra a seguinte mensagem " um desligamento já foi agendado" e entra em depuração marcando essa linha
    Código:
       Set objIE = CreateObject("InternetExplorer.Application")


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

      Data/hora atual: Seg 05 Dez 2022, 3:30 pm