Horloge atomique ntp et ip v4.1

0/5 (10 avis)

Vue 19 967 fois - Téléchargée 1 802 fois

Description

Logiciel permettant la mise à l'heure précise du PC par consultation de près de 100 sites
NTP _IP avec affichage de la situation de l'horloge atomique consultée.
Possibilité de comparaison avec l'horloge parlante.

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Sechaud
Messages postés
288
Date d'inscription
jeudi 28 octobre 2004
Statut
Membre
Dernière intervention
3 janvier 2017

23 déc. 2005 à 09:01
Pour ceux qui le veulent, voici 3 nouveaux serveurs français qui répondent et que l'on peut ajouter à la deuxième ligne du fichier Serveurs.ini
ntp.uvsq.fr
ntp.laas.fr
ntp.u-psud.fr

Dans le fichier Localisations.txt, mettre ça:

France Université de Versailles ntp.uvsq.fr 193.51.24.1
France Laas CNRS Toulouse ntp.laas.fr
France Campus d'Orsay, Paris Sud
ntp.u-psud.fr
Sechaud
Messages postés
288
Date d'inscription
jeudi 28 octobre 2004
Statut
Membre
Dernière intervention
3 janvier 2017

16 déc. 2005 à 10:02
Je viens de constater que depuis que j'ai diminué le temps de consultation à 8s, si on testee un autre serveur un peu vite, T ne se met pas à 0 et on obtient une valeur erronée du temps.
Il faut remettre T à 0 dans la Sub de départ.Ajoutez
T = "0"

Private Sub Command1_Click()
Winsock1.Close
sNTP = ""
Label5.Caption = ""
Label6.Caption = ""
T = "0"

Excusez-moi, je poste un peu trop vite, je crois.je ne teste pas assez.
Sechaud
Messages postés
288
Date d'inscription
jeudi 28 octobre 2004
Statut
Membre
Dernière intervention
3 janvier 2017

14 déc. 2005 à 14:33
En allant sur le site de l'horloge parlante:
http://www.horlogeparlante.com/
On constate une perte d'une "chtite..seconde".
Je propose donc de corriger la ligne de correction en ajoutant 1s.--->

sngTimeDelay = ((Timer - sngTimeDelay) / 2) + 1
'correction en secondes à apporter entre la connection et la fermeture de connection.
Et là, on est très proche de la justesse..
Sechaud
Messages postés
288
Date d'inscription
jeudi 28 octobre 2004
Statut
Membre
Dernière intervention
3 janvier 2017

14 déc. 2005 à 10:34
Je vous remercie tous pour vos remarques et conseils.
Jack j'ai corrigé les anomalies que tu m'as indiquées.
Je ne savais pas que le Timer s'arrêtait à minuit.Je l'ai quand même laissé car en fait il ne sert qu'à visualiser le comptage de l'horloge du PC.
Vos propositions d'ajoûts de possibilités sont intéressantes, mais je ne sais pas si je suis capable
de réaliser ça.Je ne suis pas un expert en VB.
cs_drissou
Messages postés
160
Date d'inscription
dimanche 7 décembre 2003
Statut
Membre
Dernière intervention
14 janvier 2009

14 déc. 2005 à 09:47
Bonjour,

je n'ai pas complètement vu ta source, mais serait il possible de créer un automatisme dans ton prog , notamment en rajoutant une commande de type "/A" qui permettrait de mettre tout seul à jour l'heure, ce qui pourrait être piloté par exemple par le plannificateur de taches..
Le choix du serveur pourrait être fait en l'ouvrant manuellement, et repris automatiquement dans la version automatique, quitte à mettre un message d'erreur, si mauvaise connection

Driss
Afficher les 10 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.