Problemas con FileSystemWatcher

Hola Seba, te paso este código...a mi me va bien.

un Saludo,

Horst

Public Sub Main()
Dim args As String()
Dim appName As String
args = Environment.GetCommandLineArgs()
appName = args(0)

If (args.Length <> 2) Then
Console.WriteLine("Uso: " + appname
+ "<directorio>")

Else
Dim watcher As FileSystemWatcher
watcher = New FileSystemWatcher
watcher.Path = args(1)
watcher.NotifyFilter =
NotifyFilters.FileName Or NotifyFilters.Attributes Or
NotifyFilters.LastAccess Or NotifyFilters.LastWrite Or
NotifyFilters.Security Or NotifyFilters.Size

AddHandler watcher.Changed, AddressOf
OnChanged
AddHandler watcher.Created, AddressOf
OnChanged
AddHandler watcher.Deleted, AddressOf
OnChanged
AddHandler watcher.Renamed, AddressOf
OnRenamed

watcher.EnableRaisingEvents = True
End If

Console.WriteLine("Presione Entrar para salir
del ejemplo")
Console.WriteLine()
Console.ReadLine()
End Sub

Public Sub OnChanged(ByVal source As Object,
ByVal e As FileSystemEventArgs)
Console.WriteLine("Archivo: {0} {1}",
e.FullPath, e.ChangeType.ToString("G"))
End Sub

Public Sub OnRenamed(ByVal source As Object,
ByVal e As RenamedEventArgs)
Console.WriteLine("Archivo: se ha cambiado el
nombre de {0} a {1}", e.OldFullPath, e.FullPath)

End Sub

Hola A todos, tengo un problema con una aplicación
Windows en .NET que supervisa un directorio con el
FileSystemWatcher. En ese directorio se suben ficheros
por FTP y deberia detectar cuando se termina de subir un
fichero para que me de el nombre del fichero. No tengo
manera de hacerlo porque el evento Changed me genera un
evento al principio y el Created, no me genera ningun
evento. Por favor a ver si alguien me puede ayudar con
esto. gracias
.