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 WMI o un script es iniciar sesión en WMI y establecer la seguridad de la aplicación. Puede realizar esta acción mediante el objeto de localizador SWbemLocator o con un moniker.

Para conectarse a WMI mediante SWbemLocator

  1. Recupera un objeto de localizador con una llamada a CreateObject.

  2. Inicie sesión en el espacio de nombres con una llamada a ConnectServer.

  3. Establezca el nivel de suplantación con una llamada a Security._ImpersonationLevel.

  4. 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

  1. Llame a GetObject con un moniker en el parámetro de entrada.

  2. Implemente la tarea.

    En el ejemplo siguiente se muestra cómo conectarse a WMI mediante un moniker:

set objService = GetObject("winmgmts:root/microsofthis")