Показать сообщение отдельно
  #3  
Старый 03.08.2012, 16:09
mkoretskiy mkoretskiy вне форума
Прохожий
 
Регистрация: 03.08.2012
Сообщения: 4
Репутация: 10
По умолчанию

Проблема решена. нюансы телнета. здесь я не спец.

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

после "UserName:" еще идет набор символов , заканчивается комбинацией FF FE 27.

работающий код

Код:
    TN.WaitFor('UserName:');
    TN.WaitFor(#255#254#39);
    for i:=1 to Length(SwitchLogin) do begin
      TN.Send(SwitchLogin[i]);
      TN.WaitFor(SwitchLogin[i]);
    end;
    TN.Send(CRLF);
    TN.WaitFor('PassWord:');
    for i:=1 to Length(SwitchPassword) do begin
      TN.Send(SwitchPassword[i]);
      TN.WaitFor('*');
    end;
    TN.Send(CRLF);
    TN.WaitFor(waitfor); 

пока это всплыло только для длинка. с другими моделями таких траблов не возникало.

возможно это решается проще. если есть рецепт - буду благодарен
Ответить с цитированием