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