Здравствуйте. Я написал макрос в ssh на сервер, имя пользователя и пароль которого хранятся в A1 и B1 соответственно.Когда макрос вызывается, замазка выдает ошибку. Ошибка сети: невозможно назначить запрошенный адрес
Sub putty()
Dim un As String, pwd As String, pcmd As String, pline As String
Dim shellObj As Object, runCmd As Object, sOut As Object
un = Range("A1").Value
pwd = Range("B1").Value
Set shellObj = CreateObject("WScript.Shell")
pcmd = "C:\Program Files\PuTTY\putty.exe " & un & "@15.xx.xx.xx -pw " &
pwd & " who"
Set runCmd = shellObj.exec(pcmd)
Set sOut = runCmd.StdOut
While Not sOut.AtEndOfStream
pline = sOut.ReadLine
Debug.Print pline
Wend
End Sub
Есть ли обходной путь для этого.