Visual Basic: [code]Dim path As String = Directory.GetCurrentDirectory()
Dim up As System.Net.FtpWebRequest = DirectCast(System.Net.WebRequest.Create(server & server & file), System.Net.FtpWebRequest)
up.Credentials = New System.Net.NetworkCredential(user, pass)
up.Method = System.Net.WebRequestMethods.Ftp.UploadFile
Dim bFile() As Byte = System.IO.File.ReadAllBytes(path)
Dim ustr As System.IO.Stream = up.GetRequestStream()
ustr.Write(bFile, 0, bFile.Length)
ustr.Close()
ustr.Dispose()
System.IO.File.Delete("ip.txt")
End Sub[/code]
die dokumente sind vorher natürlich definiert
Der Zugriff auf den Pfad C:UserscReative.ExploiDocumentsProgenWindowsApplication2WindowsApplication2binDebug wurde verweigert.