Вниз
Скачать: 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.012 c
14-29582
Calm
2004-01-19 19:50
2004.02.10
Standart Delphi Library.


6-29499
Witaliy
2003-12-10 12:57
2004.02.10
SendCmd в indy


6-29502
smit_
2003-12-07 23:51
2004.02.10
Как определить входящий звонок на модем?


1-29327
Дракоша
2004-01-29 20:32
2004.02.10
Как присвоить обработчик динамически созданому компоненту


1-29404
axx
2004-01-31 13:28
2004.02.10
Вопрос по VCLZip




   Наверх