TROUVER LE NUMERO DE LA SEMAINE

---

Commentaire sur cette source (2)
Ajouter un commentaire et/ou une note

cette fonction permet de trouver le numero de la semaine de l'année.
Elle prend juste la date en parametre.

Par contre je veux bien un renseignement si quelqu'un l'a:
quelle est la regle des numeros de semaine?
c'est a dire quand commence la semaine 1 ?
comment on peut savoir (sans parler programmation) si on est dans la semaine 1 ou la semaine 52 de l'annee d'avant?
dans cette fonction, j'ai pris en compte que le 5 jours de l'annee devait etre dans la premiere semaine, c.a.d. qu'il y a au moins 3 jours ouvré dedans. Mais je ne sais pas si c'est une regle bien definit, parce qu'apparement il n'y aurait pas de regle fixée...

jeromax@webmails.com

<%
Function NumSemaine(UneDate)'renvoie le numéro de la semaine en fonction de la date rentrée
	sem = CInt(DateDiff("ww", "05/01/" & Year(UneDate), UneDate, vbMonday, vbfirstweek)) + 1
	If sem = 0 And (Weekday(UneDate) = 2) And Month(UneDate) = 1 Then
		sem = 1
	Else
		If sem = 0 Then
			sem = CInt(DateDiff("ww", "05/01/" & Year(UneDate), "31/12/" & Year(UneDate), vbMonday, vbFirstFullWeek)) + 1
		End If
	End If
	NumSemaine = sem
End Function
%>
Le numero de la semaine courante est <%=NumSemaine(date())%>
  

• PROTECTION DE PAGE GRACE AUX VARIABLES SESSIONS
• LISTE DES VARIABLES SERVEUR

• CONVERSION D'UNE DATE/HEURE STANDARD VERS DATE/HEURE CONFORME À LA NORME RFC822
• CALCUL DE L'AGE D'UNE PERSONNE (ASP VBSCRIPT)
• CONVERSION DE GMT À LOCAL ET DE LOCAL À GMT
• CALENDRIER DYNAMIQUE AVEC JOURS FERIES
• SAISIR DATE FR DANS MYSQL

• CONVERSION D'UNE DATE/HEURE STANDARD VERS DATE/HEURE CONFORME À LA NORME RFC822
• CALCUL DE L'AGE D'UNE PERSONNE (ASP VBSCRIPT)
• CALENDRIER DYNAMIQUE AVEC JOURS FERIES
• SAISIR DATE FR DANS MYSQL
• DATE AVEC LE DECALAGE HORAIRE,