Set Ftp = CreateObject( "Lbox.Ftp" )

Server = "bekins.borland.com"
User = "anonymous"
Password = "user@domain"

Remote = "/groups/jp/cppbuild/"
FileName = "freecommandlinetools2.exe"

if Ftp.Connect( Server, User, Password, True ) then
	Call Ftp.Download(Remote & "/" & FileName, FileName)
	Call Ftp.DisConnect()
end if