Accesso a Host Integration Server usando un provider WMI
Il primo passaggio da eseguire quando si crea un'applicazione WMI o uno script consiste nell'accedere a WMI e impostare la sicurezza per l'applicazione. È possibile eseguire questa azione usando l'oggetto localizzatore SWbemLocator o con un moniker.
Per connettersi a WMI usando SWbemLocator
Recuperare un oggetto localizzatore con una chiamata a CreateObject.
Accedere allo spazio dei nomi con una chiamata a ConnectServer.
Impostare il livello di rappresentazione con una chiamata a Security._ImpersonationLevel.
Implementare l'attività.
L'esempio di codice seguente illustra come connettersi a WMI usando 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_
Un altro modo per connettersi a WMI consiste nell'usare un moniker. Un moniker è essenzialmente una versione compatta delle righe di codice precedenti e contiene lo spazio dei nomi WMI e altre informazioni di connessione.
Per connettersi a WMI usando un moniker
Chiamare GetObject con un moniker nel parametro di input.
Implementare l'attività.
Nell'esempio seguente viene illustrato come connettersi a WMI usando un moniker:
set objService = GetObject("winmgmts:root/microsofthis")