Logging on to Host Integration Server Through a WMI Provider
The first step that you must perform when you create a WMI application or script is to log on to WMI and set the security for your application. You can perform this action either by using the SWbemLocator locator object, or with a moniker.
To connect to WMI using SWbemLocator
Retrieve a locator object with a call to CreateObject.
Log on to the namespace with a call to ConnectServer.
Set the impersonation level with a call to Security._ImpersonationLevel.
Implement your task.
The following code sample shows how to connect to WMI using SWbemLocator:
Set WmiLocator = CreateObject("WbemScripting.SWbemLocator")
Set WmiNameSpace = WmiLocator.ConnectServer("","root\MicrosoftHIS","", "","", "",0,Nothing)
if Err = 0 then
'Retrieve the SNA_LU_Lua class
Set ServerClass = WmiNamespace.Get("MsSNA_LuLua")
Set Path = ServerClass.Path_
ServerClass.Security_.impersonationLevel = 3
Set LU3270 = ServerClass.Instances_
Another way you can connect to WMI is by using a moniker. A moniker is essentially a compact version of the above lines of code, and contains the WMI namespace and other connection information.
To connect to WMI using a moniker
Call GetObject with a moniker in the input parameter.
Implement your task.
The following example shows how to connect to WMI using a moniker:
set objService = GetObject("winmgmts:root/microsofthis")