Discussion :

[ptikiki]

Bonjour

Suite a ceci, jai simplifié et pour avoir mon mois jai :

Code :

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

mois = Trim(Str(CInt(semaine / 4)))

mais avec ça la semaine 13 qui est normalement au mois d'avril viens au mois de mars (arrondie à l'entier le plus proche)
et je sais pas comment régler
quelqu un a t il une solution ?

Merci de m'aider

[Sankasssss]

Bonjour,

Dans le post que tu cites, BenoitM te donne la solution :

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
public DateTime GetLastOccurenceOfDay(DateTime value, DayOfWeek dayOfWeek)
{
      int daysToAdd = dayOfWeek - value.DayOfWeek;
      if(daysToAdd < 1) 
      {
            daysToAdd -= 7;
      } 
      return value.AddDays(daysToAdd);
}
 
public DateTime GetFirstDayOfWeek(int year, int weekNumber, DayOfWeek dayOfWeek)
{
      return GetLastOccurenceOfDay(new DateTime(year,1,1).AddDays(7*weekNumber), dayOfWeek);
}
 
public DateTime GetFirstDayOfWeek(int weekNumber)
{
      return GetFirstDayOfWeek(DateTime.Today.Year,weekNumber, DayOfWeek.Monday);
}

bonne journée.

EDIT : Fait gaffe car une semaine peut être à cheval sur 2 mois.
tien se serait de bonne fonction à mettre dans la librairie Dvp.NET

[ptikiki]

J'avais cette solution, cest pourquoi jai dis ue j avais simplifié je voulais juste savoir si il y avait un moyen aute mais merci

[chrismonoye]

Bonjour,
je ne pense pas que l'on puisse simplifier si facilement :
- il faut connaitre l'année, pour savoir si elle commence par la semaine 1 ou le reliquat de la semaine 52 de l'année qui la précède;
- il faut définir un jour, sans quoi, comme le dit Sankasssss, certaines semaines sont à cheval sur deux mois et alors, lequel choisir?

Par contre le code proposé ci dessus, semble provoquer un décalage d'une semaine, pour les années commençant par le reliquat de la semaine 52 de l'année précédente (exemple : 2011).
De plus il respecte la culture "en-US", où le premier jour de la semaine est le dimanche.
Si cela est quelque fois admis en France, la majorité des calendriers français par contre, commencent la semaine le lundi.

Ci dessous la fonction modifiée :

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
    Public Function GetDayOfWeek(ByVal year As Integer, ByVal weekNumber As Integer, ByVal dayWeek As DayOfWeek) As DateTime
 
        Dim value As DateTime = New DateTime(year, 1, 1).AddDays(7 * weekNumber)
 
        Dim daysToAdd As Integer
        If dayWeek = System.DayOfWeek.Sunday Then
            daysToAdd = 7 - value.DayOfWeek
        Else
            daysToAdd = dayWeek - value.DayOfWeek
        End If
 
        If New DateTime(value.Year, 1, 1).DayOfWeek < 5 Then
            daysToAdd -= (7)
        End If
 
        Return value.AddDays(daysToAdd)
 
    End Function

Reste à tester plus amplement et en extraire le mois.

[Sankasssss]

Bonsoir à tous,

suite à cette demande, notre bon tomlev l'a développé et mis dans la dll Dvp.net : http://projets.developpez.com/issues/1405

Je mets à jour ici pour ceux que ça intéresserait...

Et encore bravo à tomlev

[depmicro]

Bonjour à la Team, je suis également intéressé par cette fonction... je l'attend avec impatience. Merci encore au dev.