Imports KCommon.Net.FTP
Imports System.Net.WebRequestMethods.Ftp
Imports System.Net.WebRequest

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim file As String = "C:\siti\Auto\Risultati.asp"
        Dim server As String = "FTP://209.257.255.5545"
        Dim username As String = "user"
        Dim pass As String = "pass"


        Dim _FtpRequest As Net.FtpWebRequest
        _FtpRequest.Credentials = New Net.NetworkCredential(username, pass)
        Dim request As Net.FtpWebRequest = Net.WebRequest.Create("url")
        request.KeepAlive = True
        _FtpRequest = CType(Net.FtpWebRequest.Create("ftp://bin"), Net.FtpWebRequest)
        request.Method = Net.WebRequestMethods.Ftp.MakeDirectory
        Dim response As Net.FtpWebResponse = request.GetResponse()

    End Sub