FtpOpenFile возвращает nil вместо дескриптора файла при загрузке

Question

Я передаю файл с использованием ftp в Delphi.

Я могу подключиться к учетной записи ftp, но когда я пытаюсь загрузить файл, функция FtpOpenFile возвращает ноль вместо дескриптора файла вбыть загруженным.

hintfile := FtpOpenFile(hintconnect,PChar(tgtfn),GENERIC_WRITE,FTP_TRANSFER_TYPE_BINARY,0);

Если я захожу на сайт ftp с помощью клиентского приложения ftp и точно такими же учетными данными, я могу загрузить файл без проблем.

Любые предложения приветствуются.

Answer 1

Попытка получить последнюю ошибку, в документации сказано все:

"Возвращает дескриптор в случае успеха или NULL в противном случае. Чтобы получить конкретное сообщение об ошибке, вызовите GetLastError."

http://msdn.microsoft.com/en-us/library/aa384166(VS.85).aspx

Answer 2

Попробуйте добавить INTERNET_FLAG_PASSIVE к вашему международному звонку, см. Также

http://etutorials.org/Programming/Pocket+pc+network+programming/Chapter+2.+WinInet/File+Transfer+Protocol+FTP/