probleme de mois

Version imprimable

14/09/2011, 11h54
ptikiki

probleme de mois

Bonjour

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

Code:

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

Bonjour,

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

Code:

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

14/09/2011, 13h45
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

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:

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.

10/11/2011, 18h06
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 :lahola:
11/11/2011, 19h32
depmicro

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