Чтобы выполнить публикацию за SSL-ускорителем
-
В дереве консоли управления Forefront TMG щелкните узел Политика межсетевого экрана.
-
В области Задачи откройте вкладку Инструментарий.
-
На вкладке Инструментарий щелкните Сетевые объекты, нажмите кнопку Создать, а затем выберите пункт Веб-прослушиватель, чтобы открыть мастер создания веб-прослушивателя.
-
Завершите настройки с помощью мастера создания веб-прослушивателя, как показано в таблице.
Страница Поле или свойство Параметр или действие Страница приветствия мастера создания веб-прослушивателя
Имя веб-прослушивателя
Введите имя для нового веб-прослушивателя. Например, введите: SSL Accelerator Listener
Безопасность клиентских подключений
Выберите Не требовать безопасного подключения SSL для клиентов.
IP-адреса веб-прослушивателя
Прослушивать входящие веб-запросы данных сетей
Выберите сеть Внешняя. Нажмите кнопку Выбрать IP-адреса, затем установите флажок Указанные IP-адреса на компьютере Forefront TMG в выбранной сети. Из списка Доступные IP-адреса выберите IP-адрес для веб-сайта, по которому Forefront TMG будет прослушивать HTTP-запросы с SSL-ускорителя, нажмите кнопку Добавить, а затем кнопку ОК.
Параметры проверки подлинности
Укажите способ предоставления клиентами учетных данных для Forefront TMG.
В раскрывающемся списке выберите пункт Без проверки подлинности.
Параметры единого входа
Включение единого входа в систему для узлов, опубликованных при помощи этого прослушивателя
Единый вход в систему недоступен в данной конфигурации.
Завершение работы мастера создания веб-прослушивателя
Просмотрите параметры и нажмите кнопку Готово.
-
В области сведений нажмите кнопку Применить, чтобы сохранить и обновить конфигурацию, а затем — кнопку ОК.
-
Чтобы задать порт, на который Forefront TMG будет возвращать ответы SSL-ускорителю, скопируйте следующий код в файл блокнота и сохраните его как SetSslAcceleratorPort.vbs. Затем в командной строке для прослушивателя SSL-ускорителя введите:
CScript SetSslAcceleratorPort.vbs "SSL Accelerator Listener"Копировать код ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ' © Корпорация Майкрософт (Microsoft Corporation) Все права защищены. ' ДАННЫЙ КОД ПРЕДОСТАВЛЯЕТСЯ БЕЗ КАКИХ-ЛИБО ГАРАНТИЙ. ' ВСЯ ОТВЕТСТВЕННОСТЬ ЗА ИСПОЛЬЗОВАНИЕ И ПОСЛЕДСТВИЯ ИСПОЛЬЗОВАНИЯ ДАННОГО ' КОДА ЛЕЖИТ НА ПОЛЬЗОВАТЕЛЕ. ПОЭТОМУ ИСПОЛЬЗОВАНИЕ И ПЕРЕДАЧА ЭТОГО КОДА, ' С ИЗМЕНЕНИЯМИ ИЛИ БЕЗ ТАКОВЫХ, РАЗРЕШЕНЫ. ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Option Explicit ' Определение необходимой константы const Error_FileNotFound = &H80070002 Main(WScript.Arguments) Sub Main(args) If(args.Count = 1) Then SetSslAcceleratorPort args(0) Else Usage() End If End Sub Sub SetSslAcceleratorPort(wlName) ' Создание корневого объекта. Dim root ' The FPCLib.FPC root object Set root = CreateObject("FPC.Root") ' Объявление других необходимых объектов. Dim tmgArray ' An FPCArray object Dim webListener ' An FPCWebListener object Dim text ' A String Dim input ' A String ' Получение ссылки на локальный объект массива. Set tmgArray = root.GetContainingArray() ' Получение ссылки на указанный веб-прослушиватель. On Error Resume Next Set webListener = _ tmgArray.RuleElements.WebListeners.Item(wlName) If Err.Number = Error_FileNotFound Then WScript.Echo _ "Указанный веб-прослушиватель не может быть найден." Else Err.Clear On Error GoTo 0 With webListener.Properties If .SSLAcceleratorPort = 0 Then text = "Не настроено ни одного порта SSL-ускорителя." _ & VbCrLf _ & "Введите ненулевое значение, чтобы активировать" _ & VbCrLf _ & "порт SSL-ускорителя." Else text = "Текущий порт SSL-ускорителя: " _ & .SSLAcceleratorPort _ & VbCrLf _ & "Вы можете изменить это значение или введите 0," _ & VbCrLf _ & "чтобы деактивировать порт SSL-ускорителя." End If input = InputBox(text,"Порт SSL-ускорителя", "443") End With If CInt(input) <> _ webListener.Properties.SSLAcceleratorPort Then WScript.Echo "Изменение порта SSL-ускорителя на " _ & CInt(input) & "..." webListener.Properties.SSLAcceleratorPort = CInt(input) End If If webListener.Properties.SSLAcceleratorPort <> 0 Then WScript.Echo "Проверка, что порт SSL-ускорителя установлен на 0..." webListener.Properties.SSLPort = 0 End If webListener.Save End If End Sub Sub Usage() WScript.Echo "Usage:" & VbCrLf _ & " CScript " & WScript.ScriptName & " WebListener" _ & VbCrLf & "" & VbCrLf _ & " WebListener - Name of the Web listener" WScript.Quit End Sub
Примечание. |
---|
|
См. также
© Корпорация Майкрософт, 2009 Все права защищены.