我有以下子:
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 秒。它应该是微不足道的,但由于某种原因,它今天没有出现在我的脑海中,我的思绪也没有围绕着我在谷歌上找到的答案。
谢谢,斯科特