Автоматизация Excel VBA, чтобы открыть дополнительный сеанс присоединения и ввести пароль

Question

Я пытаюсь использовать Excel VBA для ввода пароля в всплывающем окне отражения. Моя проблема в том, что я не могу сослаться на всплывающее окно с запросом пароля.

Тем не менее, я сделал код, чтобы открыть сеанс Telnet, который я уже сохранил, и ввести имя пользователя и пароль, он работает просто отлично. Но, когда я пытался открыть сеанс SSH, который я уже сохранил, имя пользователя и пароль просят ввести в pop вверх окно, а не на экране терминала.

Что мне нужно сделать, чтобы сделать эту работу, пожалуйста? код ниже здесь для сессии telnet

Вся помощь приветствуется.

Sub OpenLSP()

Set System = CreateObject("EXTRA.System") ' Gets the system object

If (System Is Nothing) Then
MsgBox "Could not create the EXTRA System object. Stopping macro playback."
Stop
End If

If System.Sessions.Count = 0 then
  'open a new session
  Set session = System.Sessions.Open("C:\Program Files\Attachmate\EXTRA!\Sessions\tel1.EDP")
else
  'assign existing session
  Set session = System.Sessions(1)
end if 

If (session Is Nothing) Then
MsgBox "Could not create the Sessions collection object. Stopping macro playback."
Stop
End If 


Sess0.Screen.SendKeys ("username")
session.Screen.waithostquiet (g_HostSettleTime)
Sess0.Screen.SendKeys ("password")
session.Screen.waithostquiet (g_HostSettleTime)

End sub