使用indy / delphi安全ftp - >文件上传&下载

时间:2013-08-09 05:37:36

标签: delphi

我需要将文件上传到安全的ftp共享,我只知道来自FILE ZILLA Ftp客户端的配置数据。 Protocoll是SSH,安全FTP

<?xml version="1.0" encoding="UTF-8" standalone="yes" ?> 
 - <FileZilla3>
 - <Servers>
 - <Server>
 <Host>example.com</Host> 
 <Port>22</Port> 
 <Protocol>1</Protocol> 
 <Type>0</Type> 
 <User>Username-FTP</User> 
 <Pass>*************/Pass> 
 <Logontype>1</Logontype> 
 <TimezoneOffset>0</TimezoneOffset> 
 <PasvMode>MODE_DEFAULT</PasvMode> 
 <MaximumMultipleConnections>0</MaximumMultipleConnections> 
 <EncodingType>Auto</EncodingType> 
 <BypassProxy>0</BypassProxy> 
 <Name>Ftp_sharename</Name> 
 <Comments /> 
 <LocalDir /> 
 <RemoteDir>8 0 15 dsd_dir</RemoteDir> 
 <SyncBrowsing>0</SyncBrowsing> 
  Ftp_server_name
   </Server>
   </Servers>
 </FileZilla3>

代码如

 procedure TForm1.btnConnectClick(Sender: TObject);
 begin
  if IdFTP1.Connected then
  begin
  IdFtp1.Disconnect;
  btnConnect.Caption := 'Verbinden';
  ListBox1.Clear;
 end
 else begin
 IdFTP1.Host := edHost.Text;
 IdFtp1.Username := edUser.Text;
 IdFtp1.Password := edPassword.Text;
 IdFtp1.Port := StrToINt(edport.Text);
 IdFtp1.Connect;
 end;
end;

使用INDY 10 - IdFTP1:TIdFTP;没多少运气。没有找到任何与我的德尔福更好的合作伙伴。

1 个答案:

答案 0 :(得分:3)

SFTP (基于SSH的FTP)与 FTPS (FTP over SSL / TLS)不同。目前,Indy根本不支持SSH。但是,TIdFTP确实支持FTPS。