idftp问题请教？

Question

我用idftp编了一个很简单的上传程序，代码就是下面简单的几行，但是在运行时报错(已经连接成功)：
  
  IdFTP1.TransferType:= ftBinary;
  if OpenDialog1.Execute then       //其中OpenDialog1是TOpenDialog
  begin
    IdFTP1.Put(OpenDialog1.FileName,ExtractFileName(OpenDialog1.FileName), False);
    ChangeDir(IdFTP1.RetrieveCurrentDir);
  end;
  
运行时报的错误是：Access is Denied    
  哪里出了问题，请教高手帮忙!先谢了！

Answer 1

Ftp服务端上传是要有权限的,最好在idftp1.username和password中写入你fpt服务端的管理员名字和密码.

Answer 2

谢谢兄弟的回复。
我连接的时候username和password是用了ftp服务器的超级用户administrator和密码的
  idftp1.username := 'Administrator';
  idftp1.password:= 'aaa';
  idftp1.port:= 21;
不知还要怎样的权限呢？