>Anybody knows how to call this api function?
>
>I do:
>
>nFileSize=FtpGetFileSize(OpenFileHandle,0)
>
>But returns always -1

DWORD FtpGetFileSize(
IN HINTERNET hFile,
OUT LPDWORD lpdwFileSizeHigh
);

DECLARE INTEGER FtpGetFileSize IN WININET INTEGER hINTERNET, INTEGER @ lpdwHigh

You need an existing hINTERNET instance from FtpOpenFile(), and have to pass a VFP numeric by reference as the second parameter as in:

nFileSizeHigh = 0
nFileSizeLow = FtpGetFile(hINTERNET,@nFileSizeHigh)
nFileSize = IIF(nFileSizeHigh < 0, 2^32 + nFileSizeHigh,nFileSizeHigh)*2^32 +;
IIF(nFileSizeLow < 0, 2^32 + nFileSizeLow,nFileSizeLow)

It requires IE5 or better.