Alerte quand modification d'un dossier - VB/VBA/VBS - Programmation
Marsh Posté le 29-12-2004 à 14:04:27
Bonjour,
Tu peux faire ça avec du vbs.
Un petit extrait de MSDN et hop
Microsoft® Visual Basic® Scripting Edition
DateLastModified Property Scripting Run-Time Reference
Version 3
See Also Applies To
--------------------------------------------------------------------------------
Description
Returns the date and time that the specified file or folder was last modified. Read-only.
Syntax
object.DateLastModified
The object is always a File or Folder object.
Remarks
The following code illustrates the use of the DateLastModified property with a file:
Function ShowFileAccessInfo(filespec)
Dim fso, f, s
Set fso = CreateObject("Scripting.FileSystemObject" )
Set f = fso.GetFile(filespec)
s = UCase(filespec) & "<BR>"
s = s & "Created: " & f.DateCreated & "<BR>"
s = s & "Last Accessed: " & f.DateLastAccessed & "<BR>"
s = s & "Last Modified: " & f.DateLastModified
ShowFileAccessInfo = s
End Function
Marsh Posté le 29-12-2004 à 15:40:15
Merci beaucoup !!
Désolé d'abuser mais je suis une vrai quiche en vbs, comment il s'utilise ton script exactement ?
Parce que si j'ai bien compris, là, je donne un fichier en paramètre et il me sort la dernière date à laquelle il a été modifié... mais bon, comment l'utiliser dans mon cas ?
Marsh Posté le 29-12-2004 à 15:55:35
Re,
Je viens de relire ta question initiale, et c'est vrai il manque des choses
Set fso = CreateObject("Scripting.FileSystemObject" )
Set f = fso.GetFolder(LeRepertoire)
Set fc = f.Files
For Each f1 in fc
DateDiff("d", date1, date2)
Now
f1.DateCreated
f1.DateLastModified
Next
Ce bout de code permet de balayer le répertoire.
DateDiff("d", date1, date2) renvoie le nombre de jours entre 2 dates
Now contient la date du jour
f1.DateCreated renvoie la date de création du fichier
f1.DateLastModified renvoie la date de modification du fichier
Dans la boucle, tu peux alors tester si un des fichiers a été modifié.
Marsh Posté le 29-12-2004 à 10:35:24
Bonjour !!
Connaitriez vous un scipt permettant d'envoyer une alerte (mail par exemple) dès qu'un sous-dossier d'un répertoire donné est modifié (pour m'avertir lorsqu'un utilisateur publie en FTP)?
Merci beaucoup !!