SelectNetworkTemplateAndPolicy Method of the IFPCArray Interface

Syntax

HRESULT SelectNetworkTemplateAndPolicy(
  [in]  BSTR networkTemplate,
  [in]  BSTR defaultPolicy
);

Parameters

networkTemplate

String value that specifies the name of the network template to be used. This parameter must be set to the value held in the Name property of an FPCNetworkTemplate object that is defined in the array.

defaultPolicy

String value that specifies the name of the default firewall policy to be used. This parameter must be set to the value held in the Name property of an FPCPolicyInTemplate object that is included in the collection of policies held in the PoliciesInTemplate property of the FPCNetworkTemplate object specified in the networkTemplate parameter.

Return Value

This method returns S_OK if the call is successful; otherwise, it returns an error code.

Syntax

Sub SelectNetworkTemplateAndPolicy( _
  ByVal networkTemplate As String, _
  ByVal defaultPolicy As String _
)

Parameters

networkTemplate

String value that specifies the name of the network template to be used. This parameter must be set to the value held in the Name property of an FPCNetworkTemplate object that is defined in the array.

defaultPolicy

String value that specifies the name of the default firewall policy to be used. This parameter must be set to the value held in the Name property of an FPCPolicyInTemplate object that is included in the collection of policies held in the PoliciesInTemplate property of the FPCNetworkTemplate object specified in the networkTemplate parameter.

Return Value

Example Code

' Specify the names of a network template
' and a default firewall policy as constants.
Const TemplateName = "Edge Firewall"
Const PolicyName = "Block all"
' Declare the other objects needed.
Dim root	 ' An FPC object
Dim isaArray   ' An FPCArray object
' Create the root obect.
Set root = CreateObject("FPC.Root")
' Get a reference to the array object.
Set isaArray = root.GetContainingArray()
' Apply the specified network template and default firewall policy.
isaArray.SelectNetworkTemplateAndPolicy TemplateName, PolicyName
WScript.echo "The network template " & _ 
isaArray.NetworkTemplateUsed.Name & " was applied."