Forefront TMG Array Examples

The following code uses the FPCArray.Servers property to return the name of an individual server.


Dim root As New FPCLib.FPC
Dim serverName As String
Dim array1 As FPCArray
Set array1 = root.Arrays(1)
serverName = array1.Servers(1).Name
MsgBox serverName

The following code retrieves the name of the containing array by using the GetContainingArray method.


Dim root As New FPCLib.FPC
Dim currentArray As String
currentArray = root.GetContainingArray.Name
MsgBox currentArray

 

 

Build date: 7/12/2010

Show: