FiveTech Software tech support forums

Hi all,
I always succesfully used the tIpClientFtp xharbour class to manage ftp connections.
Now I updated my xharbour 1.2.1 from rev. 6717 to rev. 9656 provided with FWH Dec 2012 and any ftp connection doesn't runs anymore,
for example, this function I made to delete a remote file require now 20 second instead of the 2-3 with the previous xHarbour version.
Any ideas ? Thanks in advance.

-----

FUNCTION FtpEraseFile(cFtpSite,cFtpUser,cFtpPassword,cFtpFileToDelete)

local cUrl,oFtp,aDirs
local lTrace

lTrace:=.f.

cFtpUser:=charrepl("@",@cFtpUser,"+")
cUrl:="ftp://"+cFtpUser+":"+cFtpPassword+"@"+cFtpSite
oFtp:=tIPClientFtp():New(cUrl,lTrace)
oFtp:nConnTimeout:=60000
if .not. oFtp:open()
msginfo("ftp error "+oFtp:LastErrorMessage())
return(.f.)
endif

oFtp:dele(cFtpFileToDelete)
oFtp:Close()
RETURN .t.

Have you managed to solve it?