[Resolvido]Data da Internet

Bom dia Amigo Teixeira

Apliquei o seu exemplo da data da internet, para usar como data num campo, para não deixar registar com datas futuras.

Como ontem estive por momentos sem internet, o Formulario dava erro por não ter a data, devolvia um valor assim "00:00:00" sem aspas claro.

Como vou resolver o assunto para quando não tiver internet mesmo que por pouco tempo ?

Obrigado


https://www.maximoaccess.com/t33653-captura-obter-data-e-hora-de-website

Pegue a do computador......

Olá a todos,

Assis, realmente pode falhar o acesso à internet.

Na minha opinião poderia antes de ir verificar a data da internet verificar se tem internet (existe exemplos no fórum).
Caso não esteja a funcionar pode usar a data do computador ou a mesma data do último movimento ou pura e simplesmente não deixar emitir documentos até ter internet.
Pode sempre personalizar conforme for mais conveniente.

Fica a minha sugestão.
Abraço a todos

Bom dia

Pegando as Vossas dicas scandinavo e Teixeira , funciona.

DataNet é o nome do campo que pega a data da internet.

No início a minha dúvida era o valor que o campo DataNet recebia quando não tinha internet, que era 00:00:00


Dim xData As Date
xData = fncDataHoraNet()
Me.DataNet = Left(xData, 10)

If DataNet = "00:00:00" Then
DataNet = Date
Else
End If

Obrigado

Olá a todos,

Assis, obrigado pelo retorno, o fórum agradece.

Abraço

Bom dia

Só tem um senão. Se estiver com o formulário aberto ao passar das 24:00:00 para 00:00:01 devia atualizar e não o faz. É Possível?



Obrigado

Olá Assis,

Tudo depende do intervalo que que tem no cronometro do formulario.

Se pretende que verifique ao segundo deve ser 1000 no intervalo.
Será isso?

Abraço

Teixeira

Sim, essa já está.

O pior é ter que esperar pela hora        para ver se funfa.

Abraço

Olá Assis,

Não compreendo bem o objectivo.
Mas se está a comparar na hora pode colocar por exemplo às 18:20:00 para mudar a data e contando de agora só espera 4 minutos.

Boa noite Amigos

Resolvido

Boa tarde Amigos

O exemplo da mensagem Nº 10 usa o Internet Explorar para obter a data e a hora.
 
Como podemos obter a data e a hora de outra forma sem usar o "internet explorer"

Obrigado

Ola Assis,

Alguma razão especial, está a dar algum erro?
Pelas pesquisas que fiz, desconheço se tem API para o "Microsoft Edge".

No entanto se pretende uma alternativa, veja via XmlHttp num webservice:
https://www.maximoaccess.com/t38077-capturando-datahora-de-um-servidor-da-net

Abraço

Olá Assis, alguma novidade?

Entretanto adaptei o meu exemplo para usar o também o método "XML Http Request", veja no tópico abaixo:
https://www.maximoaccess.com/t33653-capturar-obter-data-e-hora-de-website

Abraço

Obrigado Teixeira
Testei e funciona

Olá Assis,

... e funciona mais rápido

Aproveito para informar que criei outro endereço dthr.alwaysdata.net alternativo ao dthr.dx.am a diferença é com uma ligação segura (https) para quem necessitar:



Abraço

Obrigado Teixeira

Sempre na pesquisa .... é mesmo + rápido.

Bom domingo

Olá Assis,

É verdade, obrigado pelo feedback.
Bom fim de semana.

Abraço