Question

我正在尝试使用excel vba在弹出的反射窗口中输入密码。我的问题是我无法参考要求输入密码的弹出框。

然而，我做了代码打开我已经保存的telnet会话并输入用户名和密码它工作正常。但是，当我尝试打开我保存的SSH会话时，用户名和密码被要求输入在弹出框中，而不是在终端屏幕中。

我需要做些什么来使这项工作好吗？这里的代码是用于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

Excel VBA自动化打开附件额外会话并输入密码

0 个答案: