Bonjour,
Je veux créer une tâche qui surveille un répertoire dans lequel arrivent régulièrement des fichiers.
Lorsqu'un type de fichier en particulier arrive, cette tâche doit effectuer une action sur ce fichier. Le type de fichier est repéré par son nom qui commence toujours avec la même chaine de caractères (par exemple file****). J'utilise un programme qui s'appuie sur WMI dont voici le code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 Set objShell = CreateObject("Wscript.Shell") strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colMonitoredEvents = objWMIService.ExecNotificationQuery _ ("SELECT * FROM __InstanceCreationEvent WITHIN 10 WHERE " _ & "Targetinstance ISA 'CIM_DirectoryContainsFile' and " _ & "TargetInstance.GroupComponent= " _ & "'Win32_Directory.Name=""c:\\\\TEST1""'") Do Set objLatestEvent = colMonitoredEvents.NextEvent strNewFile = objLatestEvent.TargetInstance.PartComponent arrNewFile = Split(strNewFile, "=") strFileName = arrNewFile(1) strFileName = Replace(strFileName, "\\", "\") strFileName = Replace(strFileName, Chr(34), "") objShell.Run("notepad.exe " & strFileName) Loop
Le répertoire surveillé est "c:\test1", pour l'instant l'action déclenchée par l'arrivée du fichier est l'ouverture du dit fichier avec le notepad. Cela fonctionne, sauf que je n'arrive pas à déclencher l'action sur un nom particulier de fichier, pour l'instant tout fichier quelque soit son nom déclenche l'action.
Pouvez-vous m'indiquer comment déclencher l'action sur un nom de fichier en particulier (plus précisement le début du nom, je ne connais jamais la fin).
Par avance merci de votre aide
Partager