Перейти к содержимому

Фотография

Работа в QTP через SSH


  • Авторизуйтесь для ответа в теме
В теме одно сообщение

#1 Hary[K]

Hary[K]

    Новый участник

  • Members
  • Pip
  • 37 сообщений

Отправлено 20 января 2009 - 07:45

Доброе утро.
Есть проблема.
Имеем клиент серверное приложение.
База -Cache
Сервер бд и приложения - Linux
На сервер бд выкладываются загруженные сканы через Web морду.
Клиентские машины - Windows
Для работы с сервером открываю сессию через putty (или его аналоги) через протокол SSH.

Как в QTP в Windows открыть сессию по SSH, получить сканы и закрыть сессию?
Монтировать папку не очень хочется т.к. тестовых сред довольно много и среды постоянно перемещаются и повторное монтирование занимает довольно много времени.
  • 0

#2 GRN

GRN

    Новый участник

  • Members
  • Pip
  • 1 сообщений

Отправлено 22 января 2009 - 13:59

Не самое красивое решение, но у меня работает исправно:

[codebox]
Set objShell = CreateObject("WScript.Shell")
WinTitle = "username@host"
strCommand="нужная команда для выполнения"
strCommand = Replace(strCommand,"+","{+}")

strRun="putty -v username@host -pw password"
strOut = objShell.Run(strRun,4,false)
bWin = objShell.AppActivate(WinTitle)
objShell.SendKeys(strCommand)
objShell.SendKeys("{ENTER}")
wait 5
bWin = objShell.AppActivate(WinTitle)
objShell.SendKeys("exit{ENTER}")


Set objShell=Nothing
[/codebox]
  • 0


Количество пользователей, читающих эту тему: 0

0 пользователей, 0 гостей, 0 анонимных