Discussion :

[youssef222]

Bonjour,

Je veux un exemple de code .net qui permettra de convertir cette forme de date : 1040170677 en date normale.

Voici exemple de fonction mais ça ne marche pas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Public Function DateJulienneVersDate(ByVal DateJulienne As Double) As String
 
        On Error Resume Next
 
        Dim vDateJulienne As Long
 
        vDateJulienne = CLng(Fix(DateJulienne))
 
        '------------------------------------------------
 
        '
 
        '   Valeur mini : 01/01/0100 ou maxi 31/12/9999
 
        '
 
        '------------------------------------------------
 
        If (vDateJulienne > 1757585) And (vDateJulienne < 5373484) Then
 
            DateJulienneVersDate = Format(Date.FromOADate(vDateJulienne - 2415019), "dd/MM/yyyy")
            Return DateJulienneVersDate
        End If
 
    End Function

Cordialement.

[tomlev]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

On Error Resume Next

ça existe encore en VB.NET ça ???!
Cette instruction est une aberration complète... si une erreur se produit, ça n'a aucun sens de continuer comme si de rien n'était

Enfin bon, passons et revenons à la question...

Il faudrait que tu sois plus précis. C'est quoi le format de date dont tu parles ? un nombre de ticks ? un timestamp UNIX (nombre de secondes depuis le 01/01/1970) ?

[youssef222]

C'est un timestamp UNIX.

[StormimOn]

Si c'est un timestamp UNIX il suffit de le traiter comme tel, c'est à dire le nombre de secondes écoulées depuis le 1er janvier 1970.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim date As DateTime = New DateTime(1970, 1, 1).AddSeconds(1275827112)

[youssef222]

Merci beaucoup, ça marche parfaitement.