' ########################################################################################
' Microsoft Windows
' File: WbemDisp.inc
' Copyright (c) 2011 Jos? Roca
' Portions Copyright (c) Microsoft Corporation.
' All Rights Reserved.
' THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER
' EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF
' MERCHANTABILITY AND/OR FITNESS FOR A PARTICULAR PURPOSE.
' ########################################################################################
' ########################################################################################
' Library name: WbemScripting
' Version: 1.2, Locale ID = 0
' Documentation string: Microsoft WMI Scripting V1.2 Library
' Path: C:\WINDOWS\system32\wbem\wbemdisp.TLB
' Library GUID: {565783C6-CB41-11D1-8B02-00600806D9B6}
' ########################################################################################
#IF NOT %DEF(PBX_WbemDisp_PBI)
#DEFINE PBX_WbemDisp_PBI
%EQUATE `WBEMDISP_INC = 1
'/* header files for imported files */
#INCLUDE ONCE "Legacy/System/WbemCli.inc"
#INCLUDE ONCE "Legacy/System/DispEx.inc"
' ========================================================================================
' ProgIDs (Program identifiers)
' ========================================================================================
' CLSID = {47DFBE54-CF76-11D3-B38F-00105A1F473A}
$PROGID_SWbemDateTime1 = "WbemScripting.SWbemDateTime.1"
' CLSID = {C2FEEEAC-CFCD-11D1-8B05-00600806D9B6}
$PROGID_SWbemLastError1 = "WbemScripting.SWbemLastError.1"
' CLSID = {76A64158-CB41-11D1-8B02-00600806D9B6}
$PROGID_SWbemLocator1 = "WbemScripting.SWbemLocator.1"
' CLSID = {9AED384E-CE8B-11D1-8B05-00600806D9B6}
$PROGID_SWbemNamedValueSet1 = "WbemScripting.SWbemNamedValueSet.1"
' CLSID = {5791BC26-CE9C-11D1-97BF-0000F81E849C}
$PROGID_SWbemObjectPath1 = "WbemScripting.SWbemObjectPath.1"
' CLSID = {D269BF5C-D9C1-11D3-B38F-00105A1F473A}
$PROGID_SWbemRefresher1 = "WbemScripting.SWbemRefresher.1"
' CLSID = {75718C9A-F029-11D1-A1AC-00C04FB6C223}
$PROGID_SWbemSink1 = "WbemScripting.SWbemSink.1"
' ========================================================================================
' Version independent ProgIDs
' ========================================================================================
' CLSID = {47DFBE54-CF76-11D3-B38F-00105A1F473A}
$PROGID_SWbemDateTime = "WbemScripting.SWbemDateTime"
' CLSID = {C2FEEEAC-CFCD-11D1-8B05-00600806D9B6}
$PROGID_SWbemLastError = "WbemScripting.SWbemLastError"
' CLSID = {76A64158-CB41-11D1-8B02-00600806D9B6}
$PROGID_SWbemLocator = "WbemScripting.SWbemLocator"
' CLSID = {9AED384E-CE8B-11D1-8B05-00600806D9B6}
$PROGID_SWbemNamedValueSet = "WbemScripting.SWbemNamedValueSet"
' CLSID = {5791BC26-CE9C-11D1-97BF-0000F81E849C}
$PROGID_SWbemObjectPath = "WbemScripting.SWbemObjectPath"
' CLSID = {D269BF5C-D9C1-11D3-B38F-00105A1F473A}
$PROGID_SWbemRefresher = "WbemScripting.SWbemRefresher"
' CLSID = {75718C9A-F029-11D1-A1AC-00C04FB6C223}
$PROGID_SWbemSink = "WbemScripting.SWbemSink"
' ========================================================================================
' ClsIDs (Class identifiers)
' ========================================================================================
$CLSID_SWbemEventSource = GUID$("{04B83D58-21AE-11D2-8B33-00600806D9B6}")
$CLSID_SWbemMethod = GUID$("{04B83D5B-21AE-11D2-8B33-00600806D9B6}")
$CLSID_SWbemMethodSet = GUID$("{04B83D5A-21AE-11D2-8B33-00600806D9B6}")
$CLSID_SWbemNamedValue = GUID$("{04B83D60-21AE-11D2-8B33-00600806D9B6}")
$CLSID_SWbemObject = GUID$("{04B83D62-21AE-11D2-8B33-00600806D9B6}")
$CLSID_SWbemObjectEx = GUID$("{D6BDAFB2-9435-491F-BB87-6AA0F0BC31A2}")
$CLSID_SWbemObjectSet = GUID$("{04B83D61-21AE-11D2-8B33-00600806D9B6}")
$CLSID_SWbemPrivilege = GUID$("{26EE67BC-5804-11D2-8B4A-00600806D9B6}")
$CLSID_SWbemPrivilegeSet = GUID$("{26EE67BE-5804-11D2-8B4A-00600806D9B6}")
$CLSID_SWbemProperty = GUID$("{04B83D5D-21AE-11D2-8B33-00600806D9B6}")
$CLSID_SWbemPropertySet = GUID$("{04B83D5C-21AE-11D2-8B33-00600806D9B6}")
$CLSID_SWbemQualifier = GUID$("{04B83D5F-21AE-11D2-8B33-00600806D9B6}")
$CLSID_SWbemQualifierSet = GUID$("{04B83D5E-21AE-11D2-8B33-00600806D9B6}")
$CLSID_SWbemRefreshableItem = GUID$("{8C6854BC-DE4B-11D3-B390-00105A1F473A}")
$CLSID_SWbemSecurity = GUID$("{B54D66E9-2287-11D2-8B33-00600806D9B6}")
$CLSID_SWbemServices = GUID$("{04B83D63-21AE-11D2-8B33-00600806D9B6}")
$CLSID_SWbemServicesEx = GUID$("{62E522DC-8CF3-40A8-8B2E-37D595651E40}")
$CLSID_SWbemDateTime = GUID$("{47DFBE54-CF76-11D3-B38F-00105A1F473A}")
$CLSID_SWbemLastError = GUID$("{C2FEEEAC-CFCD-11D1-8B05-00600806D9B6}")
$CLSID_SWbemLocator = GUID$("{76A64158-CB41-11D1-8B02-00600806D9B6}")
$CLSID_SWbemNamedValueSet = GUID$("{9AED384E-CE8B-11D1-8B05-00600806D9B6}")
$CLSID_SWbemObjectPath = GUID$("{5791BC26-CE9C-11D1-97BF-0000F81E849C}")
$CLSID_SWbemRefresher = GUID$("{D269BF5C-D9C1-11D3-B38F-00105A1F473A}")
$CLSID_SWbemSink = GUID$("{75718C9A-F029-11D1-A1AC-00C04FB6C223}")
' ========================================================================================
' IIDs (Interface identifiers)
' ========================================================================================
$IID_ISWbemDateTime = GUID$("{5E97458A-CF77-11D3-B38F-00105A1F473A}")
$IID_ISWbemEventSource = GUID$("{27D54D92-0EBE-11D2-8B22-00600806D9B6}")
$IID_ISWbemLastError = GUID$("{D962DB84-D4BB-11D1-8B09-00600806D9B6}")
$IID_ISWbemLocator = GUID$("{76A6415B-CB41-11D1-8B02-00600806D9B6}")
$IID_ISWbemMethod = GUID$("{422E8E90-D955-11D1-8B09-00600806D9B6}")
$IID_ISWbemMethodSet = GUID$("{C93BA292-D955-11D1-8B09-00600806D9B6}")
$IID_ISWbemNamedValue = GUID$("{76A64164-CB41-11D1-8B02-00600806D9B6}")
$IID_ISWbemNamedValueSet = GUID$("{CF2376EA-CE8C-11D1-8B05-00600806D9B6}")
$IID_ISWbemObject = GUID$("{76A6415A-CB41-11D1-8B02-00600806D9B6}")
$IID_ISWbemObjectEx = GUID$("{269AD56A-8A67-4129-BC8C-0506DCFE9880}")
$IID_ISWbemObjectPath = GUID$("{5791BC27-CE9C-11D1-97BF-0000F81E849C}")
$IID_ISWbemObjectSet = GUID$("{76A6415F-CB41-11D1-8B02-00600806D9B6}")
$IID_ISWbemPrivilege = GUID$("{26EE67BD-5804-11D2-8B4A-00600806D9B6}")
$IID_ISWbemPrivilegeSet = GUID$("{26EE67BF-5804-11D2-8B4A-00600806D9B6}")
$IID_ISWbemProperty = GUID$("{1A388F98-D4BA-11D1-8B09-00600806D9B6}")
$IID_ISWbemPropertySet = GUID$("{DEA0A7B2-D4BA-11D1-8B09-00600806D9B6}")
$IID_ISWbemQualifier = GUID$("{79B05932-D3B7-11D1-8B06-00600806D9B6}")
$IID_ISWbemQualifierSet = GUID$("{9B16ED16-D3DF-11D1-8B08-00600806D9B6}")
$IID_ISWbemRefreshableItem = GUID$("{5AD4BF92-DAAB-11D3-B38F-00105A1F473A}")
$IID_ISWbemRefresher = GUID$("{14D8250E-D9C2-11D3-B38F-00105A1F473A}")
$IID_ISWbemSecurity = GUID$("{B54D66E6-2287-11D2-8B33-00600806D9B6}")
$IID_ISWbemServices = GUID$("{76A6415C-CB41-11D1-8B02-00600806D9B6}")
$IID_ISWbemServicesEx = GUID$("{D2F68443-85DC-427E-91D8-366554CC754C}")
$IID_ISWbemSink = GUID$("{75718C9F-F029-11D1-A1AC-00C04FB6C223}")
$IID_ISWbemSinkEvents = GUID$("{75718CA0-F029-11D1-A1AC-00C04FB6C223}")
%EQUATE `WBEMS_DISPID_OBJECT_READY = 1
%EQUATE `WBEMS_DISPID_COMPLETED = 2
%EQUATE `WBEMS_DISPID_PROGRESS = 3
%EQUATE `WBEMS_DISPID_OBJECT_PUT = 4
%EQUATE `WBEMS_DISPID_CONNECTION_READY = 5
' ========================================================================================
' WbemChangeFlagEnum enum
' IID: {4A249B72-FC9A-11D1-8B1E-00600806D9B6}
' Defines semantics of putting a Class or Instance
' ========================================================================================
%EQUATE `wbemChangeFlagCreateOrUpdate = 0
%EQUATE `wbemChangeFlagUpdateOnly = &H1
%EQUATE `wbemChangeFlagCreateOnly = &H2
%EQUATE `wbemChangeFlagUpdateCompatible = &H0
%EQUATE `wbemChangeFlagUpdateSafeMode = &H20
%EQUATE `wbemChangeFlagUpdateForceMode = &H40
%EQUATE `wbemChangeFlagStrongValidation = &H80
%EQUATE `wbemChangeFlagAdvisory = &H10000
' ========================================================================================
' WbemFlagEnum enum
' IID: {4A249B73-FC9A-11D1-8B1E-00600806D9B6}
' Defines behavior of various interface calls
' ========================================================================================
%EQUATE `wbemFlagReturnImmediately = &H10
%EQUATE `wbemFlagReturnWhenComplete = 0
%EQUATE `wbemFlagBidirectional = 0
%EQUATE `wbemFlagForwardOnly = &H20
%EQUATE `wbemFlagNoErrorObject = &H40
%EQUATE `wbemFlagReturnErrorObject = 0
%EQUATE `wbemFlagSendStatus = &H80
%EQUATE `wbemFlagDontSendStatus = 0
%EQUATE `wbemFlagEnsureLocatable = &H100
%EQUATE `wbemFlagDirectRead = &H200
%EQUATE `wbemFlagSendOnlySelected = 0
%EQUATE `wbemFlagUseAmendedQualifiers = &H20000
%EQUATE `wbemFlagGetDefault = 0
%EQUATE `wbemFlagSpawnInstance = &H1
%EQUATE `wbemFlagUseCurrentTime = &H1
' ========================================================================================
' WbemQueryFlagEnum enum
' IID: {4A249B76-FC9A-11D1-8B1E-00600806D9B6}
' Defines depth of enumeration or query
' ========================================================================================
%EQUATE `wbemQueryFlagDeep = 0
%EQUATE `wbemQueryFlagShallow = 1
%EQUATE `wbemQueryFlagPrototype = 2
' ========================================================================================
' WbemTextFlagEnum enum
' IID: {4A249B78-FC9A-11D1-8B1E-00600806D9B6}
' Defines content of generated object text
' ========================================================================================
%EQUATE `wbemTextFlagNoFlavors = &H1
' ========================================================================================
' WbemTimeout enum
' IID: {BF078C2A-07D9-11D2-8B21-00600806D9B6}
' Defines timeout constants
' ========================================================================================
%EQUATE `wbemTimeoutInfinite = &HFFFFFFFF
' ========================================================================================
' WbemComparisonFlagEnum enum
' IID: {4A249B79-FC9A-11D1-8B1E-00600806D9B6}
' Defines settings for object comparison
' ========================================================================================
%EQUATE `wbemComparisonFlagIncludeAll = 0
%EQUATE `wbemComparisonFlagIgnoreQualifiers = &H1
%EQUATE `wbemComparisonFlagIgnoreObjectSource = &H2
%EQUATE `wbemComparisonFlagIgnoreDefaultValues = &H4
%EQUATE `wbemComparisonFlagIgnoreClass = &H8
%EQUATE `wbemComparisonFlagIgnoreCase = &H10
%EQUATE `wbemComparisonFlagIgnoreFlavor = &H20
' ========================================================================================
' WbemCimtypeEnum enum
' IID: {4A249B7B-FC9A-11D1-8B1E-00600806D9B6}
' Defines the valid CIM Types of a Property value
' ========================================================================================
%EQUATE `wbemCimtypeSint8 = 16
%EQUATE `wbemCimtypeUint8 = 17
%EQUATE `wbemCimtypeSint16 = 2
%EQUATE `wbemCimtypeUint16 = 18
%EQUATE `wbemCimtypeSint32 = 3
%EQUATE `wbemCimtypeUint32 = 19
%EQUATE `wbemCimtypeSint64 = 20
%EQUATE `wbemCimtypeUint64 = 21
%EQUATE `wbemCimtypeReal32 = 4
%EQUATE `wbemCimtypeReal64 = 5
%EQUATE `wbemCimtypeBoolean = 11
%EQUATE `wbemCimtypeString = 8
%EQUATE `wbemCimtypeDatetime = 101
%EQUATE `wbemCimtypeReference = 102
%EQUATE `wbemCimtypeChar16 = 103
%EQUATE `wbemCimtypeObject = 13
' ========================================================================================
' WbemErrorEnum enum
' IID: {4A249B7C-FC9A-11D1-8B1E-00600806D9B6}
' Defines the errors that may be returned by the WBEM Scripting library
' ========================================================================================
%EQUATE `wbemNoErr = 0&
%EQUATE `wbemErrFailed = &H80041001&
%EQUATE `wbemErrNotFound = &H80041002&
%EQUATE `wbemErrAccessDenied = &H80041003&
%EQUATE `wbemErrProviderFailure = &H80041004&
%EQUATE `wbemErrTypeMismatch = &H80041005&
%EQUATE `wbemErrOutOfMemory = &H80041006&
%EQUATE `wbemErrInvalidContext = &H80041007&
%EQUATE `wbemErrInvalidParameter = &H80041008&
%EQUATE `wbemErrNotAvailable = &H80041009&
%EQUATE `wbemErrCriticalError = &H8004100A&
%EQUATE `wbemErrInvalidStream = &H8004100B&
%EQUATE `wbemErrNotSupported = &H8004100C&
%EQUATE `wbemErrInvalidSuperclass = &H8004100D&
%EQUATE `wbemErrInvalidNamespace = &H8004100E&
%EQUATE `wbemErrInvalidObject = &H8004100F&
%EQUATE `wbemErrInvalidClass = &H80041010&
%EQUATE `wbemErrProviderNotFound = &H80041011&
%EQUATE `wbemErrInvalidProviderRegistration = &H80041012&
%EQUATE `wbemErrProviderLoadFailure = &H80041013&
%EQUATE `wbemErrInitializationFailure = &H80041014&
%EQUATE `wbemErrTransportFailure = &H80041015&
%EQUATE `wbemErrInvalidOperation = &H80041016&
%EQUATE `wbemErrInvalidQuery = &H80041017&
%EQUATE `wbemErrInvalidQueryType = &H80041018&
%EQUATE `wbemErrAlreadyExists = &H80041019&
%EQUATE `wbemErrOverrideNotAllowed = &H8004101A&
%EQUATE `wbemErrPropagatedQualifier = &H8004101B&
%EQUATE `wbemErrPropagatedProperty = &H8004101C&
%EQUATE `wbemErrUnexpected = &H8004101D&
%EQUATE `wbemErrIllegalOperation = &H8004101E&
%EQUATE `wbemErrCannotBeKey = &H8004101F&
%EQUATE `wbemErrIncompleteClass = &H80041020&
%EQUATE `wbemErrInvalidSyntax = &H80041021&
%EQUATE `wbemErrNondecoratedObject = &H80041022&
%EQUATE `wbemErrReadOnly = &H80041023&
%EQUATE `wbemErrProviderNotCapable = &H80041024&
%EQUATE `wbemErrClassHasChildren = &H80041025&
%EQUATE `wbemErrClassHasInstances = &H80041026&
%EQUATE `wbemErrQueryNotImplemented = &H80041027&
%EQUATE `wbemErrIllegalNull = &H80041028&
%EQUATE `wbemErrInvalidQualifierType = &H80041029&
%EQUATE `wbemErrInvalidPropertyType = &H8004102A&
%EQUATE `wbemErrValueOutOfRange = &H8004102B&
%EQUATE `wbemErrCannotBeSingleton = &H8004102C&
%EQUATE `wbemErrInvalidCimType = &H8004102D&
%EQUATE `wbemErrInvalidMethod = &H8004102E&
%EQUATE `wbemErrInvalidMethodParameters = &H8004102F&
%EQUATE `wbemErrSystemProperty = &H80041030&
%EQUATE `wbemErrInvalidProperty = &H80041031&
%EQUATE `wbemErrCallCancelled = &H80041032&
%EQUATE `wbemErrShuttingDown = &H80041033&
%EQUATE `wbemErrPropagatedMethod = &H80041034&
%EQUATE `wbemErrUnsupportedParameter = &H80041035&
%EQUATE `wbemErrMissingParameter = &H80041036&
%EQUATE `wbemErrInvalidParameterId = &H80041037&
%EQUATE `wbemErrNonConsecutiveParameterIds = &H80041038&
%EQUATE `wbemErrParameterIdOnRetval = &H80041039&
%EQUATE `wbemErrInvalidObjectPath = &H8004103A&
%EQUATE `wbemErrOutOfDiskSpace = &H8004103B&
%EQUATE `wbemErrBufferTooSmall = &H8004103C&
%EQUATE `wbemErrUnsupportedPutExtension = &H8004103D&
%EQUATE `wbemErrUnknownObjectType = &H8004103E&
%EQUATE `wbemErrUnknownPacketType = &H8004103F&
%EQUATE `wbemErrMarshalVersionMismatch = &H80041040&
%EQUATE `wbemErrMarshalInvalidSignature = &H80041041&
%EQUATE `wbemErrInvalidQualifier = &H80041042&
%EQUATE `wbemErrInvalidDuplicateParameter = &H80041043&
%EQUATE `wbemErrTooMuchData = &H80041044&
%EQUATE `wbemErrServerTooBusy = &H80041045&
%EQUATE `wbemErrInvalidFlavor = &H80041046&
%EQUATE `wbemErrCircularReference = &H80041047&
%EQUATE `wbemErrUnsupportedClassUpdate = &H80041048&
%EQUATE `wbemErrCannotChangeKeyInheritance = &H80041049&
%EQUATE `wbemErrCannotChangeIndexInheritance = &H80041050&
%EQUATE `wbemErrTooManyProperties = &H80041051&
%EQUATE `wbemErrUpdateTypeMismatch = &H80041052&
%EQUATE `wbemErrUpdateOverrideNotAllowed = &H80041053&
%EQUATE `wbemErrUpdatePropagatedMethod = &H80041054&
%EQUATE `wbemErrMethodNotImplemented = &H80041055&
%EQUATE `wbemErrMethodDisabled = &H80041056&
%EQUATE `wbemErrRefresherBusy = &H80041057&
%EQUATE `wbemErrUnparsableQuery = &H80041058&
%EQUATE `wbemErrNotEventClass = &H80041059&
%EQUATE `wbemErrMissingGroupWithin = &H8004105A&
%EQUATE `wbemErrMissingAggregationList = &H8004105B&
%EQUATE `wbemErrPropertyNotAnObject = &H8004105C&
%EQUATE `wbemErrAggregatingByObject = &H8004105D&
%EQUATE `wbemErrUninterpretableProviderQuery = &H8004105F&
%EQUATE `wbemErrBackupRestoreWinmgmtRunning = &H80041060&
%EQUATE `wbemErrQueueOverflow = &H80041061&
%EQUATE `wbemErrPrivilegeNotHeld = &H80041062&
%EQUATE `wbemErrInvalidOperator = &H80041063&
%EQUATE `wbemErrLocalCredentials = &H80041064&
%EQUATE `wbemErrCannotBeAbstract = &H80041065&
%EQUATE `wbemErrAmendedObject = &H80041066&
%EQUATE `wbemErrClientTooSlow = &H80041067&
%EQUATE `wbemErrNullSecurityDescriptor = &H80041068&
%EQUATE `wbemErrTimeout = &H80041069&
%EQUATE `wbemErrInvalidAssociation = &H8004106A&
%EQUATE `wbemErrAmbiguousOperation = &H8004106B&
%EQUATE `wbemErrQuotaViolation = &H8004106C&
%EQUATE `wbemErrTransactionConflict = &H8004106D&
%EQUATE `wbemErrForcedRollback = &H8004106E&
%EQUATE `wbemErrUnsupportedLocale = &H8004106F&
%EQUATE `wbemErrHandleOutOfDate = &H80041070&
%EQUATE `wbemErrConnectionFailed = &H80041071&
%EQUATE `wbemErrInvalidHandleRequest = &H80041072&
%EQUATE `wbemErrPropertyNameTooWide = &H80041073&
%EQUATE `wbemErrClassNameTooWide = &H80041074&
%EQUATE `wbemErrMethodNameTooWide = &H80041075&
%EQUATE `wbemErrQualifierNameTooWide = &H80041076&
%EQUATE `wbemErrRerunCommand = &H80041077&
%EQUATE `wbemErrDatabaseVerMismatch = &H80041078&
%EQUATE `wbemErrVetoPut = &H80041079&
%EQUATE `wbemErrVetoDelete = &H8004107A&
%EQUATE `wbemErrInvalidLocale = &H80041080&
%EQUATE `wbemErrProviderSuspended = &H80041081&
%EQUATE `wbemErrSynchronizationRequired = &H80041082&
%EQUATE `wbemErrNoSchema = &H80041083&
%EQUATE `wbemErrProviderAlreadyRegistered = &H80041084&
%EQUATE `wbemErrProviderNotRegistered = &H80041085&
%EQUATE `wbemErrFatalTransportError = &H80041086&
%EQUATE `wbemErrEncryptedConnectionRequired = &H80041087&
%EQUATE `wbemErrRegistrationTooBroad = &H80042001&
%EQUATE `wbemErrRegistrationTooPrecise = &H80042002&
%EQUATE `wbemErrTimedout = &H80043001&
%EQUATE `wbemErrResetToDefault = &H80043002&
' ========================================================================================
' WbemAuthenticationLevelEnum enum
' IID: {B54D66E7-2287-11D2-8B33-00600806D9B6}
' Defines the security authentication level
' ========================================================================================
%EQUATE `wbemAuthenticationLevelDefault = 0
%EQUATE `wbemAuthenticationLevelNone = 1
%EQUATE `wbemAuthenticationLevelConnect = 2
%EQUATE `wbemAuthenticationLevelCall = 3
%EQUATE `wbemAuthenticationLevelPkt = 4
%EQUATE `wbemAuthenticationLevelPktIntegrity = 5
%EQUATE `wbemAuthenticationLevelPktPrivacy = 6
' ========================================================================================
' WbemImpersonationLevelEnum enum
' IID: {B54D66E8-2287-11D2-8B33-00600806D9B6}
' Defines the security impersonation level
' ========================================================================================
%EQUATE `wbemImpersonationLevelAnonymous = 1
%EQUATE `wbemImpersonationLevelIdentify = 2
%EQUATE `wbemImpersonationLevelImpersonate = 3
%EQUATE `wbemImpersonationLevelDelegate = 4
' ========================================================================================
' WbemPrivilegeEnum enum
' IID: {176D2F70-5AF3-11D2-8B4A-00600806D9B6}
' Defines a privilege
' ========================================================================================
%EQUATE `wbemPrivilegeCreateToken = 1
%EQUATE `wbemPrivilegePrimaryToken = 2
%EQUATE `wbemPrivilegeLockMemory = 3
%EQUATE `wbemPrivilegeIncreaseQuota = 4
%EQUATE `wbemPrivilegeMachineAccount = 5
%EQUATE `wbemPrivilegeTcb = 6
%EQUATE `wbemPrivilegeSecurity = 7
%EQUATE `wbemPrivilegeTakeOwnership = 8
%EQUATE `wbemPrivilegeLoadDriver = 9
%EQUATE `wbemPrivilegeSystemProfile = 10
%EQUATE `wbemPrivilegeSystemtime = 11
%EQUATE `wbemPrivilegeProfileSingleProcess = 12
%EQUATE `wbemPrivilegeIncreaseBasePriority = 13
%EQUATE `wbemPrivilegeCreatePagefile = 14
%EQUATE `wbemPrivilegeCreatePermanent = 15
%EQUATE `wbemPrivilegeBackup = 16
%EQUATE `wbemPrivilegeRestore = 17
%EQUATE `wbemPrivilegeShutdown = 18
%EQUATE `wbemPrivilegeDebug = 19
%EQUATE `wbemPrivilegeAudit = 20
%EQUATE `wbemPrivilegeSystemEnvironment = 21
%EQUATE `wbemPrivilegeChangeNotify = 22
%EQUATE `wbemPrivilegeRemoteShutdown = 23
%EQUATE `wbemPrivilegeUndock = 24
%EQUATE `wbemPrivilegeSyncAgent = 25
%EQUATE `wbemPrivilegeEnableDelegation = 26
%EQUATE `wbemPrivilegeManageVolume = 27
' ========================================================================================
' WbemObjectTextFormatEnum enum
' IID: {09FF1992-EA0E-11D3-B391-00105A1F473A}
' Defines object text formats
' ========================================================================================
%EQUATE `wbemObjectTextFormatCIMDTD20 = 1
%EQUATE `wbemObjectTextFormatWMIDTD20 = 2
' ========================================================================================
' WbemConnectOptionsEnum enum
' Used to define connection behavior
' ========================================================================================
%EQUATE `wbemConnectFlagUseMaxWait = &H80
' ########################################################################################
' Interface name = ISWbemServices
' IID = {76A6415C-CB41-11D1-8B02-00600806D9B6}
' Attributes = 4176 [&H1050] [Hidden] [Dual] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemServices_INTERFACE_DEFINED)
 %ISWbemServices_INTERFACE_DEFINED = 1
