Bonjur,

Sous MSDOS, je souhaiterais savoir s'il est possible de récupérer un date du
style date - x jours ou date + xjours.

Merci par avance

"news.free.fr" <jipief***hotmail.com> a écrit dans le message de
news:47b47e62$0$19703$426a74cc***news.free.fr...
> Bonjur,
>
> Sous MSDOS,
Sous MSDOS réellement ou plutôt en ligne de commande sous Windows ?

> je souhaiterais savoir s'il est possible de récupérer un date du style
> date - x jours ou date + xjours.

En VBS, c'est très facile, grace à la fonction "DateAdd", qui calcule
automatiquement un décalage de date, en tenant compte des années
bissextiles, accepte la date en entrée sous n'importe quel format, ...

Script "VEILLE.VBS"
-------- couper ici --------
Set args=wscript.arguments
if args.count=0 then Curdate=now else CurDate=args(0)
Veille=DateAdd("d",-1,CurDate)
wscript.echo FormatDateTime(Veille,vbShortDate)
-------- couper ici --------

Exemple :
K:\>veille
13/02/2008

K:\>veille 01/01/2008
31/12/2007

K:\>veille "1 mars 2000"
29/02/2000




Et si on veut faire varier le décalage (en plus ou en moins) :
1er paramètre : le décalage
2ème paramètre : la date

Si aucun paramètre transmis : calcul de la veille d'aujourd'hui
Si un seul paramètre transmis : calcul du décalage par rapport à aujourd'hui

Script "DECALAGE.VBS"
-------- couper ici --------
Set args=wscript.arguments
Curdate=now
if args.count=0 then
decal=-1
else
decal=args(0)
if args.count>1 then CurDate=args(1)
end if
Veille=DateAdd("d",decal,CurDate)
wscript.echo FormatDateTime(Veille,vbShortDate)
-------- couper ici --------

Exemples :

K:\>decalage -1 "1 mars 2000"
29/02/2000

K:\>decalage 1 "1 mars 2000"
02/03/2000

K:\>decalage 2 "30 décembre 1999"
01/01/2000

K:\>decalage -3 "3 mars 1999"
28/02/1999

K:\>decalage
13/02/2008

K:\>decalage -3 "3 mars 2000"
29/02/2000

K:\>decalage 31 29/02/2008
31/03/2008

K:\>decalage 10
24/02/2008


--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org

Autre solution :
prendre la date dans excel formule=maintenant()
Ajouter ou soustraire le nombre souhaité
On obtient alors le résultat
Ca calcule automatiquement le jour
meme pour année bisextile, changement de mois, d'année...
On peut même avoir un écart de 1,2,3, ou beaucoup plus de jours.... 500
jours ; 1000 jours.... ce qu'on veut

Le tableur, OpenOffice est bien... récupére le résultat soit sous forme
texte ou autre format date

Sinon, prendre la date avec une fonction assembleur, faire un
calcul....affichier le tout après modification
Affiché sur écran, dans un fichier, sur imprimante...au choix

Humour : JC Bellamy, que je salue,
n'a pas (pu ? ) cette fois trouver une solution avec un batch :-)


"Jean-Claude BELLAMY" <Jean-Claude.Bellamy***wanadoo.fr> a écrit dans le
message de news: 47b48315$0$879$ba4acef3***news.orange.fr...
> "news.free.fr" <jipief***hotmail.com> a écrit dans le message de
> news:47b47e62$0$19703$426a74cc***news.free.fr...
>> Bonjur,
>>
>> Sous MSDOS,
> Sous MSDOS réellement ou plutôt en ligne de commande sous Windows ?
>
>> je souhaiterais savoir s'il est possible de récupérer un date du style
>> date - x jours ou date + xjours.
>
> En VBS, c'est très facile, grace à la fonction "DateAdd", qui calcule
> automatiquement un décalage de date, en tenant compte des années
> bissextiles, accepte la date en entrée sous n'importe quel format, ...
>
> Script "VEILLE.VBS"
> -------- couper ici --------
> Set args=wscript.arguments
> if args.count=0 then Curdate=now else CurDate=args(0)
> Veille=DateAdd("d",-1,CurDate)
> wscript.echo FormatDateTime(Veille,vbShortDate)
> -------- couper ici --------
>
> Exemple :
> K:\>veille
> 13/02/2008
>
> K:\>veille 01/01/2008
> 31/12/2007
>
> K:\>veille "1 mars 2000"
> 29/02/2000
>
>
>
>
> Et si on veut faire varier le décalage (en plus ou en moins) :
> 1er paramètre : le décalage
> 2ème paramètre : la date
>
> Si aucun paramètre transmis : calcul de la veille d'aujourd'hui
> Si un seul paramètre transmis : calcul du décalage par rapport à
> aujourd'hui
>
> Script "DECALAGE.VBS"
> -------- couper ici --------
> Set args=wscript.arguments
> Curdate=now
> if args.count=0 then
> decal=-1
> else
> decal=args(0)
> if args.count>1 then CurDate=args(1)
> end if
> Veille=DateAdd("d",decal,CurDate)
> wscript.echo FormatDateTime(Veille,vbShortDate)
> -------- couper ici --------
>
> Exemples :
>
> K:\>decalage -1 "1 mars 2000"
> 29/02/2000
>
> K:\>decalage 1 "1 mars 2000"
> 02/03/2000
>
> K:\>decalage 2 "30 décembre 1999"
> 01/01/2000
>
> K:\>decalage -3 "3 mars 1999"
> 28/02/1999
>
> K:\>decalage
> 13/02/2008
>
> K:\>decalage -3 "3 mars 2000"
> 29/02/2000
>
> K:\>decalage 31 29/02/2008
> 31/03/2008
>
> K:\>decalage 10
> 24/02/2008
>
>
> --
> May the Force be with You!
> La Connaissance s'accroît quand on la partage
> ----------------------------------------------------------
> Jean-Claude BELLAMY [MVP] - http://www.bellamyjc.org
>