FileSystemWatcher ne fonctionne pas

Question

j'ajouté FileSystemWatcher dans Form1_Load comme ceci:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
     .................... 
     Dim watcher As New FileSystemWatcher() 
     'For watching current directory 
     watcher.Path = "/" 
     'For watching status.txt for any changes 
     watcher.Filter = "status.txt" 
     watcher.NotifyFilter = NotifyFilters.LastWrite 
     watcher.EnableRaisingEvents = True 
     AddHandler watcher.Changed, AddressOf OnChanged 
End Sub 

J'ai une fonction OnChanged qui est un simple MessageBox. Pourtant, quand je change le fichier status.txt, aucune boîte de message n'est montrée.

Answer 1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
Dim watcher As New IO.FileSystemWatcher() 

'For watching current directory 
watcher.Path = **System.IO.Directory.GetCurrentDirectory()** 'Note how to obtain current directory 
watcher.NotifyFilter = NotifyFilters.LastWrite 

'When I pasted your code and created my own status.txt file using 
'right click->new->Text File on Windows 7 it appended a '.txt' automatically so the 
'filter wasn't finding it as the file name was status.txt.txt renaming the file 
'solved the problem 
watcher.Filter = "status.txt" 

AddHandler watcher.Changed, AddressOf OnChanged 

watcher.EnableRaisingEvents = True 
End Sub 

Private Shared Sub OnChanged(ByVal source As Object, ByVal e As IO.FileSystemEventArgs) 
MessageBox.Show("Got it") 
End Sub 

De http://bartdesmet.net/blogs/bart/archive/2004/10/21/447.aspx

Vous remarquerez peut-être dans certaines situations qu'un événement de création unique génère plusieurs événements créés qui sont gérés par votre composant. Par exemple, si vous utilisez un composant FileSystemWatcher pour surveiller la création de nouveaux fichiers dans un répertoire, puis le tester en utilisant le Bloc-notes pour créer un fichier, deux événements Created peuvent être générés même si un seul fichier a été créé. Cela est dû au fait que le Bloc-notes exécute plusieurs actions du système de fichiers pendant le processus d'écriture. Bloc-notes écrit sur le disque dans les lots qui créent le contenu du fichier, puis les attributs de fichier. D'autres applications peuvent fonctionner de la même manière. Étant donné que FileSystemWatcher surveille les activités du système d'exploitation, tous les événements déclenchés par ces applications seront récupérés.

Answer 2

Vous devriez également écouter l'événement Deleted. Selon l'éditeur que vous utilisez, ils suppriment/remplacent parfois le fichier au lieu de simplement le modifier.