Inicio de sesión en Host Integration Server a través de un proveedor de WMI
El primer paso que debe realizar al crear una aplicación o script WMI es iniciar sesión en WMI y establecer la seguridad de la aplicación. Puede realizar esta acción mediante el objeto localizador SWbemLocator o con un moniker.
Para conectarse a WMI con SWbemLocator
Recupere un objeto de localizador con una llamada a CreateObject.
Inicie sesión en el espacio de nombres con una llamada a ConnectServer.
Establezca el nivel de suplantación con una llamada a Security._ImpersonationLevel.
Implemente la tarea.
En el ejemplo de código siguiente se muestra cómo conectarse a WMI mediante 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_
Otra manera de conectarse a WMI es mediante un moniker. Un moniker es básicamente una versión compacta de las líneas de código anteriores y contiene el espacio de nombres WMI y otra información de conexión.
Para conectarse a WMI mediante un moniker
Llame a GetObject con un moniker en el parámetro de entrada.
Implemente la tarea.
En el ejemplo siguiente se muestra cómo conectarse a WMI mediante un moniker:
set objService = GetObject("winmgmts:root/microsofthis")