Delphi + nsoftware sshclient, как отправить команду на устройство?

Я пытаюсь отправить команду через SSH на маршрутизатор, используя nsoftware SSHClient:

      procedure TForm1.Button2Click(Sender: TObject);
begin
 iphSSHClient1.Connected:=true;
 iphSSHClient1.OpenChannel('session');//channel id is 0
 iphSSHClient1.StartService('0','shell','');
 iphSSHClient1.OpenTerminal('0', 'vt100', 480, 640, false, '350000000000');
end;

При запуске кода я получил ошибку 1033: «не удалось открыть терминал vt100 для канала [0]». Затем я попытался создать два канала:

      procedure TForm1.Button2Click(Sender: TObject);
begin
 iphSSHClient1.Connected:=true;
 iphSSHClient1.OpenChannel('session');//channel id is 0
 iphSSHClient1.OpenChannel('session');//channel id is 1
 iphSSHClient1.StartService('0','shell','');
 iphSSHClient1.OpenTerminal('1', 'vt100', 480, 640, false, '350000000000');//here is use channelid 1
end;

Код работает, но правильно ли это? и как отправить данные команды на устройство, я попробовал:

      iphSSHClient1.SendChannelData('1',TEncoding.UTF8.GetBytes('ls'#13));

В установочном пакете от nsoftware нет примера использования SSHCLient, есть ли помощь?

ВНИМАНИЕ: ваш терминал не поддерживает запросы позиции курсора (CPR). Как это решить?

Спасибо,

0 ответов

Другие вопросы по тегам