I am using this code:
Code: Select all
InitNetwork()
If OpenFTP(0, "XXX.XXX.XX.XXX", "XXXXX", "XXXXXXX", 0)
If ExamineFTPDirectory(0)
While NextFTPDirectoryEntry(0)
Debug FTPDirectoryEntryName(0)
Wend
EndIf
Debug "finished"
Else
MessageRequester("Error", "Can't connect to the FTP server")
EndIfBut in the debug output is: "Сервер Готы"
I tried to compile in Ansi and Unicode mode, there is no difference.

