Delphi7 FTP上传问题？？？

panda831102 2011-02-22 04:56:48

在D5 我上传没问题
程序如下：
NMFTP1.Host:='sem.kaishing.cn';
NMFTP1.Port:=21;
NMFTP1.Timeout:=5000;
NMFTP1.UserID:='123';
NMFTP1.Password:='123';
NMFTP1.Connect;
try NMFTP1.Upload(d:\客户资料.txt,'');
except
end;

但是在D7 没有NMFTP1 只有INDY 的idftp 请问实现上面文件上传的代码是怎样？谢谢

...全文

146 3 打赏收藏转发到动态举报

写回复

用AI写文章

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

panda831102 2011-02-23

打赏
举报

[Quote=引用 2 楼 shuaialang 的回复:]
Delphi(Pascal) code

IdFTP1.Host := '主机地址';
IdFTP1.Username := '用户名';
IdFTP1.Password := '密码';
if IdFTP1.Connected then IdFTP1.Disconnect;
IdFTP1.Connect();
try
IdFTP1.Put('data/本地文件名','远程文件名'……
[/Quote]

非常感谢

shuaialang 2011-02-22

打赏
举报



IdFTP1.Host := '主机地址';

IdFTP1.Username := '用户名';

IdFTP1.Password := '密码';

if IdFTP1.Connected then IdFTP1.Disconnect;

IdFTP1.Connect();

try

IdFTP1.Put('data/本地文件名','远程文件名');

except