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 !!