PB.Ex FTP (Windows)

[¯\_(ツ)_/¯]

SFTP... FTPS... Warum haben die Entwickler damals nicht ein gemeinsames Protocoll
für gesicherte Verbindung entwickelt? Jeder meint eine eigene Suppe kochen zu müssen. Gibt
es auch SFTPS? Oder FTPS2 oder FTPS+?

[NicTheQuick]

Meiner Erfahrung nach nutzt kein Mensch FTPS, SFTP ist der Standard, würde ich sagen.

[RSBasic]

Aus dem Grund habe ich mich auch für SFTP entschieden, aber es schadet nicht, wenn ich demnächst FTPS ebenfalls anbiete.

[RSBasic]

Tut mir leid, dass es so lange gedauert hat, aber jetzt ist alles drin. (FTP, SFTP, FTPS) Schon mal frohe Ostern. Beispielcode und die Funktions- und Parameterbeschreibung habe ich im ersten Beitrag dieses Threads angepasst.

PB.Ex FTP 1.0.1.0 wurde veröffentlicht.

Changelog:

• Geändert: Name der Bibliothek wurde von PB.Ex SFTP in PB.Ex FTP geändert, weil ab dieser Version SFTP, FTP und FTPS unterstützt werden.
• Geändert: Name der Funktionen wurden umbenannt. Z.B. OpenSFTP() in OpenFTPEx()
• Hinzugefügt: FTP-Unterstützung
• Hinzugefügt: FTPS-Unterstützung mit implizitem und explizitem SSL-Protokoll
• Hinzugefügt: Kodierungsparameter für OpenFTPEx() wurde hinzugefügt.
• Hinzugefügt: Protokoll-Parameter für OpenFTPEx() wurde hinzugefügt.
• Bugfixes

[Bisonte]

Danke für die Mühen !

Und da wollte ich schon jubilieren und feste feiern.... da hauts mir glatt eine Fehlermeldung um die Ohren,
die mir absolut nichts sagt :



Das war folgender Test mit deinem DemoCode (Alles auskommentiert bis auf :

Code: Alles auswählen

  

If OpenFTPEx(1, #PBEx_FTP_Protocol_FTPS_Explicit, "xxx", 000, "xxx", "xxx", #PB_UTF8, @ErrorOutput$)
    
    ErrorMsg("Start der FTP Explicit Verbindung !", ErrorOutput$)
    
    If ExamineFTPDirectoryEx(1, @ErrorOutput$)
      ErrorMsg("ExamineFTPDirectory !", ErrorOutput$)
      While NextFTPDirectoryEntryEx(1, @ErrorOutput$)
        ErrorMsg("ExamineFTPDirectory !", ErrorOutput$)
        FTPDirectoryEntryNameEx(1, @FileName$, @ErrorOutput$)
        ErrorMsg("FTPDirectoryEntryNameEx !", ErrorOutput$)
        MessageRequester("Name", FileName$)
      Wend
      FinishFTPDirectoryEx(1, @ErrorOutput$)
      ErrorMsg("FinishFTPDirectoryEx !", ErrorOutput$)
    EndIf
   
    CloseFTPEx(1, @ErrorOutput$)
    ErrorMsg("CloseFTPEx !", ErrorOutput$)
  Else
    ErrorMsg("OpenFTPEx !", ErrorOutput$)
  EndIf

Achja diese ErrorMsg() Prozedure ist diese :

Code: Alles auswählen

Procedure.i ErrorMsg(Text.s, ErrorOutput$)
  
  If ErrorOutput$
    MessageRequester(Text, ErrorOutput$)
  EndIf
    
EndProcedure

Was hab ich falsch gemacht oder deine DLL ?

[RSBasic]

Guten Morgen Bisonte,

mit den getesteten Servern von rebex.net hat es soweit funktioniert. Ich werde mal nach anderen Testservern schauen und damit testen.
Besteht die Möglichkeit, mir temporär einen FTP-Zugang bereitzustellen, damit ich gezielt mit deinem Server testen kann? Wenn nicht, dann muss ich nach anderen Testservern schauen.
Ansonsten müsste ich auch eine separate DLL-Version ausliefern, um die Inner Exception ebenfalls auszugeben. Da müsste drin stehen, warum genau die Verbindung fehlschlägt.

Danke fürs Testen.

[RSBasic]

Kleiner Zwischenbericht, warum es bei Bisonte nicht funktioniert, liegt vermutlich daran, dass es über das Protokoll SCP läuft.
Das ist ein anderes Protokoll, welches ich in meiner Bibliothek zusätzlich implementieren muss. Update kommt irgendwann.

[Imhotheb]

Bei implizitem FTPS mit eigenem Zertifikat bekomme ich folgende Fehlermeldung:
Error: Das Remotezertifikat ist laut Validierungsverfahren ungültig.

Allerdings ist mein selbstunterzeichnetes Zertifikat im Zertifizierungsspeicher von Windows hinterlegt (inklusive Root-CA) und wird z.B. von Edge und IE als als identifiziert und vertrauenswürdig eingestuft.

Explizites FTPS funktioniert im übrigen ohne Probleme.

Und da Implizit kaum noch Verwendung findet soll dieser Beitrag nur der Information gelten.

[RSBasic]

@Imhotheb
Vielen Dank für das Testen und für dein Feedback.

[RSBasic]

@Imhotheb
Kannst du mit der neuen Version nochmal testen?
Paul aus dem englischen Forum hatte die selbe Fehlermeldung und bei ihm funktioniert es jetzt mit der neuen Version.

PB.Ex FTP 1.0.2.0 wurde veröffentlicht.

Changelog:

• Geändert: Zertifikate werden jetzt automatisch geladen und akzeptiert.