OPCClient浏览OPCServer的简单实例程序源代码.doc

OPC Client浏览OPC Server的简单实例简单程序源代码：/main.cpp/*/浏览本地OPC服务器/*#define _WIN32_DCOM / Needed in order to call CoInitializeEx()#include #include #include #import C:WINNTsystem32OpcEnum.exe no_namespace/根据OpcEnum.exe更改#include opcda.h#include opcenum_i.c/-/版本号-可以从规范中查到static const CLSID CATID_OPCDAServer10 = 0x63d5f430, 0xcfe4, 0x11d1, 0xb2, 0xc8, 0x0, 0x60, 0x8, 0x3b, 0xa1, 0xfb ;/ 63D5F430-CFE4-11d1-B2C8-0060083BA1FBstatic const CLSID CATID_OPCDAServer20 = 0x63d5f432, 0xcfe4, 0x11d1, 0xb2, 0xc8, 0x0, 0x60, 0x8, 0x3b, 0xa1, 0xfb ;/ 63D5F432-CFE4-11d1-B2C8-0060083BA1FB/uuid(CC603642-66D7-48f1-B69A-B625E73652D7) interface CATID_OPCDAServer30/-void OPCServerList();int main(int argc, char* argv) HRESULT hr; int n_return = 0; try / Initialize COM if( FAILED( hr = CoInitializeEx(NULL, COINIT_APARTMENTTHREADED) ) ) _com_issue_error(hr); catch(_com_error e) std:cout ERROR( e.Error() 0) std:cout (TCHAR*)e.Description() std:endl; else std:cout e.ErrorMessage() EnumClassesOfCategories( 1, &catid, 1, &catid, (IEnumGUID*)&pEnumGUID); if(S_OK!=hr)return;/获得支持OPC DA2.0数据服务器的CLSIDunsigned long c;while (S_OK = pEnumGUID-Next(1, &clsid, &c) LPOLESTR pszProgID;LPOLESTR pszUserType;hr = gpOPC-GetClassDetails(&clsid, &pszProgID, &pszUserType);/打印OPC数据服务器的有关信息printf(ProgID = %ls, UserType = %lsn, pszProgID, pszUserType);CoTaskMemFree