An update is available for ISA Server 2006 integrated NLB that lets you add virtual IP addresses that are outside the subnet of the dedicated IP address

Article translations Article translations
Article ID: 959310 - View products that this article applies to.
Expand all | Collapse all

INTRODUCTION

An update is available for Microsoft Internet Security and Acceleration (ISA) Server 2006 integrated Network Load Balancing (NLB). This update lets you add virtual IP addresses that are outside the subnet of the dedicated IP address. There is no hotfix requirement for Forefront Threat Management Gateway (TMG), but you still need to run the script below to add virtual IP addresses that are outside the subnet of the dedicated IP address.

MORE INFORMATION

To apply this update, follow these steps:
  1. Download and then install the hotfix package that is mentioned in the following Microsoft Knowledge Base article:
    959357 Description of the ISA Server 2006 hotfix package: October 29, 2008
  2. Start Notepad, copy the following script into a Notepad file, and then change the script according to your settings.
    Const SE_VPS_GUID = "{143F5698-103B-12D4-FF34-1F34767DEabc}"
    Const SE_VPS_NAME = "AdditionalVIPsAndMask"
    Const SE_VPS_VALUE = "<additionVIP1>/<subnetMask1>; <additionVIP2>/<subnetMask2>;"
    
    ' To run: cscript confignlbAdditionalVips.vbs /Network:External
    ' use the network name as appropriate.
    ' You must remove comment marks on the correct line to add or remove the VPS.
    
    Sub NLBConfiguration()
    
        ' Create the root obect.
        Dim root  ' The FPCLib.FPC root object
        Set root = CreateObject("FPC.Root")
    
        'Declare the other objects needed.
        Dim array         ' An FPCArray object
        Dim NetworkConfig ' An FPCNetworkConfiguration object
    
        ' Get references to the array object
        ' and the protocols collection.
        Set array = root.GetContainingArray
    
        On Error Resume Next
        Set NetworkConfig = array.NetworkConfiguration
        CheckError
    
        Dim Networks ' FPCNetworks
        Set Networks = NetworkConfig.Networks
    
        Dim Network         ' FPCNetwork
        Set Network = Networks(WScript.Arguments.Named("Network"))
        If Err.Number <> 0 Then
            Wscript.Echo "Cannot find network, error- " &  Hex(Err.Number) & " " & Err.Description
            Err.Clear
            WScript.Quit(1)
        End If
    
        Dim VendorSets  ' An FPCVendorParametersSets collection
        Dim VendorSet   ' An FPCVendorParametersSet object
    
        Set VendorSets = Network.VendorParametersSets
        CheckError
    
        On Error Resume Next
        Set VendorSet = VendorSets.Item( SE_VPS_GUID )
    
        If Err.Number <> 0 Then
            Err.Clear
    
            ' Add the item
            Set VendorSet = VendorSets.Add( SE_VPS_GUID )
            CheckError
            WScript.Echo "New VendorSet added... " & VendorSet.Name
    
        Else
            WScript.Echo "Existing VendorSet found... value- " &  VendorSet.Value(SE_VPS_NAME)
        End If
    
        Err.Clear
    
    '  Remove the comment mark from the following line to set VIPs. Make sure that there are no additional
    '  VIPs defined in the UI.
    '
    '    VendorSet.Value(SE_VPS_NAME) = SE_VPS_VALUE
    
    '  Remove the comment mark from the following line to delete the VPS.
    '
    '    VendorSet.RemoveValue(SE_VPS_NAME)
    
        If Err.Number <> 0 Then
            CheckError
        End If
    
        Networks.Save false, true
        WScript.Echo "Done saving..."
    
    End Sub
    
    Sub CheckError()
    
        If Err.Number <> 0 Then
            WScript.Echo "An error occurred: 0x" & Hex(Err.Number) & " " & Err.Description
            Err.Clear
        End If
    
    End Sub
    
    
    If Not WScript.Arguments.Named.Exists("Network") Then
        WScript.Echo "Network not defined"
        WScript.Quit(1)
    End If
    
    
    NLBConfiguration
    Notes
    • Use appropriate virtual IP addresses and subnet masks to replace the placeholders in the following line.
      Const SE_VPS_VALUE = "<additionVIP1>/<subnetMask1>; <additionVIP2>/<subnetMask2>;"
      For example, modify the line as follows.
      Const SE_VPS_VALUE = "74.0.74.199/255.0.0.0;199.9.10.11/255.255.254.0;"

      The semicolon must appear even if there is only one additional virtual IP address.
    • Important The list of the additional virtual IP addresses must not contain the dedicated IP address.
    • Important The list of the additional virtual IP address must not contain the same virtual IP address multiple times.
    • Important The IP addresses added with the sctip must not contain the virtual IP address configured from the user interface (UI)
    • If the additional virtual IP addresses are added by this script, the user interface (UI) for additional virtual IP addresses in ISA Server Management Console is unavailable, however the virtual IP address added from user interface (UI) is still available for use
    • If you used ISA Server Management Console to add virtual IP addresses, the values that are added in this script are ignored.
  3. Save the file as a Microsoft Visual Basic script file by using the .vbs file name extension. For example, save the file as ConfignlbAdditionalVips.vbs in the C:\ConfignlbAdditionalVips folder.
  4. At a command prompt, move to the location of the .vbs file, and then run the .vbs file. For example, run the following commands.
    cd C:\ConfignlbAdditionalVips
    cscript ConfignlbAdditionalVips.vbs /Network:External

REFERENCES

For more information about software update terminology, click the following article number to view the article in the Microsoft Knowledge Base:
824684 Description of the standard terminology that is used to describe Microsoft software updates

Properties

Article ID: 959310 - Last Review: October 9, 2011 - Revision: 4.0
APPLIES TO
  • Microsoft Internet Security and Acceleration Server 2006 Service Pack 1, when used with:
    • Microsoft Internet Security and Acceleration Server 2006 Enterprise Edition
Keywords: 
kbexpertiseinter kbfix kbsurveynew kbqfe KB959310

Give Feedback

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com