27. FTP Application
In the previous tutorial, we looked at how to upload a file directly from your computer to an FTP server. In this tutorial, we will be creating a graphical user interface for the application.
Code
Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim request As System.Net.FtpWebRequest = DirectCast(System.Net.WebRequest.Create("ftp://ftp.drivehq.com/file.txt"), System.Net.FtpWebRequest) request.Credentials = New System.Net.NetworkCredential(TextBox1.Text, TextBox2.Text) request.Method = System.Net.WebRequestMethods.Ftp.UploadFile Dim file() As Byte = System.IO.File.ReadAllBytes(TextBox3.Text) Dim strz As System.IO.Stream = request.GetRequestStream() strz.Write(file, 0, file.Length) strz.Close() strz.Dispose() End Sub End Class

