Easy FTP in vb6/VBA

Download Add to Cart

The nBit Easy FTP DLL can be added with ease to any vb6 or VBA project.

 VB6 - Add a reference to the DLL in your project references. Goto tools -> references and select the nBitFTP component from the list.  MSAccess - Add a reference to the DLL in your MDB. Goto tools -> references and select the nBitFTP component from the list.

You can use the DLL from your vb6 / VBA code as follows
Option Explicit
Dim WithEvents oftp As nBitFTP.clsFTP

Private Sub Form_Load()

    Set oftp = New clsFTP
    ' you could also use late binding. Just declare the object as DIM oFTP as Object
    ' and then set oftp = createobject("nBitFTP.clsFTP")


End Sub

Private Sub cmdConnect_Click()



    oftp.LicName = "YourOrderNumber"
    oftp.LicKey = "YourLicenceKey"
   
    oftp.Host = Me.txtHost
    oftp.UserName = Me.txtUserName
    oftp.Password = Me.txtPassword
    oftp.InitDir = Me.txtInit
    oftp.Passive = Me.chkPassive
    oftp.ShowDialog = Me.chkTransfer
    oftp.FTPPort = Me.txtFTPPort
    oftp.connect

end Sub

Private Sub cmdPut_Click()
   
    Me.CommonDialog1.ShowOpen
   
    If Me.CommonDialog1.FileName <> "" Then
        If oftp.PutFileProgress(Me.CommonDialog1.FileTitle, Me.CommonDialog1.FileName) Then
            cmdRefresh_Click
        End If
    End If
   
End Sub



etc etc etc
It's as easy as that. For a more detailed example of the use of the DLL ( and an implementation of the full feature set ) please refer to the sample project after downloading the free evaluation version of the control.

Download Add to Cart


Shopping Cart

Empty

Misc.