Hi, I am trying to implement a SSH client with Synapse tlntsend and ssl_cryptlib units on FreePascal 2.2.0. I got cryptlib.pas and cl32.dll from
http://www.cs.auckland.ac.nz/~pgut001/cryptlib When I am trying to connect to a known server, which I am used to connect via OpenSSH or Putty, SSHLogin never becomes true. Here is my code: program ssh; uses sysutils, tlntsend, ssl_cryptlib; var c : TTelnetSend; begin c := TTelnetSend.Create; c.TargetHost := '[EMAIL PROTECTED]'; c.TargetPort := '22'; c.Timeout := 60000; c.UserName := 'USERNAME_OR_EMPTY'; c.Password := 'PASSWORD'; if not c.SSHLogin() then writeln('c.SSHLogin = false, could not connect') else writeln('c.SSHLogin = true, connected'); c.Logout(); c.Free(); end. Generally, I managed to get Synapse working. All other tests, e.g. FTP connections and downloads, were successful. Any advice? Regards Wolfram ------------------------------------------------------------------------- This SF.net email is sponsored by: Microsoft Defy all challenges. Microsoft(R) Visual Studio 2008. http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/ _______________________________________________ synalist-public mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/synalist-public
