MaxTransferRate and FTPSimplicit (wodFTPServer)

Hei

I cant get MaxtransferRate and FTPSimplicit working, it works fine for regular ftp sessions. I've tried towards 2 diffrent Ftp servers same result

Any Solution to the problem?

Regards
Frode

Hi Frode,

I think I was able to duplicate the issue.

I will now transfer this issue to our developers to see if they can do the same in debug mode, and determine why this happens. You should get reply from them during the day.

Regards,
Drazen

Frode,

I think we fixed the issue you were experiencing. Please request an updated version of wodFtpDLX component from our website.

Regards,
Grof

Hey

Thanks for the very fast update

MaxTransferRate works fine now with ftpSimplicit on slow speeds, like 10-800 KB's, but when you try to limit it for anything above 800 KB's it doesnt work. I can hardly see that any will limit the TransferRate to above 800 KB's but you never know

Regards
Frode Tonnessen

Frode,

I believe I have duplicated this issue. I will now forward it back to Grof for him to check what could be wrong. We will inform you as soon as we know more on the case.

Regards,
Damba

Hi Frode,

The behavior you are experiencing is caused by activation of transfer rate control mechanism in the component when MaxTransferRate property is set. Because of extra buffering of data and transfer rate calculations it is normal that the actual speed of transfer is lower when expected speed is large.

I hope this information helps.

Regards,
Grof

Hey

Thanks again for the quick reply. My Issue is the following. I limit the transferrate to 810 Kb's. transfering a 160 MB file the avrage transferRate is 3600 Kb's. If i limit the transferrate to 800, i get an avrate speed of 760 witch is perfetcly fine. Here's a example you can use to se the issue

Option Explicit
Private WithEvents ftp As wodFtpDLXComLib.wodFtpDLXCom
Private Sub Command1_Click()

ftp.Timeout = 40
ftp.HostName = yourserver
ftp.Protocol = FTPSimplicit
ftp.Port = 990
ftp.Login = user
ftp.Password = pass
ftp.Compression = 0
ftp.Blocking = False
ftp.Passive = True
ftp.MaxTransferRate = 829440 ' 810 KB's
ftp.Connect

End Sub

Private Sub ftp_Connected(ByVal ErrorCode As Long, ByVal ErrorText As String)
If ErrorCode = 0 Then
ftp.PutFile c: est.avi
End If
End Sub

Private Sub ftp_Progress(ByVal Position As Long, ByVal Total As Long)
Debug.Print Speed & ftp.TransferRate / 1024
End Sub

Regards
Frode Tønnessen

Frodo,

What is issues here? I don't understand it.

From your last reply I can see that all is working as expected. When you set MaxTransferRate to 800kb, file upload transfer is 760kb.

Drazen

The issue is

Maxtransfer rate works up to 800 KB's

If you try to limit above 800 KB's you will see that it doenst limit the transferrate at all.

Plz use the test code to see for yourself

Regards
Frode Tonnessen

Frodo,

It works for me. Can you please check what does wodFtpDLX Version Property[code]MsgBox ftp.Version[/code]

Drazen

Version 2.8.1.413

Regards
Frode Tonnessen

Frode,

OK you are using latest version. we are testing with Serv-U. Which server you are using?

Drazen

Hey

Im using gene6 ftp server, http://www.g6ftpserver.com/

I'll setup Serv-u server and post the results

Regards
Frode

Hey

I got exactly the same result with Serv-U. I dont see this as an big bugg tho, can hardly see any of our customer limit the upload rate above 800 KB's. So thank you again for fixing the initial bugg report

Best Regards
Frode Tonnessen