Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Мережі";
Поточний архів: 2004.12.12;
Завантажити: [xml.tar.bz2];

Вниз

ICS під XP Знайти схожі гілки


TUser ©   (2004-10-01 13:40) [0]

Вот. Начинаю мучаться с WinXP. Я понимаю, конечно, что эта система - верх совершенства и добродетели, но некоторые проблемы все-таки возникли.
Конкретно. Есть совершенно работающая и давно отлаженная программа, которая что-то качает по FTP. Используется библиотека ICS. Под 2000 и NT4, а также под 9х все работает как часы. Под ХР иногда тоже работает, но переодически (примерно в 10% случаев) возникает Exception на команде Quit. Т.е. все скачивается нормально, но отлогиниться от сервера почему-то не можем. При следующей попытке, естественно, не можем войти - т.к. мы уже там. Проблема возникает и под юзером, и под админом. Скажу сразу, что код прописан в dll, но думаю это не важно.
Что такого особенного в команде Quit? Вот код

function FTPLoad(var AC:string):boolean;
begin
  Form1.Memo1.Lines.Clear;
  try
   result:=length(AC)=4;
   if result then
      try
       FTP.HostDirName:=FTPHost+"/"+copy(AC,2,2);
       FTP.HostFileName:=GetFtpFileName(AC);
       FTP.LocalFileName:=TempFolder+GetLocalFileName(AC);
       if not FTP.Open then
          raise Exception.Create("");
       if not FTP.User then
          raise Exception.Create("");
       if not FTP.Pass then
          raise Exception.Create("");
       if not FTP.TypeSet then
          raise Exception.Create("");
       if not FTP.Cwd then
          raise Exception.Create("");
       if not FTP.Get then
          raise Exception.Create("");
       AC:=FTP.LocalFileName;
       result:=Fileexists(AC);
       FTP.HostDirName:=copy(FTP.HostDirName,1,length(FTP.HostDirName)-3);
       if not FTP.Quit then
          raise Exception.Create("");
      except
       MessageBox(W,"FTP v jope, sorry :(","GREATE BUG",MB_OK);
       FTP.Quit;
       result:=false;
      end;
  finally
   Form1.Hide;
  end;
end;



Lord de Mon ©   (2004-10-01 17:14) [1]

А как насчет дисконнекта?



сторінки: 1 вся гілка

Форум: "Мережі";
Поточний архів: 2004.12.12;
Завантажити: [xml.tar.bz2];

наверх









Пам'ять: 0.55 MB
Час: 0.056 c
1-1101808353
кактус
2004-11-30 12:52
2004.12.12
Перевірка символів на кирилицю!


14-1101223336
Олег '
2004-11-23 18:22
2004.12.12
Дизайн


1-1101399547
Саньок
2004-11-25 19:19
2004.12.12
створення програм


8-1095414104
Гість
2004-09-17 13:41
2004.12.12
GDI +. Як правильно працювати з MeasureCharacterRanges


1-1101663123
serko
2004-11-28 20:32
2004.12.12
GetDir





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська