Есть кнопка на LotusScript , которая обращается на http://127.0.0.1:9999/
Если порт не занят, то всё ок.
Если занят, то надо обращаться на http://127.0.0.1:9998/ , или послать http://127.0.0.1:9999/exit ...

Вот думаю, как это реализовать...
С помощью WScript.Shell ?

 

С помощью WScript.Shell ?

ну зачем это опять?!
java - там все есть и получение ответа от сервера и таймауты, ссылки на либы давал
что значит - занят порт?

 

Есть кнопка на LotusScript , которая обращается на http://127.0.0.1:9999/
Если порт не занят, то всё ок.
Если занят, то надо обращаться на http://127.0.0.1:9998/ , или послать http://127.0.0.1:9999/exit ...
Вот думаю, как это реализовать...
С помощью WScript.Shell ?

Вы, пардон, понимаете разницу между 1)"слушать порт" и "обращаться к порту"; 2)lotus script и visual basic?
Слушать - это значит получать обращения. WScript - это объект vb, в лотусе его не найдёте.
Что значит "обращается" - тоже непонятно: просто убедиться, что порт кто-то слушает, или послать некие запросы и получить некие ответы.
Единственное понятное - что такое "занят порт": скорее всего, подразумевается что-то вроде "не получил ответа от слушателя порта" или "ошибка при открытии сокета".

 

        Dim objHTTP
        Set objHTTP = CreateObject( "WinHttp.WinHttpRequest.5.1" )
        objHTTP.Open "GET", "http://127.0.0.1:9999/exit", False
        Call objHTTP.setRequestHeader ("User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)")
        objHTTP.Send

Отрабатывает как надо, но возвращает ошибку.
Вот думаю, как бы узнать код ошибки?
Print "Ошибка " & Error(Err) & " в строке " & Erl не дает кода ошидбки.
А если без принта, то окошко "winhttp.winhttprequest соединение с сервером было неожиданно прервано код ошибки".

На яве я не пишу ((

 

@seoman2 ну если продолжать через COM, то попробуйте так:
Print "Ошибка " & objHTTP.GetLastError

+ https://msdn.microsoft.com/ru-ru/library/windows/desktop/aa383770(v=vs.85).aspx

 

@savl ох и надолбался я с этим "WinHttp.WinHttpRequest.5.1"
там много нюансов при обработке ошибок
долбался и в хехеле (парсил ХМЛ) и в autoIT, проще java выучить
таймауты плохо-управляемы...
асинхронности, понятно, не получим
с заголовками и параметрами - поход "по минному полю"

 

@lmike угу, но видимо нет возможности/времени/желания сделать иначе у ТС.

 

objHTTP.GetLastError

instance member GetLastError не существует ((

Остается с лотус скрипта запустить ява агент, который выполнит нужную мне команду?

 

...На яве я не пишу ((

Всё равно когда-нибудь придётся. Может уже начать?

 

стается с лотус скрипта запустить ява агент, который выполнит нужную мне команду?

в лотус скрипте можно вызывать метоты Java либ.
разберись с одной либой Net и не строй монстроподобных конструкций.