Re: Брэндмауэр Windows и сервер Domino

2021-08-24T13:47:25Z

Чтобы с включенным брэндмауром работала библиотека NotesFTP, как в примере кода ниже

Dim objFTP As NotesFTPSession
Set objFTP=New NotesFTPSession
With objFTP
.Connect ftpIP, ftpLogin, ftpPass, 0
.PutFile nam, namout,FTP_TRANSFER_TYPE_ASCII
.Disconnect
End With
Delete objFTP

Вариант1.
.Connect ftpIP, ftpLogin, ftpPass, 0
заменяем на
.Connect ftpIP, ftpLogin, ftpPass, INTERNET_FLAG_PASSIVE

Вариант2. В библиотеке NotesFTP

Sub Connect(server$, user$, password$, flags&)

Me.hConnection = InternetConnect(Me.hLib, server$, INTERNET_INVALID_PORT_NUMBER, user$, password$, INTERNET_SERVICE_FTP, flags&, 0)

заменить на

Me.hConnection = InternetConnect(Me.hLib, server$, INTERNET_INVALID_PORT_NUMBER, user$, password$, 1, INTERNET_FLAG_PASSIVE, 2)

End Sub

Брэндмауэр Windows и сервер Domino

2021-08-24T08:42:12Z

Для доступа между серверами Domino в брэндмауэре Windows необходимо разрешить работу порта 1352.
1. Заходим в Панель управления \ Система и безопасность \ Брандмауэр Windows \ Дополнительные параметры.
2. Создать новое правило в разделе "Правила для входящих подключений".
3. Выбираем "Для порта", "Протокол ТСР", указываем порт 1352, разрешаем его.
Получается правило как на скриншоте.

Форум компьютерной помощи — Брэндмауэр Windows и сервер Domino

Re: Брэндмауэр Windows и сервер Domino

Брэндмауэр Windows и сервер Domino