Вниз
Скачать: CL | DM;

SendCmd в indy   Найти похожие ветки 

 
Witaliy   (2003-12-10 12:57) [0]

Уважаемые мастера !
Есть код :
IdTelnet.Connect(20);
IdTelnet.GetResponse([220]);
If IdTelnet.SendCmd("user "+UserNameEdit.Text,[200])=200 Then
Begin
If IdTelnet.SendCmd("pass "+PasswordEdit.Text,[200,203])<>200 Then
Begin
Application.Terminate;
End;
End;

IdTelnet.Disconnect;
Close;

На строке посылки пароля система подвисает. Я так понимаю не дожидается кода ответа. Если повторяю те-же действия в telnet вижу следующее:

220 WELCOME
user <имя пользователя>
200 OK
pass <пароль>
200 OK

В чем может быть ошибка ?


 
MadSliMX   (2003-12-10 13:30) [1]

Дело фсё в том что IDTelnet Отправляет по символам... т.е. делаешь цикл и отправляешь после каждого слова #10#13... Просто может быть то, чтоты неверный пассворд или юзернейм отправляешь, а сервер в ответ молчит...


 
Witaliy   (2003-12-10 13:48) [2]

Нет, SendCmd отправляет строку как WriteBuffer(Str+EOL), где EOL=#10+#13. Такое впечатление, что ответ приходит раньше чем его начинает ожидать IdTelnet



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.014 c
7-29638
KPPL
2003-11-22 22:35
2004.02.10
Printer


14-29582
Calm
2004-01-19 19:50
2004.02.10
Standart Delphi Library.


14-29567
HermitAlex
2004-01-20 13:36
2004.02.10
Обучение игры в бильярд


3-29197
Тимохов
2004-01-20 11:17
2004.02.10
Про TClientDataSet.


4-29650
Kinder
2003-12-07 11:45
2004.02.10
Заполнение корзины




   Наверх