[2008R2] TimeSpan en HH:mm:ss au lieu de dd.HH:mm:ss

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:

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:

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

Et le tour est joué.

Bonne journée,