Page 1 sur 1
[R] Comparer la date d'un fichier a celle du jour
Posté : sam. 06 oct. 2007 09:17
par krank35
Salut a tous je cherche a farie un script pour comparer la date du jour a la date de creation d'un pour par la suite lancer une ligne de commande.
pour trouver la date du fichier pas de problemes :
Code : Tout sélectionner
$t = FileGetTime("C:\MEDIAS\xmltv\tvguide.xml", 1)
If Not @error Then
$yyyymd = $t[0] & "/" & $t[1] & "/" & $t[2]
MsgBox(0, "Date du fichier TVGUIDE.XML", $yyyymd)
EndIf
mais pour comparer cette date a la date du jour je vois pas bien ...
il faut utiliser quelle fonction ?
Merci de votre aide
Posté : sam. 06 oct. 2007 17:14
par sylvanie
Bonjour,
il suffit de comparrer chaque composante respectivement avec
@YEAR
@MON
et
@MDAY
via un comparaison en cascade, premier test sur l'année, 2eme sur le mois puis le jour
Re: comparer la date d'un fichier a celle du jour
Posté : mer. 24 oct. 2007 22:52
par jl56
krank35 a écrit :Salut a tous je cherche a farie un script pour comparer la date du jour a la date de creation d'un pour par la suite lancer une ligne de commande.
pour trouver la date du fichier pas de problemes :
Code : Tout sélectionner
$t = FileGetTime("C:\MEDIAS\xmltv\tvguide.xml", 1)
If Not @error Then
$yyyymd = $t[0] & "/" & $t[1] & "/" & $t[2]
MsgBox(0, "Date du fichier TVGUIDE.XML", $yyyymd)
EndIf
mais pour comparer cette date a la date du jour je vois pas bien ...
il faut utiliser quelle fonction ?
Merci de votre aide
bonjour
pour un script j'ai utilsé ceux-ci:
Code : Tout sélectionner
$t=FileGetTime("fichier.txt",0)
$datefichier=_DateToDayValue ($t[0] , $t[1] , $t[2])
$datejour = _DateToDayValue (@YEAR, @MON, @MDAY)
if $datejour < $datefichier then xxxxxxx
a+ jl56
Posté : ven. 26 oct. 2007 10:01
par sergio
il faut de servir de la fonction _NowCalc
un petit bout de script dont je me serts je teste la date d'un fichier par apport à la date du jour
et je supprime si plus de 8 jours dans ce cas
Code : Tout sélectionner
; Calcul de l'ancienneté du fichier :
$DateCalc = _DateDiff ( 'D' , $DateFic , _NowCalc ( ) )
; test affichage
MsgBox ( 4096 , "" , "nombre de jour si sup à 8 ok :" & $DateCalc )
; si date superieur ou egal à 8 j effacement du fichier
If $DateCalc > = 8 then
FileDelete ( "D:\SAVE_MELL" & "\" & $file )
EndIf