Jak odczytywać właściwości z opóźnieniem przy użyciu usługi WMI

Artykuł
04/04/2023

Aby odczytać właściwość z opóźnieniem z obiektu Configuration Manager zwróconego w zapytaniu, otrzymasz wystąpienie obiektu, które z kolei pobiera wszelkie właściwości obiektu z opóźnieniem od dostawcy programu SMS.

Uwaga

Jeśli znasz pełną ścieżkę do obiektu WMI, wywołanie SWbemServices metody klasy Get zwróci obiekt WMI wraz z dowolnymi właściwościami z opóźnieniem. Aby uzyskać więcej informacji, zobacz Jak odczytać obiekt Configuration Manager przy użyciu usługi WMI.

Aby uzyskać więcej informacji na temat właściwości z opóźnieniem, zobacz Configuration Manager Właściwości z opóźnieniem.

Aby odczytać właściwości z opóźnieniem

Skonfiguruj połączenie z dostawcą programu SMS. Aby uzyskać więcej informacji, zobacz How to Connect to an SMS Provider in Configuration Manager by Using WMI (Jak nawiązać połączenie z dostawcą programu SMS w Configuration Manager przy użyciu usługi WMI).
Używając obiektu SWbemServices, który uzyskujesz z kroku 1, użyj obiektu ExecQuery do wykonywania zapytań Configuration Manager obiektów.
Iteruj wyniki zapytania.
Używając obiektu SWbemServices , który uzyskujesz z kroku 1, wywołaj polecenie Pobierz , aby uzyskać obiekt SWbemObject dla każdego obiektu, z który chcesz uzyskać właściwości z opóźnieniem.

Przykład

Poniższy przykładowy kod VBScript wykonuje zapytania dotyczące wszystkich obiektów SMS_Collection , a następnie wyświetla nazwy reguł uzyskane z CollectionRules właściwości lazy.

Aby uzyskać informacje na temat wywoływania przykładowego kodu, zobacz Wywoływanie fragmentów kodu Configuration Manager.

Sub ReadLazyProperty(connection)  

    Dim collection  
    Dim collections  
    Dim collectionLazy  
    Dim i  

    ' Get all collections.  
    Set collections = _  
        connection.ExecQuery("Select * From SMS_Collection")  

    For Each collection in collections  

        Wscript.Echo Collection.Name   

        ' Get the collection object.  
        Set collectionLazy = connection.Get("SMS_Collection.CollectionID='" + collection.CollectionID + "'")  

        ' Display the rule names that are in the lazy property CollectionRules.  
        If IsNull(collectionLazy.CollectionRules) Then  
            Wscript.Echo "No rules"  
        Else   
            For i = 0 To UBound(collectionLazy.CollectionRules)  
                WScript.Echo "Rule " + collectionLazy.CollectionRules(i).RuleName  
            Next  
       End If       
    Next          

End Sub

Ta przykładowa metoda ma następujące parametry:

Parametr	Wpisać	Opis
`connection`	- `SWbemServices`	Prawidłowe połączenie z dostawcą programu SMS.

Kompilowanie kodu

Zobacz też