OVH Cloud OVH Cloud

Probleme DATE

7 réponses
Avatar
Salva
Bonsoir a tous.

J'ai un probleme de date,
Vopici ca quer je fais :
Sem = Format(Date, "ww")
Sem1 = Sem - 1
Sem2 = Sem
Sem3 = Sem + 1

La variable Sem est declaree
Dim Seme as Integer

Mon problème est que Sem contient 17 au lieux de 16 (bien sur pour cette
semaine ci, entre le 18/04/2005 et 24/04/2005)



Comme je dois gérer 3 semaines, je suis dans la mauvaise semaine !!!!!!!



J'ai vérifier le fuseau horaire de Windows (Bruxelles, Paris,......)



Je en comprends pas.



A l'aide SVP



Merci de votre aide


Salva

7 réponses

Avatar
Jacques93
Bonsoir,
Salva wrote:
Bonsoir a tous.

J'ai un probleme de date,
Vopici ca quer je fais :
Sem = Format(Date, "ww")
Sem1 = Sem - 1
Sem2 = Sem
Sem3 = Sem + 1

La variable Sem est declaree
Dim Seme as Integer

Mon problème est que Sem contient 17 au lieux de 16 (bien sur pour cette
semaine ci, entre le 18/04/2005 et 24/04/2005)




Tout dépend comment on définit la premièreee semaine de l'année

Sem = Format(Date, "ww", , vbFirstFullWeek)

renvoie 16 (come le calendrier de La Poste)

The firstweekofyear argument has these settings:

vbUseSystem 0 Use NLS API setting.
vbFirstJan1 1 Start with week in which January 1 occurs (default).
vbFirstFourDays 2 Start with the first week that has at least four
days in the year.
vbFirstFullWeek 3 Start with the first full week of the year.

--
Cordialement,

Jacques.
Avatar
Jacques93
Jacques93 wrote:
Bonsoir,
Salva wrote:

Bonsoir a tous.

J'ai un probleme de date,
Vopici ca quer je fais :
Sem = Format(Date, "ww")
Sem1 = Sem - 1
Sem2 = Sem
Sem3 = Sem + 1

La variable Sem est declaree
Dim Seme as Integer

Mon problème est que Sem contient 17 au lieux de 16 (bien sur pour cette
semaine ci, entre le 18/04/2005 et 24/04/2005)




Tout dépend comment on définit la premièreee semaine de l'année

Sem = Format(Date, "ww", , vbFirstFullWeek)

renvoie 16 (come le calendrier de La Poste)

The firstweekofyear argument has these settings:

vbUseSystem 0 Use NLS API setting.
vbFirstJan1 1 Start with week in which January 1 occurs (default).
vbFirstFourDays 2 Start with the first week that has at least four
days in the year.
vbFirstFullWeek 3 Start with the first full week of the year.




Désolé, en français :

vbUseSystem 0 Utilise le paramètrage NLS API
vbFirstJan1 1 la 1ere semaine est celle qui contient le 1er
Janvier (valeur par défaut)
vbFirstFourDays 2 la 1ere semaine est celle qui a au moins 4 jours
dans l'année
vbFirstFullWeek 3 La 1ere semaine est la premiere semaine complète
de l'année

donc si valeur par défaut (vbFirstJan1) on est dans la 17eme semaine
avec vbFirstFullWeek, on est dans la 16eme

--
Cordialement,

Jacques.
Avatar
Patrice Henrio
sans parler du jour de démarrage de la semaine qui dépend des systèmes.
"Jacques93" a écrit dans le message de
news:
Jacques93 wrote:
Bonsoir,
Salva wrote:

Bonsoir a tous.

J'ai un probleme de date,
Vopici ca quer je fais :
Sem = Format(Date, "ww")
Sem1 = Sem - 1
Sem2 = Sem
Sem3 = Sem + 1

La variable Sem est declaree
Dim Seme as Integer

Mon problème est que Sem contient 17 au lieux de 16 (bien sur pour cette
semaine ci, entre le 18/04/2005 et 24/04/2005)




Tout dépend comment on définit la premièreee semaine de l'année

Sem = Format(Date, "ww", , vbFirstFullWeek)

renvoie 16 (come le calendrier de La Poste)

The firstweekofyear argument has these settings:

vbUseSystem 0 Use NLS API setting.
vbFirstJan1 1 Start with week in which January 1 occurs (default).
vbFirstFourDays 2 Start with the first week that has at least four
days in the year.
vbFirstFullWeek 3 Start with the first full week of the year.




Désolé, en français :

vbUseSystem 0 Utilise le paramètrage NLS API
vbFirstJan1 1 la 1ere semaine est celle qui contient le 1er
Janvier (valeur par défaut)
vbFirstFourDays 2 la 1ere semaine est celle qui a au moins 4 jours
dans l'année
vbFirstFullWeek 3 La 1ere semaine est la premiere semaine complète
de l'année