INTERFACE ISWbemServices $IID_ISWbemServices
 INHERIT IDispatch
 ' =====================================================================================
 METHOD Get <1> ( ' VTable offset = 28
 OPTIONAL BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD GetAsync <2> ( ' VTable offset = 32
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Delete <3> ( ' VTable offset = 36
 BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD DeleteAsync <4> ( ' VTable offset = 40
 BYVAL objWbemSink AS IDispatch
 , BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD InstancesOf <5> ( ' VTable offset = 44
 BYVAL strClass AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD InstancesOfAsync <6> ( ' VTable offset = 48
 BYVAL objWbemSink AS IDispatch
 , BYVAL strClass AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD SubclassesOf <7> ( ' VTable offset = 52
 OPTIONAL BYVAL strSuperclass AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD SubclassesOfAsync <8> ( ' VTable offset = 56
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL strSuperclass AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD ExecQuery <9> ( ' VTable offset = 60
 BYVAL strQuery AS WSTRING
 , OPTIONAL BYVAL strQueryLanguage AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD ExecQueryAsync <10> ( ' VTable offset = 64
 BYVAL objWbemSink AS IDispatch
 , BYVAL strQuery AS WSTRING
 , OPTIONAL BYVAL strQueryLanguage AS WSTRING
 , OPTIONAL BYVAL lFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD AssociatorsOf <11> ( ' VTable offset = 68
 BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL strAssocClass AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strResultRole AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredAssocQualifier AS WSTRING
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD AssociatorsOfAsync <12> ( ' VTable offset = 72
 BYVAL objWbemSink AS IDispatch
 , BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL strAssocClass AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strResultRole AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredAssocQualifier AS WSTRING
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD ReferencesTo <13> ( ' VTable offset = 76
 BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD ReferencesToAsync <14> ( ' VTable offset = 80
 BYVAL objWbemSink AS IDispatch
 , BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD ExecNotificationQuery <15> ( ' VTable offset = 84
 BYVAL strQuery AS WSTRING
 , OPTIONAL BYVAL strQueryLanguage AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemEventSource
 ' =====================================================================================
 METHOD ExecNotificationQueryAsync <16> ( ' VTable offset = 88
 BYVAL objWbemSink AS IDispatch
 , BYVAL strQuery AS WSTRING
 , OPTIONAL BYVAL strQueryLanguage AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD ExecMethod <17> ( ' VTable offset = 92
 BYVAL strObjectPath AS WSTRING
 , BYVAL strMethodName AS WSTRING
 , OPTIONAL BYVAL objWbemInParameters AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD ExecMethodAsync <18> ( ' VTable offset = 96
 BYVAL objWbemSink AS IDispatch
 , BYVAL strObjectPath AS WSTRING
 , BYVAL strMethodName AS WSTRING
 , OPTIONAL BYVAL objWbemInParameters AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 PROPERTY GET Security_ <19> ( ' VTable offset = 100
 ) AS ISWbemSecurity
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemServices_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemLocator
' IID = {76A6415B-CB41-11D1-8B02-00600806D9B6}
' Attributes = 4176 [&H1050] [Hidden] [Dual] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemLocator_INTERFACE_DEFINED)
 %ISWbemLocator_INTERFACE_DEFINED = 1
INTERFACE ISWbemLocator $IID_ISWbemLocator
 INHERIT IDispatch
 ' =====================================================================================
 METHOD ConnectServer <1> ( ' VTable offset = 28
 OPTIONAL BYVAL strServer AS WSTRING
 , OPTIONAL BYVAL strNamespace AS WSTRING
 , OPTIONAL BYVAL strUser AS WSTRING
 , OPTIONAL BYVAL strPassword AS WSTRING
 , OPTIONAL BYVAL strLocale AS WSTRING
 , OPTIONAL BYVAL strAuthority AS WSTRING
 , OPTIONAL BYVAL iSecurityFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemServices
 ' =====================================================================================
 PROPERTY GET Security_ <2> ( ' VTable offset = 32
 ) AS ISWbemSecurity
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemLocator_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemObject
' IID = {76A6415A-CB41-11D1-8B02-00600806D9B6}
' Attributes = 4176 [&H1050] [Hidden] [Dual] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemObject_INTERFACE_DEFINED)
 %ISWbemObject_INTERFACE_DEFINED = 1
%EQUATE `WBEMS_DISPID_DERIVATION = 23
INTERFACE ISWbemObject $IID_ISWbemObject
 INHERIT IDispatch
 ' =====================================================================================
 METHOD Put_ <1> ( ' VTable offset = 28
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectPath
 ' =====================================================================================
 METHOD PutAsync_ <2> ( ' VTable offset = 32
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Delete_ <3> ( ' VTable offset = 36
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD DeleteAsync_ <4> ( ' VTable offset = 40
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Instances_ <5> ( ' VTable offset = 44
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD InstancesAsync_ <6> ( ' VTable offset = 48
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Subclasses_ <7> ( ' VTable offset = 52
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD SubclassesAsync_ <8> ( ' VTable offset = 56
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Associators_ <9> ( ' VTable offset = 60
 OPTIONAL BYVAL strAssocClass AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strResultRole AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredAssocQualifier AS WSTRING
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD AssociatorsAsync_ <10> ( ' VTable offset = 64
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL strAssocClass AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strResultRole AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredAssocQualifier AS WSTRING
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD References_ <11> ( ' VTable offset = 68
 OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD ReferencesAsync_ <12> ( ' VTable offset = 72
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD ExecMethod_ <13> ( ' VTable offset = 76
 BYVAL strMethodName AS WSTRING
 , OPTIONAL BYVAL objWbemInParameters AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD ExecMethodAsync_ <14> ( ' VTable offset = 80
 BYVAL objWbemSink AS IDispatch
 , BYVAL strMethodName AS WSTRING
 , OPTIONAL BYVAL objWbemInParameters AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Clone_ <15> ( ' VTable offset = 84
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD GetObjectText_ <16> ( ' VTable offset = 88
 OPTIONAL BYVAL iFlags AS LONG
 ) AS WSTRING
 ' =====================================================================================
 METHOD SpawnDerivedClass_ <17> ( ' VTable offset = 92
 OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD SpawnInstance_ <18> ( ' VTable offset = 96
 OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD CompareTo_ <19> ( ' VTable offset = 100
 BYVAL objWbemObject AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY GET Qualifiers_ <20> ( ' VTable offset = 104
 ) AS ISWbemQualifierSet
 ' =====================================================================================
 PROPERTY GET Properties_ <21> ( ' VTable offset = 108
 ) AS ISWbemPropertySet
 ' =====================================================================================
 PROPERTY GET Methods_ <22> ( ' VTable offset = 112
 ) AS ISWbemMethodSet
 ' =====================================================================================
 PROPERTY GET Derivation_ <23> ( ' VTable offset = 116
 ) AS VARIANT
 ' =====================================================================================
 PROPERTY GET Path_ <24> ( ' VTable offset = 120
 ) AS ISWbemObjectPath
 ' =====================================================================================
 PROPERTY GET Security_ <25> ( ' VTable offset = 124
 ) AS ISWbemSecurity
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemObject_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemObjectSet
' IID = {76A6415F-CB41-11D1-8B02-00600806D9B6}
' A collection of Classes or Instances
' Attributes = 4304 [&H10D0] [Hidden] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemObjectSet_INTERFACE_DEFINED)
 %ISWbemObjectSet_INTERFACE_DEFINED = 1
INTERFACE ISWbemObjectSet $IID_ISWbemObjectSet
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET NewEnum_ <-4> ( ' VTable offset = 28
 ) AS IUnknown
 ' =====================================================================================
 METHOD Item <0> ( ' VTable offset = 32
 BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemObject
 ' =====================================================================================
 PROPERTY GET Count <1> ( ' VTable offset = 36
 ) AS LONG
 ' =====================================================================================
 PROPERTY GET Security_ <4> ( ' VTable offset = 40
 ) AS ISWbemSecurity
 ' =====================================================================================
 METHOD ItemIndex <5> ( ' VTable offset = 44
 BYVAL iFlags AS LONG
 ) AS ISWbemObject
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemObjectSet_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemNamedValue
' IID = {76A64164-CB41-11D1-8B02-00600806D9B6}
' Attributes = 4176 [&H1050] [Hidden] [Dual] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemNamedValue_INTERFACE_DEFINED)
 %ISWbemNamedValue_INTERFACE_DEFINED = 1
INTERFACE ISWbemNamedValue $IID_ISWbemNamedValue
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET Value <0> ( ' VTable offset = 28
 ) AS VARIANT
 ' =====================================================================================
 PROPERTY SET Value <0> ( ' VTable offset = 32
 BYREF IN varValue AS VARIANT
 ) ' void
 ' =====================================================================================
 PROPERTY GET Name <2> ( ' VTable offset = 36
 ) AS WSTRING
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemNamedValue_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemNamedValueSet
' IID = {CF2376EA-CE8C-11D1-8B05-00600806D9B6}
' Attributes = 4176 [&H1050] [Hidden] [Dual] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemNamedValueSet_INTERFACE_DEFINED)
 %ISWbemNamedValueSet_INTERFACE_DEFINED = 1
INTERFACE ISWbemNamedValueSet $IID_ISWbemNamedValueSet
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET NewEnum_ <-4> ( ' VTable offset = 28
 ) AS IUnknown
 ' =====================================================================================
 METHOD Item <0> ( ' VTable offset = 32
 BYVAL strName AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemNamedValue
 ' =====================================================================================
 PROPERTY GET Count <1> ( ' VTable offset = 36
 ) AS LONG
 ' =====================================================================================
 METHOD Add <2> ( ' VTable offset = 40
 BYVAL strName AS WSTRING
 , BYREF varValue AS VARIANT
 , OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemNamedValue
 ' =====================================================================================
 METHOD Remove <3> ( ' VTable offset = 44
 BYVAL strName AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 ) ' void
 ' =====================================================================================
 METHOD Clone <4> ( ' VTable offset = 48
 ) AS ISWbemNamedValueSet
 ' =====================================================================================
 METHOD DeleteAll <5> ( ' VTable offset = 52
 ) ' void
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemNamedValueSet_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemQualifier
' IID = {79B05932-D3B7-11D1-8B06-00600806D9B6}
' Attributes = 4304 [&H10D0] [Hidden] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemQualifier_INTERFACE_DEFINED)
 %ISWbemQualifier_INTERFACE_DEFINED = 1
INTERFACE ISWbemQualifier $IID_ISWbemQualifier
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET Value <0> ( ' VTable offset = 28
 ) AS VARIANT
 ' =====================================================================================
 PROPERTY SET Value <0> ( ' VTable offset = 32
 BYREF IN varValue AS VARIANT
 ) ' void
 ' =====================================================================================
 PROPERTY GET Name <1> ( ' VTable offset = 36
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY GET IsLocal <2> ( ' VTable offset = 40
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY GET PropagatesToSubclass <3> ( ' VTable offset = 44
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET PropagatesToSubclass <3> ( ' VTable offset = 48
 BYVAL bPropagatesToSubclass AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET PropagatesToInstance <4> ( ' VTable offset = 52
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET PropagatesToInstance <4> ( ' VTable offset = 56
 BYVAL bPropagatesToInstance AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET IsOverridable <5> ( ' VTable offset = 60
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET IsOverridable <5> ( ' VTable offset = 64
 BYVAL bIsOverridable AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET IsAmended <6> ( ' VTable offset = 68
 ) AS INTEGER
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemQualifier_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemQualifierSet
' IID = {9B16ED16-D3DF-11D1-8B08-00600806D9B6}
' A collection of Qualifiers
' Attributes = 4304 [&H10D0] [Hidden] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemQualifierSet_INTERFACE_DEFINED)
 %ISWbemQualifierSet_INTERFACE_DEFINED = 1
INTERFACE ISWbemQualifierSet $IID_ISWbemQualifierSet
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET NewEnum_ <-4> ( ' VTable offset = 28
 ) AS IUnknown
 ' =====================================================================================
 METHOD Item <0> ( ' VTable offset = 32
 BYVAL name AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemQualifier
 ' =====================================================================================
 PROPERTY GET Count <1> ( ' VTable offset = 36
 ) AS LONG
 ' =====================================================================================
 METHOD Add <2> ( ' VTable offset = 40
 BYVAL strName AS WSTRING
 , BYREF varVal AS VARIANT
 , OPTIONAL BYVAL bPropagatesToSubclass AS INTEGER
 , OPTIONAL BYVAL bPropagatesToInstance AS INTEGER
 , OPTIONAL BYVAL bIsOverridable AS INTEGER
 , OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemQualifier
 ' =====================================================================================
 METHOD Remove <3> ( ' VTable offset = 44
 BYVAL strName AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 ) ' void
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemQualifierSet_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemProperty
' IID = {1A388F98-D4BA-11D1-8B09-00600806D9B6}
' Attributes = 4176 [&H1050] [Hidden] [Dual] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemProperty_INTERFACE_DEFINED)
 %ISWbemProperty_INTERFACE_DEFINED = 1
INTERFACE ISWbemProperty $IID_ISWbemProperty
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET Value <0> ( ' VTable offset = 28
 ) AS VARIANT
 ' =====================================================================================
 PROPERTY SET Value <0> ( ' VTable offset = 32
 BYREF IN varValue AS VARIANT
 ) ' void
 ' =====================================================================================
 PROPERTY GET Name <1> ( ' VTable offset = 36
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY GET IsLocal <2> ( ' VTable offset = 40
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY GET Origin <3> ( ' VTable offset = 44
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY GET CIMType <4> ( ' VTable offset = 48
 ) AS LONG
 ' =====================================================================================
 PROPERTY GET Qualifiers_ <5> ( ' VTable offset = 52
 ) AS ISWbemQualifierSet
 ' =====================================================================================
 PROPERTY GET IsArray <6> ( ' VTable offset = 56
 ) AS INTEGER
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemProperty_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemPropertySet
' IID = {DEA0A7B2-D4BA-11D1-8B09-00600806D9B6}
' A collection of Properties
' Attributes = 4176 [&H1050] [Hidden] [Dual] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemPropertySet_INTERFACE_DEFINED)
 %ISWbemPropertySet_INTERFACE_DEFINED = 1
INTERFACE ISWbemPropertySet $IID_ISWbemPropertySet
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET NewEnum_ <-4> ( ' VTable offset = 28
 ) AS IUnknown
 ' =====================================================================================
 METHOD Item <0> ( ' VTable offset = 32
 BYVAL strName AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemProperty
 ' =====================================================================================
 PROPERTY GET Count <1> ( ' VTable offset = 36
 ) AS LONG
 ' =====================================================================================
 METHOD Add <2> ( ' VTable offset = 40
 BYVAL strName AS WSTRING
 , BYVAL iCIMType AS LONG
 , OPTIONAL BYVAL bIsArray AS INTEGER
 , OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemProperty
 ' =====================================================================================
 METHOD Remove <3> ( ' VTable offset = 44
 BYVAL strName AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 ) ' void
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemPropertySet_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemMethod
' IID = {422E8E90-D955-11D1-8B09-00600806D9B6}
' Attributes = 4304 [&H10D0] [Hidden] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemMethod_INTERFACE_DEFINED)
 %ISWbemMethod_INTERFACE_DEFINED = 1
INTERFACE ISWbemMethod $IID_ISWbemMethod
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET Name <1> ( ' VTable offset = 28
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY GET Origin <2> ( ' VTable offset = 32
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY GET InParameters <3> ( ' VTable offset = 36
 ) AS ISWbemObject
 ' =====================================================================================
 PROPERTY GET OutParameters <4> ( ' VTable offset = 40
 ) AS ISWbemObject
 ' =====================================================================================
 PROPERTY GET Qualifiers_ <5> ( ' VTable offset = 44
 ) AS ISWbemQualifierSet
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemMethod_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemMethodSet
' IID = {C93BA292-D955-11D1-8B09-00600806D9B6}
' A collection of Methods
' Attributes = 4304 [&H10D0] [Hidden] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemMethodSet_INTERFACE_DEFINED)
 %ISWbemMethodSet_INTERFACE_DEFINED = 1
INTERFACE ISWbemMethodSet $IID_ISWbemMethodSet
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET NewEnum_ <-4> ( ' VTable offset = 28
 ) AS IUnknown
 ' =====================================================================================
 METHOD Item <0> ( ' VTable offset = 32
 BYVAL strName AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemMethod
 ' =====================================================================================
 PROPERTY GET Count <1> ( ' VTable offset = 36
 ) AS LONG
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemMethodSet_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemEventSource
' IID = {27D54D92-0EBE-11D2-8B22-00600806D9B6}
' Attributes = 4304 [&H10D0] [Hidden] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemEventSource_INTERFACE_DEFINED)
 %ISWbemEventSource_INTERFACE_DEFINED = 1
INTERFACE ISWbemEventSource $IID_ISWbemEventSource
 INHERIT IDispatch
 ' =====================================================================================
 METHOD NextEvent <1> ( ' VTable offset = 28
 OPTIONAL BYVAL iTimeoutMs AS LONG
 ) AS ISWbemObject
 ' =====================================================================================
 PROPERTY GET Security_ <2> ( ' VTable offset = 32
 ) AS ISWbemSecurity
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemEventSource_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemObjectPath
' IID = {5791BC27-CE9C-11D1-97BF-0000F81E849C}
' Attributes = 4176 [&H1050] [Hidden] [Dual] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemObjectPath_INTERFACE_DEFINED)
 %ISWbemObjectPath_INTERFACE_DEFINED = 1
INTERFACE ISWbemObjectPath $IID_ISWbemObjectPath
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET Path <0> ( ' VTable offset = 28
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY SET Path <0> ( ' VTable offset = 32
 BYVAL strPath AS WSTRING
 ) ' void
 ' =====================================================================================
 PROPERTY GET RelPath <1> ( ' VTable offset = 36
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY SET RelPath <1> ( ' VTable offset = 40
 BYVAL strRelPath AS WSTRING
 ) ' void
 ' =====================================================================================
 PROPERTY GET Server <2> ( ' VTable offset = 44
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY SET Server <2> ( ' VTable offset = 48
 BYVAL strServer AS WSTRING
 ) ' void
 ' =====================================================================================
 PROPERTY GET Namespace <3> ( ' VTable offset = 52
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY SET Namespace <3> ( ' VTable offset = 56
 BYVAL strNamespace AS WSTRING
 ) ' void
 ' =====================================================================================
 PROPERTY GET ParentNamespace <4> ( ' VTable offset = 60
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY GET DisplayName <5> ( ' VTable offset = 64
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY SET DisplayName <5> ( ' VTable offset = 68
 BYVAL strDisplayName AS WSTRING
 ) ' void
 ' =====================================================================================
 PROPERTY GET Class <6> ( ' VTable offset = 72
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY SET Class <6> ( ' VTable offset = 76
 BYVAL strClass AS WSTRING
 ) ' void
 ' =====================================================================================
 PROPERTY GET IsClass <7> ( ' VTable offset = 80
 ) AS INTEGER
 ' =====================================================================================
 METHOD SetAsClass <8> ( ' VTable offset = 84
 ) ' void
 ' =====================================================================================
 PROPERTY GET IsSingleton <9> ( ' VTable offset = 88
 ) AS INTEGER
 ' =====================================================================================
 METHOD SetAsSingleton <10> ( ' VTable offset = 92
 ) ' void
 ' =====================================================================================
 PROPERTY GET Keys <11> ( ' VTable offset = 96
 ) AS ISWbemNamedValueSet
 ' =====================================================================================
 PROPERTY GET Security_ <12> ( ' VTable offset = 100
 ) AS ISWbemSecurity
 ' =====================================================================================
 PROPERTY GET Locale <13> ( ' VTable offset = 104
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY SET Locale <13> ( ' VTable offset = 108
 BYVAL strLocale AS WSTRING
 ) ' void
 ' =====================================================================================
 PROPERTY GET Authority <14> ( ' VTable offset = 112
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY SET Authority <14> ( ' VTable offset = 116
 BYVAL strAuthority AS WSTRING
 ) ' void
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemObjectPath_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemLastError
' IID = {D962DB84-D4BB-11D1-8B09-00600806D9B6}
' Attributes = 4176 [&H1050] [Hidden] [Dual] [Dispatchable]
' Inherited interface = ISWbemObject
' ########################################################################################
#IF NOT %DEF(%ISWbemLastError_INTERFACE_DEFINED)
 %ISWbemLastError_INTERFACE_DEFINED = 1
INTERFACE ISWbemLastError $IID_ISWbemLastError
 INHERIT IDispatch
 ' =====================================================================================
 ' ISWbemObject Methods
 ' =====================================================================================
 METHOD Put_ <1> ( ' VTable offset = 28
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectPath
 ' =====================================================================================
 METHOD PutAsync_ <2> ( ' VTable offset = 32
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Delete_ <3> ( ' VTable offset = 36
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD DeleteAsync_ <4> ( ' VTable offset = 40
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Instances_ <5> ( ' VTable offset = 44
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD InstancesAsync_ <6> ( ' VTable offset = 48
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Subclasses_ <7> ( ' VTable offset = 52
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD SubclassesAsync_ <8> ( ' VTable offset = 56
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Associators_ <9> ( ' VTable offset = 60
 OPTIONAL BYVAL strAssocClass AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strResultRole AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredAssocQualifier AS WSTRING
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD AssociatorsAsync_ <10> ( ' VTable offset = 64
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL strAssocClass AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strResultRole AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredAssocQualifier AS WSTRING
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD References_ <11> ( ' VTable offset = 68
 OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD ReferencesAsync_ <12> ( ' VTable offset = 72
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD ExecMethod_ <13> ( ' VTable offset = 76
 BYVAL strMethodName AS WSTRING
 , OPTIONAL BYVAL objWbemInParameters AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD ExecMethodAsync_ <14> ( ' VTable offset = 80
 BYVAL objWbemSink AS IDispatch
 , BYVAL strMethodName AS WSTRING
 , OPTIONAL BYVAL objWbemInParameters AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Clone_ <15> ( ' VTable offset = 84
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD GetObjectText_ <16> ( ' VTable offset = 88
 OPTIONAL BYVAL iFlags AS LONG
 ) AS WSTRING
 ' =====================================================================================
 METHOD SpawnDerivedClass_ <17> ( ' VTable offset = 92
 OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD SpawnInstance_ <18> ( ' VTable offset = 96
 OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD CompareTo_ <19> ( ' VTable offset = 100
 BYVAL objWbemObject AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY GET Qualifiers_ <20> ( ' VTable offset = 104
 ) AS ISWbemQualifierSet
 ' =====================================================================================
 PROPERTY GET Properties_ <21> ( ' VTable offset = 108
 ) AS ISWbemPropertySet
 ' =====================================================================================
 PROPERTY GET Methods_ <22> ( ' VTable offset = 112
 ) AS ISWbemMethodSet
 ' =====================================================================================
 PROPERTY GET Derivation_ <23> ( ' VTable offset = 116
 ) AS VARIANT
 ' =====================================================================================
 PROPERTY GET Path_ <24> ( ' VTable offset = 120
 ) AS ISWbemObjectPath
 ' =====================================================================================
 PROPERTY GET Security_ <25> ( ' VTable offset = 124
 ) AS ISWbemSecurity
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemLastError_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemSink
' IID = {75718C9F-F029-11D1-A1AC-00C04FB6C223}
' Attributes = 4304 [&H10D0] [Hidden] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemSink_INTERFACE_DEFINED)
 %ISWbemSink_INTERFACE_DEFINED = 1
INTERFACE ISWbemSink $IID_ISWbemSink
 INHERIT IDispatch
 ' =====================================================================================
 METHOD Cancel <1> ( ' VTable offset = 28
 ) ' void
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemSink_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemSecurity
' IID = {B54D66E6-2287-11D2-8B33-00600806D9B6}
' A Security Configurator
' Attributes = 4304 [&H10D0] [Hidden] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemSecurity_INTERFACE_DEFINED)
 %ISWbemSecurity_INTERFACE_DEFINED = 1
INTERFACE ISWbemSecurity $IID_ISWbemSecurity
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET ImpersonationLevel <1> ( ' VTable offset = 28
 ) AS LONG
 ' =====================================================================================
 PROPERTY SET ImpersonationLevel <1> ( ' VTable offset = 32
 BYVAL LONG
 ) ' void
 ' =====================================================================================
 PROPERTY GET AuthenticationLevel <2> ( ' VTable offset = 36
 ) AS LONG
 ' =====================================================================================
 PROPERTY SET AuthenticationLevel <2> ( ' VTable offset = 40
 BYVAL iAuthenticationLevel AS LONG
 ) ' void
 ' =====================================================================================
 PROPERTY GET Privileges <3> ( ' VTable offset = 44
 ) AS ISWbemPrivilegeSet
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemSecurity_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemPrivilege
' IID = {26EE67BD-5804-11D2-8B4A-00600806D9B6}
' Attributes = 4304 [&H10D0] [Hidden] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemPrivilege_INTERFACE_DEFINED)
 %ISWbemPrivilege_INTERFACE_DEFINED = 1
INTERFACE ISWbemPrivilege $IID_ISWbemPrivilege
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET IsEnabled <0> ( ' VTable offset = 28
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET IsEnabled <0> ( ' VTable offset = 32
 BYVAL bIsEnabled AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET Name <1> ( ' VTable offset = 36
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY GET DisplayName <2> ( ' VTable offset = 40
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY GET Identifier <3> ( ' VTable offset = 44
 ) AS LONG
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemPrivilege_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemPrivilegeSet
' IID = {26EE67BF-5804-11D2-8B4A-00600806D9B6}
' Attributes = 4304 [&H10D0] [Hidden] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemPrivilegeSet_INTERFACE_DEFINED)
 %ISWbemPrivilegeSet_INTERFACE_DEFINED = 1
INTERFACE ISWbemPrivilegeSet $IID_ISWbemPrivilegeSet
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET NewEnum_ <-4> ( ' VTable offset = 28
 ) AS IUnknown
 ' =====================================================================================
 METHOD Item <0> ( ' VTable offset = 32
 BYVAL iPrivilege AS LONG
 ) AS ISWbemPrivilege
 ' =====================================================================================
 PROPERTY GET Count <1> ( ' VTable offset = 36
 ) AS LONG
 ' =====================================================================================
 METHOD Add <2> ( ' VTable offset = 40
 BYVAL iPrivilege AS LONG
 , OPTIONAL BYVAL bIsEnabled AS INTEGER
 ) AS ISWbemPrivilege
 ' =====================================================================================
 METHOD Remove <3> ( ' VTable offset = 44
 BYVAL iPrivilege AS LONG
 ) ' void
 ' =====================================================================================
 METHOD DeleteAll <4> ( ' VTable offset = 48
 ) ' void
 ' =====================================================================================
 METHOD AddAsString <5> ( ' VTable offset = 52
 BYVAL strPrivilege AS WSTRING
 , OPTIONAL BYVAL bIsEnabled AS INTEGER
 ) AS ISWbemPrivilege
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemPrivilegeSet_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemServicesEx
' IID = {D2F68443-85DC-427E-91D8-366554CC754C}
' A connection to a Namespace
' Attributes = 4304 [&H10D0] [Hidden] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = ISWbemServices
' ########################################################################################
#IF NOT %DEF(%ISWbemServicesEx_INTERFACE_DEFINED)
 %ISWbemServicesEx_INTERFACE_DEFINED = 1
INTERFACE ISWbemServicesEx $IID_ISWbemServicesEx
 INHERIT IDispatch
 ' =====================================================================================
 ' ISWbemServices Methods
 ' =====================================================================================
 METHOD Get <1> ( ' VTable offset = 28
 OPTIONAL BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD GetAsync <2> ( ' VTable offset = 32
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Delete <3> ( ' VTable offset = 36
 BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD DeleteAsync <4> ( ' VTable offset = 40
 BYVAL objWbemSink AS IDispatch
 , BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD InstancesOf <5> ( ' VTable offset = 44
 BYVAL strClass AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD InstancesOfAsync <6> ( ' VTable offset = 48
 BYVAL objWbemSink AS IDispatch
 , BYVAL strClass AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD SubclassesOf <7> ( ' VTable offset = 52
 OPTIONAL BYVAL strSuperclass AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD SubclassesOfAsync <8> ( ' VTable offset = 56
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL strSuperclass AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD ExecQuery <9> ( ' VTable offset = 60
 BYVAL strQuery AS WSTRING
 , OPTIONAL BYVAL strQueryLanguage AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD ExecQueryAsync <10> ( ' VTable offset = 64
 BYVAL objWbemSink AS IDispatch
 , BYVAL strQuery AS WSTRING
 , OPTIONAL BYVAL strQueryLanguage AS WSTRING
 , OPTIONAL BYVAL lFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD AssociatorsOf <11> ( ' VTable offset = 68
 BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL strAssocClass AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strResultRole AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredAssocQualifier AS WSTRING
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD AssociatorsOfAsync <12> ( ' VTable offset = 72
 BYVAL objWbemSink AS IDispatch
 , BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL strAssocClass AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strResultRole AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredAssocQualifier AS WSTRING
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD ReferencesTo <13> ( ' VTable offset = 76
 BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD ReferencesToAsync <14> ( ' VTable offset = 80
 BYVAL objWbemSink AS IDispatch
 , BYVAL strObjectPath AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD ExecNotificationQuery <15> ( ' VTable offset = 84
 BYVAL strQuery AS WSTRING
 , OPTIONAL BYVAL strQueryLanguage AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemEventSource
 ' =====================================================================================
 METHOD ExecNotificationQueryAsync <16> ( ' VTable offset = 88
 BYVAL objWbemSink AS IDispatch
 , BYVAL strQuery AS WSTRING
 , OPTIONAL BYVAL strQueryLanguage AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD ExecMethod <17> ( ' VTable offset = 92
 BYVAL strObjectPath AS WSTRING
 , BYVAL strMethodName AS WSTRING
 , OPTIONAL BYVAL objWbemInParameters AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD ExecMethodAsync <18> ( ' VTable offset = 96
 BYVAL objWbemSink AS IDispatch
 , BYVAL strObjectPath AS WSTRING
 , BYVAL strMethodName AS WSTRING
 , OPTIONAL BYVAL objWbemInParameters AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 PROPERTY GET Security_ <19> ( ' VTable offset = 100
 ) AS ISWbemSecurity
 ' =====================================================================================
 ' =====================================================================================
 ' ISWbemServicesEx Methods
 ' =====================================================================================
 METHOD Put <20> ( ' VTable offset = 104
 BYVAL objWbemObject AS ISWbemObjectEx
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectPath
 ' =====================================================================================
 METHOD PutAsync <21> ( ' VTable offset = 108
 BYVAL objWbemSink AS ISWbemSink
 , BYVAL objWbemObject AS ISWbemObjectEx
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemServicesEx_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemObjectEx
' IID = {269AD56A-8A67-4129-BC8C-0506DCFE9880}
' Attributes = 4176 [&H1050] [Hidden] [Dual] [Dispatchable]
' Inherited interface = ISWbemObject
' ########################################################################################
#IF NOT %DEF(%ISWbemObjectEx_INTERFACE_DEFINED)
 %ISWbemObjectEx_INTERFACE_DEFINED = 1
INTERFACE ISWbemObjectEx $IID_ISWbemObjectEx
 INHERIT IDispatch
 ' =====================================================================================
 ' ISWbemObject Methods
 ' =====================================================================================
 METHOD Put_ <1> ( ' VTable offset = 28
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectPath
 ' =====================================================================================
 METHOD PutAsync_ <2> ( ' VTable offset = 32
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Delete_ <3> ( ' VTable offset = 36
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD DeleteAsync_ <4> ( ' VTable offset = 40
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Instances_ <5> ( ' VTable offset = 44
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD InstancesAsync_ <6> ( ' VTable offset = 48
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Subclasses_ <7> ( ' VTable offset = 52
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD SubclassesAsync_ <8> ( ' VTable offset = 56
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Associators_ <9> ( ' VTable offset = 60
 OPTIONAL BYVAL strAssocClass AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strResultRole AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredAssocQualifier AS WSTRING
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD AssociatorsAsync_ <10> ( ' VTable offset = 64
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL strAssocClass AS WSTRING
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strResultRole AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredAssocQualifier AS WSTRING
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD References_ <11> ( ' VTable offset = 68
 OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD ReferencesAsync_ <12> ( ' VTable offset = 72
 BYVAL objWbemSink AS IDispatch
 , OPTIONAL BYVAL strResultClass AS WSTRING
 , OPTIONAL BYVAL strRole AS WSTRING
 , OPTIONAL BYVAL bClassesOnly AS INTEGER
 , OPTIONAL BYVAL bSchemaOnly AS INTEGER
 , OPTIONAL BYVAL strRequiredQualifier AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD ExecMethod_ <13> ( ' VTable offset = 76
 BYVAL strMethodName AS WSTRING
 , OPTIONAL BYVAL objWbemInParameters AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD ExecMethodAsync_ <14> ( ' VTable offset = 80
 BYVAL objWbemSink AS IDispatch
 , BYVAL strMethodName AS WSTRING
 , OPTIONAL BYVAL objWbemInParameters AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 , OPTIONAL BYVAL objWbemAsyncContext AS IDispatch
 ) ' void
 ' =====================================================================================
 METHOD Clone_ <15> ( ' VTable offset = 84
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD GetObjectText_ <16> ( ' VTable offset = 88
 OPTIONAL BYVAL iFlags AS LONG
 ) AS WSTRING
 ' =====================================================================================
 METHOD SpawnDerivedClass_ <17> ( ' VTable offset = 92
 OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD SpawnInstance_ <18> ( ' VTable offset = 96
 OPTIONAL BYVAL iFlags AS LONG
 ) AS ISWbemObject
 ' =====================================================================================
 METHOD CompareTo_ <19> ( ' VTable offset = 100
 BYVAL objWbemObject AS IDispatch
 , OPTIONAL BYVAL iFlags AS LONG
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY GET Qualifiers_ <20> ( ' VTable offset = 104
 ) AS ISWbemQualifierSet
 ' =====================================================================================
 PROPERTY GET Properties_ <21> ( ' VTable offset = 108
 ) AS ISWbemPropertySet
 ' =====================================================================================
 PROPERTY GET Methods_ <22> ( ' VTable offset = 112
 ) AS ISWbemMethodSet
 ' =====================================================================================
 PROPERTY GET Derivation_ <23> ( ' VTable offset = 116
 ) AS VARIANT
 ' =====================================================================================
 PROPERTY GET Path_ <24> ( ' VTable offset = 120
 ) AS ISWbemObjectPath
 ' =====================================================================================
 PROPERTY GET Security_ <25> ( ' VTable offset = 124
 ) AS ISWbemSecurity
 ' =====================================================================================
 ' =====================================================================================
 ' ISWbemObjectEx Methods
 ' =====================================================================================
 METHOD Refresh_ <26> ( ' VTable offset = 128
 OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) ' void
 ' =====================================================================================
 PROPERTY GET SystemProperties_ <27> ( ' VTable offset = 132
 ) AS ISWbemPropertySet
 ' =====================================================================================
 METHOD GetText_ <28> ( ' VTable offset = 136
 BYVAL iObjectTextFormat AS LONG
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS WSTRING
 ' =====================================================================================
 METHOD SetFromText_ <29> ( ' VTable offset = 140
 BYVAL bsText AS WSTRING
 , BYVAL iObjectTextFormat AS LONG
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) ' void
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemObjectEx_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemDateTime
' IID = {5E97458A-CF77-11D3-B38F-00105A1F473A}
' Attributes = 4288 [&H10C0] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemDateTime_INTERFACE_DEFINED)
 %ISWbemDateTime_INTERFACE_DEFINED = 1
INTERFACE ISWbemDateTime $IID_ISWbemDateTime
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET Value <0> ( ' VTable offset = 28
 ) AS WSTRING
 ' =====================================================================================
 PROPERTY SET Value <0> ( ' VTable offset = 32
 BYVAL strValue AS WSTRING
 ) ' void
 ' =====================================================================================
 PROPERTY GET Year <1> ( ' VTable offset = 36
 ) AS LONG
 ' =====================================================================================
 PROPERTY SET Year <1> ( ' VTable offset = 40
 BYVAL iYear AS LONG
 ) ' void
 ' =====================================================================================
 PROPERTY GET YearSpecified <2> ( ' VTable offset = 44
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET YearSpecified <2> ( ' VTable offset = 48
 BYVAL bYearSpecified AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET Month <3> ( ' VTable offset = 52
 ) AS LONG
 ' =====================================================================================
 PROPERTY SET Month <3> ( ' VTable offset = 56
 BYVAL iMonth AS LONG
 ) ' void
 ' =====================================================================================
 PROPERTY GET MonthSpecified <4> ( ' VTable offset = 60
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET MonthSpecified <4> ( ' VTable offset = 64
 BYVAL bMonthSpecified AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET Day <5> ( ' VTable offset = 68
 ) AS LONG
 ' =====================================================================================
 PROPERTY SET Day <5> ( ' VTable offset = 72
 BYVAL iDay AS LONG
 ) ' void
 ' =====================================================================================
 PROPERTY GET DaySpecified <6> ( ' VTable offset = 76
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET DaySpecified <6> ( ' VTable offset = 80
 BYVAL bDaySpecified AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET Hours <7> ( ' VTable offset = 84
 ) AS LONG
 ' =====================================================================================
 PROPERTY SET Hours <7> ( ' VTable offset = 88
 BYVAL iHours AS LONG
 ) ' void
 ' =====================================================================================
 PROPERTY GET HoursSpecified <8> ( ' VTable offset = 92
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET HoursSpecified <8> ( ' VTable offset = 96
 BYVAL bHoursSpecified AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET Minutes <9> ( ' VTable offset = 100
 ) AS LONG
 ' =====================================================================================
 PROPERTY SET Minutes <9> ( ' VTable offset = 104
 BYVAL iMinutes AS LONG
 ) ' void
 ' =====================================================================================
 PROPERTY GET MinutesSpecified <10> ( ' VTable offset = 108
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET MinutesSpecified <10> ( ' VTable offset = 112
 BYVAL bMinutesSpecified AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET Seconds <11> ( ' VTable offset = 116
 ) AS LONG
 ' =====================================================================================
 PROPERTY SET Seconds <11> ( ' VTable offset = 120
 BYVAL iSeconds AS LONG
 ) ' void
 ' =====================================================================================
 PROPERTY GET SecondsSpecified <12> ( ' VTable offset = 124
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET SecondsSpecified <12> ( ' VTable offset = 128
 BYVAL bSecondsSpecified AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET Microseconds <13> ( ' VTable offset = 132
 ) AS LONG
 ' =====================================================================================
 PROPERTY SET Microseconds <13> ( ' VTable offset = 136
 BYVAL iMicroseconds AS LONG
 ) ' void
 ' =====================================================================================
 PROPERTY GET MicrosecondsSpecified <14> ( ' VTable offset = 140
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET MicrosecondsSpecified <14> ( ' VTable offset = 144
 BYVAL bMicrosecondsSpecified AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET UTC <15> ( ' VTable offset = 148
 ) AS LONG
 ' =====================================================================================
 PROPERTY SET UTC <15> ( ' VTable offset = 152
 BYVAL iUTC AS LONG
 ) ' void
 ' =====================================================================================
 PROPERTY GET UTCSpecified <16> ( ' VTable offset = 156
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET UTCSpecified <16> ( ' VTable offset = 160
 BYVAL bUTCSpecified AS INTEGER
 ) ' void
 ' =====================================================================================
 PROPERTY GET IsInterval <17> ( ' VTable offset = 164
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET IsInterval <17> ( ' VTable offset = 168
 BYVAL bIsInterval AS INTEGER
 ) ' void
 ' =====================================================================================
 METHOD GetVarDate <18> ( ' VTable offset = 172
 OPTIONAL BYVAL bIsLocal AS INTEGER
 ) AS DOUBLE
 ' =====================================================================================
 METHOD SetVarDate <19> ( ' VTable offset = 176
 BYVAL dVarDate AS DOUBLE
 , OPTIONAL BYVAL bIsLocal AS INTEGER
 ) ' void
 ' =====================================================================================
 METHOD GetFileTime <20> ( ' VTable offset = 180
 OPTIONAL BYVAL bIsLocal AS INTEGER
 ) AS WSTRING
 ' =====================================================================================
 METHOD SetFileTime <21> ( ' VTable offset = 184
 BYVAL strFileTime AS WSTRING
 , OPTIONAL BYVAL bIsLocal AS INTEGER
 ) ' void
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemDateTime_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemRefresher
' IID = {14D8250E-D9C2-11D3-B38F-00105A1F473A}
' Attributes = 4288 [&H10C0] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemRefresher_INTERFACE_DEFINED)
 %ISWbemRefresher_INTERFACE_DEFINED = 1
INTERFACE ISWbemRefresher $IID_ISWbemRefresher
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET NewEnum_ <-4> ( ' VTable offset = 28
 ) AS IUnknown
 ' =====================================================================================
 METHOD Item <0> ( ' VTable offset = 32
 BYVAL iIndex AS LONG
 ) AS ISWbemRefreshableItem
 ' =====================================================================================
 PROPERTY GET Count <1> ( ' VTable offset = 36
 ) AS LONG
 ' =====================================================================================
 METHOD Add <2> ( ' VTable offset = 40
 BYVAL objWbemServices AS ISWbemServicesEx
 , BYVAL bsInstancePath AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemRefreshableItem
 ' =====================================================================================
 METHOD AddEnum ( ' VTable offset = 44
 BYVAL objWbemServices AS ISWbemServicesEx
 , BYVAL bsClassName AS WSTRING
 , OPTIONAL BYVAL iFlags AS LONG
 , OPTIONAL BYVAL objWbemNamedValueSet AS IDispatch
 ) AS ISWbemRefreshableItem
 ' =====================================================================================
 METHOD Remove <4> ( ' VTable offset = 48
 BYVAL iIndex AS LONG
 , OPTIONAL BYVAL iFlags AS LONG
 ) ' void
 ' =====================================================================================
 METHOD Refresh <5> ( ' VTable offset = 52
 OPTIONAL BYVAL iFlags AS LONG
 ) ' void
 ' =====================================================================================
 PROPERTY GET AutoReconnect <6> ( ' VTable offset = 56
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY SET AutoReconnect <6> ( ' VTable offset = 60
 BYVAL bCount AS INTEGER
 ) ' void
 ' =====================================================================================
 METHOD DeleteAll <7> ( ' VTable offset = 64
 ) ' void
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemRefresher_INTERFACE_DEFINED__ */
' ########################################################################################
' Interface name = ISWbemRefreshableItem
' IID = {5AD4BF92-DAAB-11D3-B38F-00105A1F473A}
' Attributes = 4288 [&H10C0] [Dual] [Nonextensible] [Dispatchable]
' Inherited interface = IDispatch
' ########################################################################################
#IF NOT %DEF(%ISWbemRefreshableItem_INTERFACE_DEFINED)
 %ISWbemRefreshableItem_INTERFACE_DEFINED = 1
INTERFACE ISWbemRefreshableItem $IID_ISWbemRefreshableItem
 INHERIT IDispatch
 ' =====================================================================================
 PROPERTY GET Index <1> ( ' VTable offset = 28
 ) AS LONG
 ' =====================================================================================
 PROPERTY GET Refresher <2> ( ' VTable offset = 32
 ) AS ISWbemRefresher
 ' =====================================================================================
 PROPERTY GET IsSet <3> ( ' VTable offset = 36
 ) AS INTEGER
 ' =====================================================================================
 PROPERTY GET Object <4> ( ' VTable offset = 40
 ) AS ISWbemObjectEx
 ' =====================================================================================
 PROPERTY GET ObjectSet <5> ( ' VTable offset = 44
 ) AS ISWbemObjectSet
 ' =====================================================================================
 METHOD Remove <6> ( ' VTable offset = 48
 OPTIONAL BYVAL iFlags AS LONG
 ) ' void
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __ISWbemRefreshableItem_INTERFACE_DEFINED__ */
#ENDIF
