Excel VBA. Определение статуса порта
- При выполнении этого кода возвращается статус порта (Open либо Close).
Sub TestPortCheck()
Dim ip As String
Dim port As String
Dim result As String
ip = "127.0.0.1"
port = "1234"
result = CheckPortWithPowerShell(ip, port)
' Выведите результат в окно отладки
Debug.Print "Result for IP " & ip & " and Port " & port & ": " & result
End Sub
- При выполнении этого кода возвращается статус порта (всегда Open).
Sub TestPortCheck2()
Dim ip As String
Dim port As String
Dim result As String
' Получение IP и порта из ячеек
ip = Range("A2").Value
port = Range("B2").Value
' Проверка порта с помощью PowerShell
result = CheckPortWithPowerShell(ip, port)
' Выведите результат в окно отладки
Debug.Print "Result for IP " & ip & " and Port " & port & ": " & result
End Sub
В чем ошибка? По какой причине во втором варианте может неправильно определится статус порта? Что нужно поменять в коде?