Freigeben über

So erstellen Sie einen Linkdienst

Eine weitere Aufgabe, die Sie beim Einrichten einer IPDLC-Verbindung ausführen möchten, besteht darin, den Linkdienst zu erstellen.

  1. Stellen Sie mithilfe von GetObject eine Verbindung mit dem Namespace auf dem lokalen Computer her.

  2. Erstellen Sie die neue Linkdienstinstanz mithilfe von SpawnInstance.

  3. Legen Sie die Eigenschaften des neuen Verknüpfungsdiensts fest.

  4. Speichern Sie die neue Instanz im Arbeitsspeicher mithilfe der Put_-Methode.

    Das folgende Beispiel zeigt, wie Sie einen neuen Linkdienst erstellen:

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
  • Last updated on