Hallo,
das Programm, an dem ich gerade herumschreibe baut eine Verbindung zu einem
FTP-Server auf. Alles funktioniert wunderbar. Nun möchte ich aber gerne auf einen anderen Server, der SFTP voraussetzt, umsteigen. Ich muss zugeben nicht allzuviel über die Materie zu wissen, ich habe den betreffenden Code kopiert. Ich denke, dass der Knackpunkt in dieser Prozedur liegt:
Delphi-Quellcode:
procedure TInetFTP.Connect(Passive:Boolean);
var
dwFlags : Cardinal;
begin
inherited Connect;
dwFlags := 0;
if Passive then
dwFlags := dwFlags or INTERNET_FLAG_PASSIVE;
FHSession := InternetConnect(FHInet, PChar(Server), INTERNET_DEFAULT_FTP_PORT, PChar(User), PChar(Password), INTERNET_SERVICE_FTP, dwFlags, 0);
dwFlags, 0);
if FHSession = nil then
begin
showmessage('Stellen Sie bitte eine Verbindung mit dem Internet her und starten Sie das Programm erneut!');
Form1.timer2.enabled:=true;
end;
end;
Soweit ich weiß, muss man, um SFTP zu verwenden den Port auf 22 umstellen. Zum einen gelingt mir das hier einfach nicht, zum anderen ist es wahrscheinlich nicht so einfach! Kann mir jemand sagen, wie ich mich mit einem SFTP-Server (mit SSL) verbinden kann? (Bzw: geht das überhaupt auf diese Weise?)
Vielen Dank schon mal im Voraus!