Date UTC

Sylvain a écrit :

Bonjour,

je cherche un moyen de savoir si une date/heure UTC donnée
est une date/heure hiver ou été

Merci.

Bonjour,

Une date UTC est la même chose qu'une date GMT, c'est à dire qu'elle ne
dépends pas de la zone horaire, ni du changement d'heure été/hivers.

Vincent GUICHARD

Salut,

Je ne sais pas si cela repond à la question (c'est du GMT), mais voici ce
que j'utilise pour générer la date du moment (Now())

'//Dans un module :

Option Explicit

Private Type SYSTEMTIME
wYear As Integer
wMonth As Integer
wDayOfWeek As Integer
wDay As Integer
wHour As Integer
wMinute As Integer
wSecond As Integer
wMilliseconds As Integer
End Type

Private Declare Sub GetSystemTime Lib "kernel32" (lpSystemTime As
SYSTEMTIME)

Private tblMonth(11) As String * 3
Private tblDay(6) As String * 3

Public Sub InitDate()
tblMonth(0) = "Jan"
tblMonth(1) = "Feb"
tblMonth(2) = "Mar"
tblMonth(3) = "Apr"
tblMonth(4) = "May"
tblMonth(5) = "Jun"
tblMonth(6) = "Jul"
tblMonth(7) = "Aug"
tblMonth(8) = "Sep"
tblMonth(9) = "Oct"
tblMonth(10) = "Nov"
tblMonth(11) = "Dec"

tblDay(0) = "Mon"
tblDay(1) = "Tue"
tblDay(2) = "Wen"
tblDay(3) = "Thu"
tblDay(4) = "Fri"
tblDay(5) = "Sat"
tblDay(6) = "Sun"

End Sub

Public Function GenDate() As String

Dim TimeSys As SYSTEMTIME, dtDateSystem As Date, dtTime As Date

Call GetSystemTime(TimeSys)
With TimeSys
dtTime = TimeSerial(.wHour, .wMinute, .wSecond)
dtDateSystem = DateSerial(.wYear, .wMonth, .wDay) & " " & dtTime
End With

GenDate = tblDay(Weekday(dtDateSystem, vbUseSystemDayOfWeek) - 1) & ", "
& Day(dtDateSystem) & " " & _
tblMonth(Month(dtDateSystem) - 1) & " " & Year(dtDateSystem) &
" " & dtTime & " GMT"

End Function


'//Dans la form


Private Sub Form_Load()
Call InitDate

Call MsgBox(GenDate)
End Sub


--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

Vincent Guichard wrote:

Sylvain a écrit :

Bonjour,

je cherche un moyen de savoir si une date/heure UTC donnée
est une date/heure hiver ou été

Merci.

Bonjour,

Une date UTC est la même chose qu'une date GMT, c'est à dire qu'elle
ne dépends pas de la zone horaire, ni du changement d'heure
été/hivers.
Vincent GUICHARD