Как слушать порт сайта с LotusScript ?

seoman2

Lotus team
17.02.2010
465
1
#1
Есть кнопка на LotusScript , которая обращается на
Для просмотра контента необходимо: Войти или зарегистрироваться

Если порт не занят, то всё ок.
Если занят, то надо обращаться на
Для просмотра контента необходимо: Войти или зарегистрироваться
, или послать
Для просмотра контента необходимо: Войти или зарегистрироваться
...

Вот думаю, как это реализовать...
С помощью WScript.Shell ?
 
07.07.2016
13
0
#3
Есть кнопка на LotusScript , которая обращается на
Для просмотра контента необходимо: Войти или зарегистрироваться

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

seoman2

Lotus team
17.02.2010
465
1
#4
Код:
        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 соединение с сервером было неожиданно прервано код ошибки".

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

lmike

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

savl

Lotus team
28.10.2011
2 136
105
#7
@lmike угу, но видимо нет возможности/времени/желания сделать иначе у ТС.
 

lionk

Well-known member
05.04.2007
310
2
#10
стается с лотус скрипта запустить ява агент, который выполнит нужную мне команду?
в лотус скрипте можно вызывать метоты Java либ.
разберись с одной либой Net и не строй монстроподобных конструкций.