Buena tarde ...
FileSystemWatcher al crear un archivo en la carpeta vigilada me reporta 2 veces la creacion del archivo, aun cuando solo fue uno el que se creo... ¿a alguien le ha pasado?, ¿como podria corregir esto?
Al probar paso por paso el codigo la subrutina fsw_crear se ejecuta 2 veces y no se porque.
Código vb:
Ver originalPrivate Sub btnOn_Click(sender As System.Object, e As System.EventArgs) Handles btnOn.Click
Try
If ValidarRuta() <> False Then
btnDesactivar()
FileSystemWatcher1.Path = tbRuta.Text
'AddHandler FileSystemWatcher1.Changed, AddressOf fsw_cambiar
'AddHandler FileSystemWatcher1.Deleted, AddressOf fsw_borrar
AddHandler FileSystemWatcher1.Created, AddressOf fsw_crear
'AddHandler FileSystemWatcher1.Renamed, AddressOf fsw_renombrar
FileSystemWatcher1.Filter = tbFiltro.Text
FileSystemWatcher1.NotifyFilter = NotifyFilters.LastAccess Or NotifyFilters.Attributes Or _
NotifyFilters.CreationTime Or NotifyFilters.DirectoryName Or NotifyFilters.FileName _
Or NotifyFilters.LastWrite Or NotifyFilters.Security Or NotifyFilters.Size
FileSystemWatcher1.EnableRaisingEvents = True
End If
Catch ex As Exception
MessageBox.Show(ex.Message, "Error")
End Try
End Sub
Private Sub fsw_crear(sender As Object, e As FileSystemEventArgs)
Try
lbxCambios.Items.Add("Archivo Creado: " & Convert.ToString(e.FullPath))
Exit Sub
Catch ex As Exception
MessageBox.Show(ex.Message, "Error")
End Try
End Sub
Muchas gracias