#include "stdafx.h"#import "Server.tlb" class COMHelper
{
public:
COMHelper(){ ::CoInitialize(NULL);}~COMHelper(){ ::CoUninitialize();} HRESULT FindRunningInstance(LPOLESTR lpszItem, IUnknown** ppUnk){HRESULT hr = S_OK;IMonikerPtr pMoniker; hr = CreateItemMoniker(_T("!"), lpszItem, &pMoniker);if(!SUCCEEDED(hr))return hr; IRunningObjectTablePtr pROT;GetRunningObjectTable(0, &pROT);hr = pROT->GetObjectW(pMoniker, ppUnk);return hr;
}
}; int _tmain(int argc, _TCHAR* argv[]){COMHelper comSystem; IUnknownPtr pUnk;HRESULT hr = S_OK;//look up the ROT table directlyhr = comSystem.FindRunningInstance(_T("{58C142C7-E599-4921-BF29-33DC0FCCBECA}"), &pUnk);//alternative approach find running object in OLE way//hr = ::GetActiveObject(__uuidof(Server::ProviderImp), NULL, &pUnk); //if no running instance found start a new one.if(!SUCCEEDED(hr)){hr = CoCreateInstance(__uuidof(Server::ProviderImp), NULL, CLSCTX_LOCAL_SERVER,__uuidof(Server::IProvider), (LPVOID*)&pUnk);if(!SUCCEEDED(hr))throw 0;} //convert IUnknown to IProviderServer::IProviderPtr pProvider;hr = pUnk->QueryInterface(__uuidof(Server::IProvider), (LPVOID*)&pProvider);if(!SUCCEEDED(hr))throw 0; //call IProviderpProvider->Test();return 0;}
【责编:Peng】
相关文章编辑推荐
相关产品和培训
文章评论
认证培训 专题推荐
今日更新 社区讨论 博客论点 频道精选
您现在的位置： 
佚名
2007-7-10
