Page 1 sur 1
[R] Script qui s'éxécute 1 fois par mois,1 jour particulier
Posté : mar. 13 mai 2008 21:33
par bilou972
Bonjour,
j'ai un script qui ne doit s'exécuter que le lundi qui suit le premier dimanche du mois. Si le premier jour du mois est un lundi, le script ne s'exécutera donc pas ce lundi la mais le lundi d'après.
Par exemple pour le mois de septembre 2008, le script s'exécuterait le 8 et non pas le 1er.
Comment puis-je faire pour tester ces conditions ?
Re: [..]Script qui s'éxécute 1 fois par mois,1 jour particulier
Posté : mar. 13 mai 2008 23:41
par Tlem
Pas mal comme Brain Storming.
Ca doit coller :
Code : Tout sélectionner
#include <Date.au3>
Dim $SavDate
; Condition 1 : Nous sommes Lundi,
If @WDAY = 2 Then
; le jour du mois et supérieur ou égal à 2 et inférieur ou égal à 7.
If @MDAY >= 2 And @MDAY <= 7 Then
$SavDate = _NowCalcDate()
; Sinon, nous sommes le Lundi 1er et donc c'est pour dans 8 Jours :
Else
$SavDate = _DateAdd( 'd',7, _NowCalcDate())
EndIf
EndIf
MsgBox(0,"","Date de la sauvegarde :" & $SavDate)
Re: [..] Script qui s'éxécute 1 fois par mois,1 jour particu
Posté : mer. 14 mai 2008 02:15
par bilou972
Merci. Je testerai demain.
Re: [..] Script qui s'éxécute 1 fois par mois,1 jour particulier
Posté : mer. 14 mai 2008 10:02
par tutu
Si le lundi tombe un 1er, il ne faudrait pas plutot
Pour un lundi en debut de mois, on se retrouve avec un lundi 8 et plus besoin du else?
Re: [..] Script qui s'éxécute 1 fois par mois,1 jour particulier
Posté : mer. 14 mai 2008 17:53
par bilou972
tutu a écrit :Si le lundi tombe un 1er, il ne faudrait pas plutot
Pour un lundi en debut de mois, on se retrouve avec un lundi 8 et plus besoin du else?
Effectivement, ca fonctionne, merci a vous deux.