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