请帮忙解决delphi7中idftp的问题

[chinazhf]

请问idftp上传需要加保护吗，这是我的程序：
begin
idftp1.Host :='www.XXXX.com';
idftp1.Username :='usertest';
idftp1.password:='usertest';

with idftp1 do
try
Connect;
ChangeDir('/www');
IdFTP1.Put('test.asp','.\test.asp');
//经常执行idftp1.put这一步程序就没有响应，但有时可以，如果出现没有响应，只有使用cuteftp上传（cuteftp可以上传，正常）
showmessage('上传TIPS成功');
finally
idftp1.Disconnect;
end;
end;

请问问题出在哪里，是否FTP服务器问题，还是控件问题？？？？
好郁闷，希望得到解决，帮帮忙

[yueshujiang]

参考一下这里

Delphi经点编程百例
http://www.yesky.com/SoftChannel/72348977504190464/20030506/1667075.shtml

Delphi程序员之家
www.delphiboy.com

Delphi资源下载
http://www.delphifans.com/down.asp