Temps universel

[dodineau]

Bonjour,
Je voudrais savoir comment obtenir l'heure universelle, c'est-à-dire l'heure au méridien de Greenwich.
Je suis en train de faire un programme d'astronomie qui réclame l'heure TU.

Merci
A+

 

[andré]

Salut,

Je ne saisis pas bien ton problème.

Si je ne me trompes, entre le dernier dimanche d'octobre à 2:00 et le dernier dimanche de mars à 2:00, c'est l'heure de ton ordinateur - 1:00, sinon c'est - 2:00 (pour autant que habites la France, la Belgique, la Suisse, ...).

Rencontres-tu une difficulté à écrire cette formule ?

Â+

 

[dodineau]

André : Mon Programme doit être universel.Il peut être utilisé par un astronome de Paris, New-York, Moscou,....

Comment connaitre son fuseau ?
Je pense qu'il est possible de lire dans les paramètres 'fuseau horaire ' du PC.

Merci.

 

[andré]

Resalut,

J'ai un peu regardé partout, mais je n'ai pas trouvé réponse à ta question.

Il faudrait en effet pouvoir récupérer la différence entre l'heure Greenwich et celle de l'oridinateur, mais là mes connaissances en informatique sont pour le moins quelque peu limitées.

Dommage.

Â+

 

[dodineau]

Merci tout de même pour avoir essayé.

A+

 

[PascalXLD]

Bonjour

Je pense (mais je n'en suis pas sûr) que par les API on doit pouvoir avoir l'heure TUC

Mais le problème c'est que je n'ais pas encore vraiment joué avec les API et que pour l'instant je ne sais pas faire

Mais cela me donne envie de m'y mettre

Mais pour ce soir ça va être juste

😉

 

[michel_m]

Bonjour Dodineau, Pascal, André

Ci joint procédure donnant le temps universel (d'après MSDN WMI):

Sub donner_heuregmt()
Dim datetime As Object
Set datetime = CreateObject('Wbemscripting.swbemdatetime')
datetime.setvardate (FormatDateTime(Time))
MsgBox 'heure GMT:' & datetime.getvardate(False)

End Sub

nota: pas forcément l'heure exacte car basée sur l'heure système de la bécane

a+

Michel_m

 

[dodineau]

Bonjour,
Merci Michel_m toujours au rendez-vous des questions 'impossibles'.

J'étais allé voir sur MSDN mais je n'y ai rien trouvé.

Encore merci et A+