Includes&Samples |
MSNdis_VendorID, ROOT\WMI, VBScript samplesClass | Methods | Properties (3) | Qualifiers (7) | Instances (7) | Namespaces (2)Samples: VB Script | C# | VB.Net | Search on:Microsoft MSNdis_VendorID - VB Script code samplesGet instance of WMI class using GetObject, Active property of MSNdis_VendorIDShort VBS code - get a single specified instance of MSNdis_VendorID class or get
a default unnamed instance (singleton) of the class, using one single command GetObject
with exact path of the wmi object.
'https://wutils.com/wmi/ Dim wmiObject Set wmiObject = GetObject( _ "WINMGMTS:\\.\ROOT\WMI:" + _ "MSNdis_VendorID.InstanceName=""WAN Miniport (IP)""") Wscript.Echo wmiObject.Active 'or other property name, see properties Alternative codesSWbemServices.GetQuickest and most efficient VB Script code to get a single instance by a key - SWbemServices.Get
'https://wutils.com/wmi/ Dim oWMI, Instance 'Get base WMI object, "." means computer name (local) Set oWMI = GetObject("WINMGMTS:\\.\ROOT\WMI") Do 'Get the instance of MSNdis_VendorID Set Instance = oWMI.Get("MSNdis_VendorID.InstanceName=""WAN Miniport (IP)""") 'Do something with the instance Wscript.Echo Instance.Active 'or other property name, see properties 'Wait for some time to get next value Wscript.Sleep 1000 Loop While True WMI query - sample windows WQLGet a specified instance of MSNdis_VendorID by a key, get a default unnamed instance (singleton) of the class or list instances of the class by wmi query using this VB Script.
'https://wutils.com/wmi/ Dim oWMI, WQL, Instances, Instance 'Get base WMI object, "." means computer name (local) Set oWMI = GetObject("WINMGMTS:\\.\ROOT\WMI") 'Create a WMI query text WQL = "Select * from MSNdis_VendorID Where InstanceName=""WAN Miniport (IP)""" 'Get instances of MSNdis_VendorID Set Instances = oWMI.ExecQuery(WQL) 'Enumerate instances For Each Instance In Instances 'Do something with the instance Wscript.Echo Instance.Active 'or other property name Next 'Instance InstancesOfList of all instances, wmi class MSNdis_VendorID.
'https://wutils.com/wmi/ Dim oWMI, Instances, Instance 'Get base WMI object, "." means computer name (local) Set oWMI = GetObject("WINMGMTS:\\.\ROOT\WMI") 'Get instances of MSNdis_VendorID - all instances of this class and derived classes 'Set Instances = oWMI.InstancesOf("MSNdis_VendorID") 'Get instances of MSNdis_VendorID Set Instances = oWMI.InstancesOf("MSNdis_VendorID", 1) 'Enumerate instances For Each Instance In Instances 'Do something with the instance Wscript.Echo Instance.Active 'or other property name Next 'Instance WMI remote scripting - Locator, ConnectGet WMI management object using SWbemLocator.ConnectServer method.
You can connect to a remote computer and specify Username/Password for the WMI connection.
'https://wutils.com/wmi/ Dim Locator, oWMI, WQL, Instances, Instance 'Create Locator object Set Locator = CreateObject("WbemScripting.SWbemLocator") 'Get base WMI object Set oWMI = Locator.ConnectServer("MachineName", "ROOT\WMI", "MachineName\administrator", "Password") '.... continue using oWMI object |