Uses wodFtpDLX ActiveX Component

Dim wodFtpDLX As wodFtpDLXCom
Private Sub Form_Load()

    Set wodFtpDLX = New wodFtpDLXCom

    wodFtpDLX.HostName = "xx"
    wodFtpDLX.Login = "xx"
    wodFtpDLX.Password = "xx"
    wodFtpDLX.Blocking = True

    ' This is all you need to set to make component work in Active/Passive mode
    wodFtpDLX.Passive = False

    ' It's time to connect to server. All we now need to do is call Connect method.
    wodFtpDLX.Connect

    ' If no exception was thrown, we are connected to server, and it's safe to begin download.
    wodFtpDLX.PutFile "C:\local_filename", "/home/"

    ' We're done. Disconnect from server.
    wodFtpDLX.Disconnect

End Sub

Uses wodFtpDLX.NET component

private WeOnlyDo.Client.FtpDLX wodFtpDLX;
private void Form1_Load(object sender, EventArgs e)
{
    wodFtpDLX = new WeOnlyDo.Client.FtpDLX();

    wodFtpDLX.Hostname = "xx";
    wodFtpDLX.Login = "xx";
    wodFtpDLX.Password = "xx";
    wodFtpDLX.Blocking = true;

    // This is all you need to set to make component work in Active/Passive mode
    wodFtpDLX.Passive = False

    // It's time to connect to server. All we now need to do is call Connect method.
    wodFtpDLX.Connect();

    // If no exception was thrown, we are connected to server, and it's safe to begin download.
    wodFtpDLX.PutFile("C:\\local_filename", "/home/");

    // We're done. Disconnect from server.
    wodFtpDLX.Disconnect();
}

Uses wodFtpDLX.NET component

Dim wodFtpDLX As WeOnlyDo.Client.FtpDLX
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    wodFtpDLX = New WeOnlyDo.Client.FtpDLX()

    wodFtpDLX.Hostname = "xx"
    wodFtpDLX.Login = "xx"
    wodFtpDLX.Password = "xx"
    wodFtpDLX.Blocking = True

    ' This is all you need to set to make component work in Active/Passive mode
    wodFtpDLX.Passive = False;

    ' It's time to connect to server. All we now need to do is call Connect method.
     wodFtpDLX.Connect()

    ' If no exception was thrown, we are connected to server, and it's safe to begin download.
    wodFtpDLX.PutFile("C:\\local_filename", "/home/")

    ' We're done. Disconnect from server.
    wodFtpDLX.Disconnect()
End Sub