IPDLC 연결을 설정할 때 수행할 수 있는 또 다른 작업은 링크 서비스를 만드는 것입니다.
링크 서비스를 만들려면
GetObject를 사용하여 로컬 컴퓨터의 네임스페이스에 연결합니다.
SpawnInstance를 사용하여 새 링크 서비스 인스턴스를 만듭니다.
새 링크 서비스의 속성을 설정합니다.
Put_ 메서드를 사용하여 새 인스턴스를 메모리에 커밋합니다.
다음 예제에서는 새 링크 서비스를 만드는 방법을 보여줍니다.
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