Discussion :

[Sankasssss]

Bonjour,

j'essaie d'afficher un total de temps en heure sans succès.
Actuellement j'ai ceci :

Code :

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

=TimeSpan.FromTicks(Sum(Fields!myFieldHour.Value)).ToString

Malheureusement dès que ça dépasse un jour il marque 1.10:20:30 au lieu de 34:20:30.

Je ne trouve malheureusement pas comment faire ceci. Merci d'avance pour votre aide.

[Sankasssss]

J'ai trouvé un truc que je n'avais pas encore utilisé. Dans les propriétés du rapport il y a un onglet "code" où j'ai mis :

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
    Public Function ConvertTimespan(ByVal s As String) As String
        Dim tabS As String() = s.Split(".")
        If tabS.Length = 2 Then
            Dim tabS2 As String() = tabS(1).Split(":")
            If IsNumeric(tabS(0)) And IsNumeric(tabS2(0)) Then
                Dim hours As Integer = (CInt(tabS(0)) * 24) + CInt(tabS2(0))
                Return hours.ToString & ":" & tabS2(1)
            Else
                Return s
            End If
        ElseIf tabS.Length =1 Then
            Dim tabS2 As String() = tabS(0).Split(":")
            Return tabS2(0) & ":" & tabS2(1)
        Else
                Return s
        End If
    End Function

Utilisé dans le rapport avec :

Code :

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

=Code.ConvertTimespan(TimeSpan.FromTicks(Sum(Fields!myFieldHour.Value)).ToString)

Et le tour est joué.

Bonne journée,