Hello, Some old FTP servers do not support the SIZE command as it is not mandatory in RFC959. Yuo will need to use a parser and parse LS response.
Regards, SZ ----- Original Message ----- From: "Michael Fritz" <[EMAIL PROTECTED]> To: <twsocket@elists.org> Sent: Thursday, February 15, 2007 12:20 PM Subject: [twsocket] TFtpClient retrieve file size for progress bar > Hi, > > I'm using the BasFtp1 demo of ICS to test downloading a file from an FTP > server. I changed this demo (at least a tried to) to retrieve the file > size > before downloading to feed a progress bar. > > I've changed the RequestDone event the following way: > [..] > ftpTypeSetAsync: > begin > FtpClient1.HostFileName := FFileName; > FtpClient1.LocalFileName := FLocalFileName; > FtpClient1.SizeAsync; << here > // FtpClient1.GetAsync; << here > end; > ftpSizeAsync, ftpFileSizeAsync : << new > begin > ProgressBar1.Max := FtpClient1.SizeResult; > FtpClient1.GetAsync; > end; > ftpGetAsync: begin > FSuccess := (FtpClient1.StatusCode = 226); > FtpClient1.QuitAsync; > end; > > When SizeAsync is executed the status/error code I get is 550, access > denied. I assume that authentication was correct, since all previous > status > messages told me so. > > So what's wrong here? Or better how would you determine the file size > before downloading? > -- > cu, > Michael > > -- > "Feel free" - 5 GB Mailbox, 50 FreeSMS/Monat ... > Jetzt GMX ProMail testen: www.gmx.net/de/go/mailfooter/promail-out > -- > 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