Quote Originally Posted by jcis
The info about the Download/Upload progress is raised to the Form where CFtp is declared, you can get the progress in this Form event:
Code:
Private Sub oFTP_TransferProgress(ByVal nPercent As Long, _
    ByVal fBytesReceived As Double, ByVal fFileSize As Double)
    
    'You can use this event to update a progress bar or
    'to give some other feedback to the user about the
    'download/upload progress.
    
    Me.ProgressBar1.Value = nPercent
    DoEvents
End Sub
Exactly. But yoy don't understand me.
The var nPercent is not avaible, becuase fFileSize is zero.
The problem is in (DownloadFile method) :
Me.Files collection has zero elements.

Code:
For Each f In Me.Files
If f.FileName = RemoteFile Then
fFileSize = f.FileSize
Exit For
End If
Next