Probléme de Dates

Bonjour à tous,

J'ai besoin de vos lumières concernant la fonction WeekDay. celle-ci me semble évidente et bête à utiliser, mais j'ai apparement un souci.

J'utilise cette fonction pour savoir si je dois effectuer une action ou pas (sans rentrer dans les détails, effectuer un backup via FTP, dont la configuration est stockée dans la base de registre. Exemple : faire le backp à 15h du lundi au jeudi)

MSDN de VB me donne les infos suivantes quant aux valeurs de retour de la fonction WeekDay

Code:

---

1 2 3 4 5 6 7 8 9 10

Return Values The Weekday function can return any of these values: Constant Value Description vbSunday 1 Sunday vbMonday 2 Monday vbTuesday 3 Tuesday vbWednesday 4 Wednesday vbThursday 5 Thursday vbFriday 6 Friday vbSaturday 7 Saturday

---

Mais lorsque je fais un test, pour aujourd'hui mardi, la fonction me renvoie la valeur 7 au lieu de 3. Du coup mon prog ne fonctionne pas car ne détecte pas correctement quel jour de la semaine on est.

Quelqu'un a déjà eut ce problème ? Une astuce pour passer à côté (récupérer la date systéme en string par exemple ?)

Merci de votre aide

Ah bon ?

Curieux...
Chez moi :

Code:

---

MsgBox WeekDay(Now)

---

me renvoie bien 3 :lol:
As-tu vérifié la date de ton ordinnateur ?
Weekday fait confiance à cette date (et ne peut bien évidemment pas la corriger si elle est fausse ;))

Edit :

et ceci ne se trompe pas non plus (avec mon ordi à la date d'aujourd'hui) :

Code:

---

1 2 3

Private Sub Command1_Click() MsgBox WeekDay(Now) & "===>>" & Format(Day(WeekDay(Now)) + 1, "dddd") End Sub

---

Bonjour,

Un extrait de MSDN (en Français) :

Tu as bien paramétré l'argument firstdayofweek ?

Citation:

---

Weekday, fonction


Renvoie une valeur de type Variant (Integer) contenant un nombre entier qui représente le jour de la semaine.

Syntaxe

Weekday(date, [firstdayofweek])

La syntaxe de la fonction Weekday comprend lesarguments nommés suivants :

Élément Description
date Variant,expression numérique,expression de chaîne, ou toute combinaison qui peut représenter une date. Si l'argument date contient une variable de typeNull, Null est renvoyé.
Firstdayofweek Facultatif.Constante jour de la semaine. Si aucune valeur n'est précisée, vbSunday est la valeur par défaut.


Valeurs

L'argument firstdayofweek peut prendre les valeurs suivantes :

Constante Valeur Description
vbUseSystem 0 Utilise les paramètres de l'API NLS.
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


Valeurs renvoyées

La fonction Weekday peut renvoyer l'une de ces valeurs :

Constante Valeur Description
vbSunday 1 Dimanche
vbMonday 2 Lundi
vbTuesday 3 Mardi
vbWednesday 4 Mercredi
vbThursday 5 Jeudi
vbFriday 6 Vendredi
vbSaturday 7 Samedi

---