Hi, Try removing the if not (FTPClient1.Binary) then line. It could already be binary in the component but the typeset command may not have been issued before.
Regards, SZ ----- Original Message ----- From: "David Rose" <[EMAIL PROTECTED]> To: <twsocket@elists.org> Sent: Friday, December 16, 2005 12:26 AM Subject: [twsocket] FTPClient ASCII or Binary ? > Is there something wrong with the code below. As far as I understand it > should be uploading in binary mode, but the > FTP conversation looks like it's in ASCII mode, though the (23MB) file > does seem to upload correctly. > If I try something like FTPexplorer then the FTP log does show "Opening > BINARY mode .....", so presumably it's not the > server reporting wrongly or does the client generate the message text from > the status number ? > > if FTPClient1.Cwd() then > begin > if not (FTPClient1.Binary) then > begin > FTPClient1.Binary := true; > FTPClient1.TypeSet(); > end; > FTPClient1.dele; > FTPClient1.put; > end; > >> CWD /anon_ftp/pub/RentalDesk_NX/ > < 250 CWD command successful >> DELE RentalDeskNXWorkStation.EXE > < 250 DELE command successful >> PORT 192,168,42,215,18,32 > < 200 PORT command successful >> STOR RentalDeskNXWorkStation.EXE > < 150 Opening ASCII mode data connection for RentalDeskNXWorkStation.EXE > > 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 -- 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