void __fastcall TForm1::TimerTimer(TObject *Sender)
{
static int timer = 0;
if(timer==1)
{
IdFTP1->Host="ftp.server.ru";
IdFTP1->User="username";
IdFTP1->Password="password";
IdFTP1->Connect();
if(IdFTP1->Connected())
{
try
{
IdFTP1->MakeDir("FolderName"); //создаем калаог
}
catch(...)
{
}
try
{
IdFTP1->ChangeDir("/"+"FolderName");
IdFTP1->Get("/1.txt","c:\\1.txt",true);
}
catch(...)
{
IdFTP1->Disconnect();
}
IdFTP1->Disconnect();
}
timer==0;
}
timer++;
}
по IdFTP, повторно не загружает файл
Добрый день!
Проблема в следующем, работа по загрузке файла с ftp контролом IdFTP у меня зациклена,
проблема в том что если при первом цикле файл для загрузки не обнаружен (файла нет на ftp),
то при повторном выполнение и всех последующих, в то время когда файл на ftp уже имеется, загрузка не происходит.
В чем причина не могу понять, я и IdFTP1->FreeI(); делал после загрузки, IdFTP1->disconnect() то же не помогает.
Нужно чтобы этот код работал в цикле, если файл на FTP появляется он его загружал всегда, а не только с первого прохождения цикла, сам цикл работает.
Спасибо
Проблема в следующем, работа по загрузке файла с ftp контролом IdFTP у меня зациклена,
проблема в том что если при первом цикле файл для загрузки не обнаружен (файла нет на ftp),
то при повторном выполнение и всех последующих, в то время когда файл на ftp уже имеется, загрузка не происходит.
В чем причина не могу понять, я и IdFTP1->FreeI(); делал после загрузки, IdFTP1->disconnect() то же не помогает.
Нужно чтобы этот код работал в цикле, если файл на FTP появляется он его загружал всегда, а не только с первого прохождения цикла, сам цикл работает.
Спасибо
Код: