Partager via

Guide pratique pour créer un service de liaison

  • Article

Une autre tâche que vous pouvez effectuer lors de la configuration d’une connexion IPDLC consiste à créer le service de liaison.

  1. Connectez-vous à l’espace de noms sur l’ordinateur local à l’aide de GetObject.

  2. Créez le service de liaison instance à l’aide de SpawnInstance.

  3. Définissez les propriétés du nouveau service de liaison.

  4. Validez la nouvelle instance en mémoire à l’aide de la méthode Put_.

    L’exemple suivant montre comment créer un service de liaison :

private Sub CreateIPDLCLinkService  
    on error resume next  
' Connect to the namepsace on the local machine  
    Set Namespace = GetObject("Winmgmts:root\MicrosoftHIS")  
    Set ObjClass  = Namespace.Get("MsSna_LinkService_IpDlc")     
' Create new link service instance  
    Set NewInst   = ObjClass.SpawnInstance_  
    ' Set instance properties  
    NewInst.NetworkName = Left(strComputerName, 8)  
    NewInst.CPName = "IPDLCLS"  
    NewInst.NodeID = "05D.FFFFF"  
    NewInst.AddressType = 2  
    NewInst.LocalAddress = Trim(strLocalAddress)  
    NewInst.LENNode = strLenNode  
    NewInst.PrimaryNNS = strPrimaryNNS  
    if (strBackupNNS <> Empty) then  
        NewInst.BackupNNS = strBackupNNS  
    end if  
    ' Commit the instance  
    NewInst.Put_  
    if Err.Number <> 0 then  
        PrintWMIErrorThenExit Err.Description, Err.Number  
        Wscript.Echo "Link Service Creation Failed " & Err.Description  
    Else   
        Wscript.Echo "Link Serice Created Successfully"  
    end if  
End Sub