Re: [twsocket] TFtpClient retrieve file size for progress bar
Hi, I don't think so 'cause Internet Explorer shows the size correctly *and* the more advanced demo FtpTst1 returns the size correctly. So I'm clueless at the moment. cu, Michael Original-Nachricht Datum: Thu, 15 Feb 2007 12:31:59 +0200 Von: "Fastream Technologies" <[EMAIL PROTECTED]> An: "ICS support mailing" CC: Betreff: Re: [twsocket] TFtpClient retrieve file size for progress bar > 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: > 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 -- "Feel free" - 10 GB Mailbox, 100 FreeSMS/Monat ... Jetzt GMX TopMail testen: www.gmx.net/de/go/mailfooter/topmail-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
Re: [twsocket] TFtpClient retrieve file size for progress bar
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: 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
[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