在FileSystemWatcher中处理多个更改事件

Question

我有以下子:

  Private Sub Watcher_Changed(ByVal sender As System.Object, ByVal e As FileSystemEventArgs)
        If Path.GetExtension(e.Name) = ".p2p" Then
            Exit Sub
        Else
            Try
                ' multiple change events can be thrown. Check that file hasn't already been moved.
                While Not File.Exists(e.FullPath)
                    Exit Try
                End While

                ' throw further processing to a BackGroundWorker
                ChangedFullPath = e.FullPath
                ChangedFileName = e.Name

                FileMover = New BackgroundWorker
                AddHandler FileMover.DoWork, New DoWorkEventHandler(AddressOf ProcessFile)
                FileMover.RunWorkerAsync()
            Catch ex As Exception
                MessageBox.Show(ex.Message)
            End Try

        End If
    End Sub

当FTP上传文件时,我仍然收到多个更改文件通知.

我想修改Try,所以它也会抛出更改通知,如果它发生在过去(时间) - 让我们说3秒.它应该是微不足道的,但由于某种原因它今天不会来找我,我的思想并没有围绕我在Google上找到的答案.

谢谢,斯科特

Answer 1

我创建了一个服务来上传几年前转储到FTP文件夹的文件,这里有一些我应该帮助你克服问题的事情:

1. 我测试了所有NotifyFilters并选择了一个删除重复通知的(仅使用NotifyFilters.Size为每个创建的文件提供了可靠的通知,并消除了几乎所有重复的通知)
2. 在Watcher_Changed事件中,我忽略了事件args中包含的文件,只处理了当前文件夹中的所有文件; 我尝试将文件夹中的所有文件添加到队列中,如果它们已经在队列中,我跳过下面的3.
3. 我为每个找到的唯一新文件分拆了一个新线程; 我的线程尝试获取文件的锁定,如果它不能这意味着其他进程仍然正在访问它(它仍然被上传等),所以我的线程休眠并在短暂的间隔后再次尝试.
4. 完全处理文件后,线程执行的最后操作是将其移动到存档文件夹,然后将其从队列中删除,因此不会再次意外处理.

这似乎对我有用,并且该服务可靠地上传文件数月,直到我离开那份工作.