> Hmm, that doesn't help much, have you called Abort somewhere before?
> Try to print the last error message as well _before_ your call to Abort.
> 
> You can also check property Connected before calling a method that 
> requires
> a connection, something like:

No I'm calling abort afterwards. This is the code.
The put command seems to work.

    if not FtpClient1.Put then
    begin
      DisplayError(format('Failure during upload of file %s', [FTarget]));
      codesite.send('upload failed');
      codesite.send(FtpClient1.LastResponse);
      FtpClient1.Abort;
      Exit;
    end;
    Display(format('Finished Upload of file %s', [FTarget]));
    codesite.send('trying quit');
    if not FtpClient1.Quit then
    begin
    codesite.send('bad quit');
    codesite.send(FtpClient1.LastResponse);
      DisplayError('Quit failed');
      FtpClient1.Abort;
      Exit;
    end;

regards

David

############################################################
David Rose

Navigator Systems Ltd,
Network Business Centre, 3 Gloucester Street,
Bath, BA1 2SE,UK

Main Tel: +44 (0)7000 NAVSYS (628797)
Fax: +44 (0)7000 NAVFAX (628329)

Company Email: [EMAIL PROTECTED] (Private e-mail on request)

CONFIDENTIALITY NOTICE

The contents of this e-mail are confidential to the ordinary user of
the e-mail address to which it was addressed and may also be
privileged.  If you are not the addressee of this e-mail you may not
copy, forward, disclose or otherwise use it or any part of it in any
form whatsoever.  If you have received this e-mail in error please
e-mail the sender by replying to this message.
-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://www.elists.org/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be

Reply via email to