
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