用Delphi开发FTP上传文件的原代

最新推荐文章于 2024-06-18 11:37:13 发布

xwchen

最新推荐文章于 2024-06-18 11:37:13 发布

阅读量7.6k

点赞数

文章标签： delphi ftp服务器 user

本文链接：https://blog.csdn.net/xwchen/article/details/1841800

版权

这篇博客介绍了如何使用Delphi编程语言开发FTP文件上传功能。通过 Indy 组件，设置登录信息、FTP地址，选择ASCII传输类型，并处理同名文件的上传策略。还提到了 Indy 支持代理设置的相关属性。

摘要由CSDN通过智能技术生成

首先确保你的FTP开通成功
程序大致代码如下：

with IdFtp1 do begin
if connected then quit;
user := '你的登录名';
password := '登录密码';
host := 'FTP地址';
connect;

transfertype:= ftASCII;
pub('上传后的文件名','准备上传的文件名及路径',true); //true表示如果遇到相同文件，
则追加数据至原文件尾；
false:同名文件，则删除FTP服务器上的此文件
quit;
end;

用nmftp控件
nmftp1.Host:=;
nmftp1.Port:=21;
nmftp1.TimeOut:=30000;
nmftp1.UserID:=edit1.Text;
nmftp1.Password:=edit2.Text;
if nmftp1.Connected then
begin
try
nmftp1.ChangeDir('www/server');
nmftp1.Upload(fielname,'');
.....
nmftp1.Disconnect ;

用indy也支持代理啊：
idftp1.ProxySettings.ProxyType
idftp1.ProxySettings.Host
idftp1.ProxySettings.UserName
idftp1.ProxySettings.Password
idftp1.ProxySettings.Port