MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

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

    [Resolvido] Solicitar Data e Hora via internet

    RneoX
    RneoX
    Avançado
    Avançado

    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 em 31/8/2012, 13:49

    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 31/8/2012, 18:53, 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 100%

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

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

    Mensagem  HARYSOHN em 31/8/2012, 16:07

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

    Cumprimentos.
    RneoX
    RneoX
    Avançado
    Avançado

    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 em 31/8/2012, 16:14

    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 100%

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

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

    Mensagem  HARYSOHN em 31/8/2012, 18:44

    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 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 em 31/8/2012, 18:49

    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 100%

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

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

    Mensagem  HARYSOHN em 31/8/2012, 18:55

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

    Respeito às Regras 50%

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

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

    Mensagem  crysostomo em 3/3/2020, 21:19

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


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  ahteixeira em 3/3/2020, 22:50

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

    Respeito às Regras 50%

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

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

    Mensagem  crysostomo em 4/3/2020, 13:28

    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


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

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

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

    Mensagem  crysostomo em 4/3/2020, 13:41

    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")


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

      Data/hora atual: 5/12/2020, 08:46