donc si valeur par défaut (vbFirstJan1) on est dans la 17eme semaine
avec vbFirstFullWeek, on est dans la 16eme

--
Cordialement,

Jacques.


Avatar
LE TROLL
Ah, là, le jour de départ, normalement on tourne sur le
calendrier catholique, alors c'est toujours le dimanche
(rapport à la genèse et au repos :o)
-------------



"Patrice Henrio" a écrit dans
le message de news:
sans parler du jour de démarrage de la semaine qui dépend
des systèmes.
"Jacques93" a écrit
dans le message de news:

Jacques93 wrote:
Bonsoir,
Salva wrote:

Bonsoir a tous.

J'ai un probleme de date,
Vopici ca quer je fais :
Sem = Format(Date, "ww")
Sem1 = Sem - 1
Sem2 = Sem
Sem3 = Sem + 1

La variable Sem est declaree
Dim Seme as Integer

Mon problème est que Sem contient 17 au lieux de 16
(bien sur pour cette
semaine ci, entre le 18/04/2005 et 24/04/2005)




Tout dépend comment on définit la premièreee semaine de
l'année

Sem = Format(Date, "ww", , vbFirstFullWeek)

renvoie 16 (come le calendrier de La Poste)

The firstweekofyear argument has these settings:

vbUseSystem 0 Use NLS API setting.
vbFirstJan1 1 Start with week in which January 1
occurs (default).
vbFirstFourDays 2 Start with the first week that has at
least four
days in the year.
vbFirstFullWeek 3 Start with the first full week of the
year.




Désolé, en français :

vbUseSystem 0 Utilise le paramètrage NLS API
vbFirstJan1 1 la 1ere semaine est celle qui contient
le 1er
Janvier (valeur par défaut)
vbFirstFourDays 2 la 1ere semaine est celle qui a au
moins 4 jours
dans l'année
vbFirstFullWeek 3 La 1ere semaine est la premiere semaine
complète
de l'année

donc si valeur par défaut (vbFirstJan1) on est dans la
17eme semaine
avec vbFirstFullWeek, on est dans la 16eme

--
Cordialement,

Jacques.






Avatar
Jacques93
LE TROLL wrote:
Ah, là, le jour de départ, normalement on tourne sur le
calendrier catholique, alors c'est toujours le dimanche
(rapport à la genèse et au repos :o)
-------------



"Patrice Henrio" a écrit dans
le message de news:

sans parler du jour de démarrage de la semaine qui dépend
des systèmes.





Format(expression[, format[, firstdayofweek[, firstweekofyear]]])

Paramètre FirstDayOfWeek :

vbUseSystem 0 Utilise le paramètrage NLS API
VbSunday 1 Dimanche (Valeur par défaut)
vbMonday 2 Lundi
vbTuesday 3 Mardi
vbWednesday 4 Mercredi
vbThursday 5 Jeudi
vbFriday 6 Vendredi
vbSaturday 7 Samedi

Dans son immense bonté (MS étant d'un pays à majorité protestante)
a quand même choisi le dimanche commme début de semaine

Notez l'effort intense que j'ai fait pour la traduction :-D


--
Cordialement,

Jacques.
Avatar
GD
Bonsour® Salva
Probleme répertorié :
http://support.microsoft.com/default.aspx?scid=kb;fr;469627

;o))

@+

wrote:
Bonsoir a tous.

J'ai un probleme de date,
Mon problème est que Sem contient 17 au lieux de 16 (bien sur pour
cette semaine ci, entre le 18/04/2005 et 24/04/2005)



Avatar
LE TROLL
Salve Jacques, recte est, habemus papam, panzerCardinal
Joseph Ratzinger papam est :o)
----------

"Jacques93" a écrit dans
le message de news:
%
LE TROLL wrote:
Ah, là, le jour de départ, normalement on tourne sur le
calendrier catholique, alors c'est toujours le dimanche
(rapport à la genèse et au repos :o)
-------------



"Patrice Henrio" a écrit
dans le message de news:


sans parler du jour de démarrage de la semaine qui dépend
des systèmes.





Format(expression[, format[, firstdayofweek[,
firstweekofyear]]])

Paramètre FirstDayOfWeek :

vbUseSystem 0 Utilise le paramètrage NLS API
VbSunday 1 Dimanche (Valeur par défaut)
vbMonday 2 Lundi
vbTuesday 3 Mardi
vbWednesday 4 Mercredi
vbThursday 5 Jeudi
vbFriday 6 Vendredi
vbSaturday 7 Samedi

Dans son immense bonté (MS étant d'un pays à majorité
protestante)
a quand même choisi le dimanche commme début de semaine

Notez l'effort intense que j'ai fait pour la traduction
:-D


--
Cordialement,

Jacques.