Ftp下载问题

sunwinhn 2005-03-04 11:18:17

求ftp下载程序源码
已知ftp站点地址，用户名称，密码，和要下载的全路径文件名。
要求把文件下载到本地指定的目录中。

希望得到详细的源码和注释。

在线等

...全文

199 4 打赏收藏转发到动态举报

写回复

用AI写文章

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

sunwinhn 2005-03-16

打赏
举报

有没有用TIdFTP控件的代码啊

sunwinhn 2005-03-05

打赏
举报

sunwinhn 2005-03-05

打赏
举报

samchoy 2005-03-05

打赏
举报

void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString FileName = "bcb6界面实例开发.pdf"; // 要下载的文件名
AnsiString RemoteDir = "资料"; // FTP上的目录名
AnsiString LocalDir = "d:\\"; // 下载到的本地目录名

NMFTP1->Host = "constantine.vicp.net"; // FTP地址（安吉儿的FTP）
NMFTP1->Password = "123456"; // 密码
NMFTP1->Port = 21; // 端口号
NMFTP1->UserID = "csdnbcb"; // 用户名
NMFTP1->Connect(); // 连接FTP
if(NMFTP1->Connected)
{
NMFTP1->ChangeDir(RemoteDir); // 改变在FTP上的目录
NMFTP1->Download(FileName, LocalDir+FileName); // 下载
ShowMessage("下载完成!");
}
else
ShowMessage("连接错误!");

NMFTP1->Disconnect(); // 断开连接
}