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" <twsocket@elists.org>
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: <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

-- 
"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

Reply via email to