Bonjour ,
 
Dans mon script j'aurais besoin de connaitre la date d'un fichier avant de l'écraser . existe t'il une fonction qui permet de connaitre la date de modification d'un fichier ?  
 
Bien à vous  
JuVeNaL

Salut, tu peux essayer qqch comme ça:
 
Dim DateModif
' Suppose que la dernière modification du fichier FICHTEST a
' eu lieu le 12 février 2005 à 17:22:45. Suppose que les
' paramètres régionaux correspondent à Français (standard).
DateModif = FileDateTime("FICHTEST" )    ' Renvoie "12/2/05 17:22:45".

Bonjour Fgiuliano
 
J'ai donc tester cela .. mais a mon avis le FileDateTime est une fonction dans la suite du script ..
car il me met "Type mismatch 'FileDateTime'
 
aurais tu la suite ? ou le script de la fonction FileDateTime ?
 
Bien à toi
JuVeNaL
 

Alors j'ai vite fait un p'tit bout de code et ça fonctionne:
 
Private Sub Modification()
    Dim ModifDate
    ModifDate = FileDateTime("C:\Received\Sauvegarde.txt" )
    MsgBox (ModifDate)
End Sub
 
N'oublie pas de donner le chemin d'accès complet du fichier.

Merçi pour ton aide
mais quand je lance le script il ne ce passe rien ...  
quand je lance sous dos il me donne aucun résultat  
pourtant j'ai donner le bon chemin du fichier etc ...  
 
Bien à toi
JuVeNaL
 

Un truc dans le genre:
 
Set fso  = CreateObject("Scripting.FileSystemObject" )
 
If fso.FolderExists("\\monserveur\monpartage\mondossier\" ) = True Then
 Set oFolder = fso.GetFolder("\\monserveur\monpartage\mondossier\" )
 dtmCreationDate = oFolder.DateCreated
 Set oFolder = Nothing
Else
 dtmCreationDate = "Unknown"
End if
 
Tu remplace le DateCreated par un DateLastModified si c'est ca que tu veut. Ca c'est pour un dossier, tu regarde la doc pour voir les differences pour un fichier.