Public Function deleteFile(ByVal S_uri As Uri) As Boolean
        Dim request As FtpWebRequest
        Dim response As FtpWebResponse
        If S_uri.Scheme = Uri.UriSchemeFtp Then
            request = FtpWebRequest.Create(S_uri)
            request.Method = WebRequestMethods.Ftp.DeleteFile
            response = request.GetResponse
            If response.StatusCode = FtpStatusCode.FileActionOK Then
                Return True
            Else
                Return False
            End If
        End If
    End Function

Wenn alle Stricke rei?en, dann h?ng ich mich auf. ~ Karl Kraus