描述:
我在Win2000以上的版本操作系统中,封装了一个动态库,希望用这个动态库来加载控制一个自动化服务器应用程序,可以不知道为什么不能够启动这个自动化服务器应用程序,哪位大虾帮帮忙给看看?
程序代码如下:
struct StartUpCom {
StartUpCom() { OleInitialize(NULL);}
~StartUpCom() { CoUninitialize(); }
} _global_com_inst;
IJpmanSvrPtr svr;
BOOL APIENTRY DllMain( HANDLE hModule,
DWORD ul_reason_for_call,
LPVOID lpReserved
)
{
switch (ul_reason_for_call)
{
case DLL_PROCESS_ATTACH:
{
HRESULT hr;
CLSID clsid;
hr = svr.GetActiveObject(OLESTR("JpmanSvr.Document"));
if(FAILED(hr))
hr = svr.CreateInstance(OLESTR("JpmanSvr.Document"),
NULL, CLSCTX_LOCAL_SERVER);
}
case DLL_THREAD_ATTACH:
case DLL_THREAD_DETACH:
case DLL_PROCESS_DETACH:
break;
}
return TRUE;
}