在VC里实现WMI编程(取得MAC,Host,IP地址)

include stdafx h define WIN32 DCOM include using namespace std include include include pragma comment lib wbemuuid lib BOOL ManageWMI 函数声明 int tmain int argc TCHAR argv if ManageWMI printf WMI Error getch return 0 BOOL ManageWMI HRESULT hres Step 1 Initialize COM hres CoInitializeEx 0 COINIT MULTITHREADED if FAILED hres cout Failed to initialize COM library Error code 0 x hex hres endl return 1 Program has failed Step 2 Set general COM security levels Note If you are using Windows 2000 you need to specify the default authentication credentials for a user by using a SOLE AUTHENTICATION LIST structure in the pAuthList parameter of CoInitializeSecurity hres CoInitializeSecurity NULL 1 COM authentication NULL Authentication services NULL Reserved RPC C AUTHN LEVEL DEFAULT Default authentication RPC C IMP LEVEL IMPERSONATE Default Impersonation NULL Authentication info EOAC NONE Additional capabilities NULL Reserved if FAILED hres cout Failed to initialize security Error code 0 x hex hres endl CoUninitialize return 1 Program has failed Step 3 Obtain the initial locator to WMI IWbemLocator pLoc NULL hres CoCreateInstance CLSID WbemLocator 0 CLSCTX INPROC SERVER IID IWbemLocator LPVOID if FAILED hres cout Failed to create IWbemLocator object Err code 0 x hex hres ConnectServer bstr t L ROOT CIMV2 Object path of WMI namespace NULL User name NULL current user NULL User password NULL current 0 Locale NULL indicates current NULL Security flags 0 Authority e g Kerberos 0 Context object if FAILED hres cout Could not connect Error code 0 x hex hres Release CoUninitialize return 1 Program has failed cout Connected to ROOT CIMV2 WMI namespace endl Step 5 Set security levels on the proxy hres CoSetProxyBlanket pSvc Indicates the proxy to set RPC C AUTHN WINNT RPC C AUTHN xxx RPC C AUTHZ NONE RPC C AUTHZ xxx NULL Server principal name RPC C AUTHN LEVEL CALL RPC C AUTHN LEVEL xxx RPC C IMP LEVEL IMPERSONATE RPC C IMP LEVEL xxx NULL client identity EOAC NONE proxy capabilities if FAILED hres cout Could not set proxy blanket Error code 0 x hex hres Release pLoc Release CoUninitialize return 1 Program has failed Step 6 Use the IWbemServices pointer to make requests of WMI For example get the name of the operating system IEnumWbemClassObject pEnumerator NULL hres pSvc ExecQuery bstr t WQL bstr t SELECT FROM Win32 NetworkAdapterConfiguration WHERE IPEnabled TRUE WBEM FLAG FORWARD ONLY WBEM FLAG RETURN IMMEDIATELY NULL if FAILED hres cout Query for Network Adapter Configuration failed Error code 0 x hex hres Release pLoc Release CoUninitialize return 1 Program has failed Step 7 Get the data from the query in step 6 IWbemClassObject pclsObj ULONG uReturn 0 while pEnumerator HRESULT hr pEnumerator Next WBEM INFINITE 1 if 0 uReturn break VARIANT vtProp VariantInit hr pclsObj Get L IPSubnet 0 Get the value of the Enable property hr pclsObj Get L IPEnabled 0 Get the value of the MacAddress property if vtProp boolVal hr pclsObj Get L MacAddress 0 wcout MacAddress vtProp bstrVal Get L IPEnabled 0 if vtProp boolVal LONG lstart lend LONG idx 1 BSTR pbstr SAFEARRAY sa hr pclsObj Get L Description 0 if FAILED hr wcout Description vtProp bstrVal Get L DNSHostName 0 if FAILED hr cout DNS vtProp bstrVal Get L IPAddress 0 if