Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.05.04;
Скачать: CL | DM;

Вниз

Определение существования папки на FTP   Найти похожие ветки 

 
Inearthed   (2007-08-01 07:15) [0]

Как можно по заданному пути определить, существует ли данная папка на FTP?


 
SlymRO ©   (2007-08-01 07:52) [1]

по принципу определения наличия стены:
10 шаг вперед
20 если получил по лбу/носу/или др.выпирающим частям тела то стена имеет место быть
30 иначе стены
40 goto 10


 
SlymRO ©   (2007-08-01 07:53) [2]

30 иначе стены нет


 
Inearthed   (2007-08-01 07:55) [3]

:) А если без прямого физического взаимодействия?


 
SlymRO ©   (2007-08-01 08:15) [4]

Inearthed   (01.08.07 7:55) [3]
как проверить лампочку на то, что она будет гореть 50 тыс. часов? (без прямого физического взаимодействия)...
если ты наблюдал за "закатчиками" то мог наблюдать процедуру загрузки файла по FTP: некоторые "загрузыны" не посылают команду LIST, а тупо делают chdir - если получили отлуп, значит это не папка, а что-то другое (например файл :))


 
Inearthed   (2007-08-01 08:34) [5]

Поясни, если не сложно. ;) Мне просто не хотелось бы, что-либо туда загружать или выгружать, хорошо бы, если бы существовал какой-нибудь аналог функции DirectoryExists..


 
SlymRO ©   (2007-08-01 09:19) [6]

тупо делают chdir - если получили отлуп, значит это не папка


 
SlymRO ©   (2007-08-01 09:21) [7]

к примеру: ну есть папка и что? правов у тебя на нее нету... есть папка? в моем понятии папка - это узел в дереве коталогов, в который можно хотябы войти


 
Inearthed   (2007-08-01 09:40) [8]

Не работает. Может я недостаточно тупо это делаю? ;) Вот:

if IdFtp1.Connected then
begin
ShowMessage("Соединение установлено");
try
 chdir("ftp://172.16.0.7"+ftpPathEdit.Text);
except
 ShowMessage("Папка не существует");
end;
IdFtp1.Disconnect;
end;


 
Сергей М. ©   (2007-08-01 10:15) [9]


> Может я недостаточно тупо это делаю?


Не волнуйся, тупости в том что ты делаешь достаточно)

Но еще тупее будет вызывать метод ChangeDir объекта IdFtp1)


 
umbra ©   (2007-08-01 10:25) [10]

if IdFtp1.Connected then
begin
 ShowMessage("Соединение установлено");
 try
  IdFtp1.ChangeDir(ftpPathEdit.Text);
 except
    on E: EIdProtocolReplyError do
       begin
          if E.ReplyErrorCode = 550 then
            ShowMessage("Не могу перейти в папку " + ftpPathEdit.Text);
       end;
    IdFtp1.Disconnect;
 end;
end;




Страницы: 1 вся ветка

Текущий архив: 2008.05.04;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.014 c
9-1168306609
rts111
2007-01-09 04:36
2008.05.04
Ребята, "попинайте" техно-дему. (RTS 490 Kb.)


15-1206414440
Slider007
2008-03-25 06:07
2008.05.04
С днем рождения ! 25 марта 2008 вторник


15-1206016036
@!!ex
2008-03-20 15:27
2008.05.04
Добавить в res файл полноцветную иконку.


4-1188545444
Gear
2007-08-31 11:30
2008.05.04
Как перехватить появление в системе нового звукового устройства?


2-1207510572
cyber-pilot
2008-04-06 23:36
2008.05.04
Работа с файлами