FTP und SSL Frage

delphiuserno1 · Beiträge: 82 Delphi 7 enterprise, Delphi 2007

hallo

Ich wollte mir ein programm machen, mit dem ich eine Datei von nem FTP Server sicher downloaden kann also über SSL.

Ich hab das zum testen erstmal ganz simpel aufgebaut:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:

procedure TForm1.Button1Click(Sender: TObject); //Datei downloaden von FTP Server ohne SSL
var filen:String;
begin
  IdFTP1.Username := 'gast';
  IdFTP1.Password := 'gast';
  IdFTP1.Port:=21;
  IdFTP1.Host := '192.168.0.1';
  IdFTP1.Connect;

  IdFTP1.ChangeDir('dateien');
  IdFTP1.TransferType := ftBinary;
  filen:='datei.exe';

  IdFTP1.Get(filen, filen, true);
  
  idftp1.Disconnect;
end;

jez hab ich mir noch den "IdSSLIOHandlerSocketOpenSSL" mit auf die Form gepackt und in der idftp mit angegeben. die DLLs für OpenSSL sind auch vorhanden.

das Problem ist, irgendwie verbindet der trotzdem nicht über SSL! Jedenfalls sehe ich das nich im filezilla server.
Muss ich da nochwas angeben?

Robinator · Beiträge: 275 WinXP BDS 2006

Du kannst zwischen den verschiedenen Modi wählen... ausserdem kannst du wählen, ob der Datentransfer verschlüsselt werden soll, standardmässig ist er das nicht. Dazu musst du die eigenschaft, hmm der Name fällt mir nicht ein, ich glaube DataChannel, auf private stellen.

gruss

_________________
erare humanum est

delphiuserno1 · Beiträge: 82 Delphi 7 enterprise, Delphi 2007

ich hab die Property "DataPortProtection" gefunden welche ich jetzt auf "ftpdpsprivate" setzen wollte. aber der sagt mit dann

"Cannot set DataPortProtection with unencrypted connections"

delphiuserno1 · Beiträge: 82 Delphi 7 enterprise, Delphi 2007

Habs geschafft! Ich hab gar kein TLS eingestellt! Kann ja so nich funktionieren! Also bei useTLS darf nicht noTLSSupport stehen

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme