Error in DispEventAdvise
I have an ATL control that uses DCOM to connect to a remote server (also
written in ATL). Both PCs are running XP Pro and I use the VC 6.0 with ATL
3.0. When my code calls CoCreateInstanceEx, everything connects and I can
see the server launch on the remote PC. However, when my code calls
pServerSink->DispEventAdvise( <IUnknown pointer> ); I get an error
(0x800706BA). Before I tried changing the access method I was getting the
error (0x80010114). I am at a quandry as to why I can get the interface but
I cannot get the sink interface. When I try to run the server on the local
machine, I get no errors. Here is my code...
///////////////////////////
// ServerIntfCtrl.h
class ATL_NO_VTABLE CServerIntf :
public CComObjectRootEx<CComSingleThreadModel>,
public IDispatchImpl<IServerIntf, &IID_IServerIntf,
&LIBID_SERVERINTFCTRLLib>,
public CComControl<CServerIntf>,
public IPersistStreamInitImpl<CServerIntf>,
public IOleControlImpl<CServerIntf>,
public IOleObjectImpl<CServerIntf>,
public IOleInPlaceActiveObjectImpl<CServerIntf>,
public IViewObjectExImpl<CServerIntf>,
public IOleInPlaceObjectWindowlessImpl<CServerIntf>,
public IConnectionPointContainerImpl<CServerIntf>,
public IPersistStorageImpl<CServerIntf>,
public ISpecifyPropertyPagesImpl<CServerIntf>,
public IQuickActivateImpl<CServerIntf>,
public IDataObjectImpl<CServerIntf>,
public IProvideClassInfo2Impl<&CLSID_ServerIntf, &DIID__IServerIntfEvents,
&LIBID_SERVERINTFCTRLLib>,
public IPropertyNotifySinkCP<CServerIntf>,
public CComCoClass<CServerIntf, &CLSID_ServerIntf>,
public IDispatchImpl<ITestIntf, &IID_ITestIntf, &LIBID_TSTCOMSVRLib>,
public CProxy_IServerIntfEvents< CServerIntf >,
public IObjectSafetyImpl<CServerIntf, INTERFACESAFE_FOR_UNTRUSTED_CALLER>
{
public:
CServerIntf() : m_bInitialized(false), m_blnConnected(false)
{
m_pTstComSvr = NULL;
m_pTstComSvrSink = NULL;
m_strLocation = _T("LOCAL");
m_dwTstComSvr = 0;
}
BOOL m_bInitialized;
BOOL m_blnConnected;
CComBSTR m_strLocation;
CComPtr<ITestIntf> m_pTstComSvr;
CTstComSvrEventSink *m_pTstComSvrSink;
DWORD m_dwTstComSvr;
DECLARE_REGISTRY_RESOURCEID(IDR_SERVERINTF)
DECLARE_PROTECT_FINAL_CONSTRUCT()
BEGIN_COM_MAP(CServerIntf)
COM_INTERFACE_ENTRY(IServerIntf)
//DEL COM_INTERFACE_ENTRY(IDispatch)
COM_INTERFACE_ENTRY(IViewObjectEx)
COM_INTERFACE_ENTRY(IViewObject2)
COM_INTERFACE_ENTRY(IViewObject)
COM_INTERFACE_ENTRY(IOleInPlaceObjectWindowless)
COM_INTERFACE_ENTRY(IOleInPlaceObject)
COM_INTERFACE_ENTRY2(IOleWindow, IOleInPlaceObjectWindowless)
COM_INTERFACE_ENTRY(IOleInPlaceActiveObject)
COM_INTERFACE_ENTRY(IOleControl)
COM_INTERFACE_ENTRY(IOleObject)
COM_INTERFACE_ENTRY(IPersistStreamInit)
COM_INTERFACE_ENTRY2(IPersist, IPersistStreamInit)
COM_INTERFACE_ENTRY(IConnectionPointContainer)
COM_INTERFACE_ENTRY(ISpecifyPropertyPages)
COM_INTERFACE_ENTRY(IQuickActivate)
COM_INTERFACE_ENTRY(IPersistStorage)
COM_INTERFACE_ENTRY(IDataObject)
COM_INTERFACE_ENTRY(IProvideClassInfo)
COM_INTERFACE_ENTRY(IProvideClassInfo2)
COM_INTERFACE_ENTRY2(IDispatch, IServerIntf)
COM_INTERFACE_ENTRY(ITestIntf)
COM_INTERFACE_ENTRY_IMPL(IConnectionPointContainer)
END_COM_MAP()
BEGIN_PROP_MAP(CServerIntf)
PROP_DATA_ENTRY("_cx", m_sizeExtent.cx, VT_UI4)
PROP_DATA_ENTRY("_cy", m_sizeExtent.cy, VT_UI4)
// Example entries
// PROP_ENTRY("Property Description", dispid, clsid)
// PROP_PAGE(CLSID_StockColorPage)
END_PROP_MAP()
BEGIN_CONNECTION_POINT_MAP(CServerIntf)
CONNECTION_POINT_ENTRY(IID_IPropertyNotifySink)
CONNECTION_POINT_ENTRY(DIID__IServerIntfEvents)
END_CONNECTION_POINT_MAP()
BEGIN_MSG_MAP(CServerIntf)
CHAIN_MSG_MAP(CComControl<CServerIntf>)
DEFAULT_REFLECTION_HANDLER()
END_MSG_MAP()
// Handler prototypes:
// LRESULT MessageHandler(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL&
bHandled);
// LRESULT CommandHandler(WORD wNotifyCode, WORD wID, HWND hWndCtl, BOOL&
bHandled);
// LRESULT NotifyHandler(int idCtrl, LPNMHDR pnmh, BOOL& bHandled);
// IViewObjectEx
DECLARE_VIEW_STATUS(0)
// IServerIntf
public:
STDMETHOD(Connect)(void);
STDMETHOD(Disconnect)(void);
STDMETHOD(get_Location)(/*[out, retval]*/ BSTR *pVal);
STDMETHOD(put_Location)(/*[in]*/ BSTR newVal);
STDMETHOD(LoadBack)(INT intBackCount);
STDMETHOD(LoadPage)(/*[in]*/ BSTR strFileName);
STDMETHOD(Login)(/*[in]*/ BSTR bstrID, /*[in]*/ BSTR bstrPswrd);
STDMETHOD(Logout)(void);
STDMETHOD(LogStatus)(void);
STDMETHOD(PageLoaded)(/*[in]*/ BSTR strFileName);
STDMETHOD(RefreshDisp)(void);
STDMETHOD(RespondTest)(/*[in]*/ BSTR strTestResult);
STDMETHOD(SaveImage)(/*[in]*/ BSTR sFileName);
STDMETHOD(SetAnnotations)(/*[in]*/ BSTR sTLText, /*[in]*/ BSTR sBLText,
/*[in]*/ BSTR sTRText, /*[in]*/ BSTR sBRText);
STDMETHOD(SetMode)(/*[in]*/ BSTR strMode);
STDMETHOD(StartTest)(BSTR strTestName, BSTR strTestID, BSTR strTestStim,
BSTR strTestExpect, BSTR strTestMode, BSTR strPassURL, BSTR strFailURL, BSTR
strHaltURL, BSTR strErrURL);
STDMETHOD(StepTest)(void);
STDMETHOD(StopTest)(void);
STDMETHOD(TestRun)(/*[in]*/ BSTR strTestName, /*[in]*/ BSTR strTestID,
/*[in]*/ BSTR strTestStim, /*[in]*/ BSTR strTestExpect, /*[in]*/ BSTR
strTestMode);
HRESULT OnDraw(ATL_DRAWINFO& di)
{
RECT& rc = *(RECT*)di.prcBounds;
Rectangle(di.hdcDraw, rc.left, rc.top, rc.right, rc.bottom);
SetTextAlign(di.hdcDraw, TA_CENTER|TA_BASELINE);
LPCTSTR pszText = _T("ATL 3.0 : ServerIntf");
TextOut(di.hdcDraw,
(rc.left + rc.right) / 2,
(rc.top + rc.bottom) / 2,
pszText,
lstrlen(pszText));
return S_OK;
}
};
/////////////////////////////////////////////////////////////////////////////
// CTstComSvrEventSink
class CTstComSvrEventSink : public IDispEventImpl<10, CTstComSvrEventSink,
&DIID__ITestIntfEvents, &LIBID_TSTCOMSVRLib, 1, 0>
{
public:
CServerIntf* m_pParent;
CTstComSvrEventSink(CServerIntf* pParent)
{
m_pParent = pParent;
}
void __stdcall OnPageLoad(BSTR strPage)
{
m_pParent->Fire_OnPageLoad(strPage);
}
void __stdcall OnLoadBack(int intPageCount)
{
m_pParent->Fire_OnLoadBack(intPageCount);
}
void __stdcall OnMode(BSTR strMode)
{
m_pParent->Fire_OnMode(strMode);
}
void __stdcall OnProgress(int intValue, int intMaxValue)
{
m_pParent->Fire_OnProgress(intValue, intMaxValue);
}
void __stdcall OnStatus(BSTR strStatus)
{
m_pParent->Fire_OnStatus(strStatus);
}
void __stdcall OnResults(BSTR strResult, BOOL bEnd)
{
m_pParent->Fire_OnResults(strResult, bEnd);
}
void __stdcall OnFinalResult(BSTR strResult)
{
m_pParent->Fire_OnFinalResult(strResult);
}
void __stdcall OnLogin(BOOL blnLoginStatus)
{
m_pParent->Fire_OnLogin(blnLoginStatus);
}
void __stdcall OnImageSave(BOOL bOk)
{
m_pParent->Fire_OnImageSave(bOk);
}
void __stdcall OnServerInit(BSTR strMachine, BSTR strModel)
{
m_pParent->Fire_OnServerInit(strMachine, strModel);
}
BEGIN_SINK_MAP(CTstComSvrEventSink)
SINK_ENTRY_EX(10, DIID__ITestIntfEvents, 0x1, OnPageLoad)
SINK_ENTRY_EX(10, DIID__ITestIntfEvents, 0x2, OnLoadBack)
SINK_ENTRY_EX(10, DIID__ITestIntfEvents, 0x3, OnMode)
SINK_ENTRY_EX(10, DIID__ITestIntfEvents, 0x4, OnProgress)
SINK_ENTRY_EX(10, DIID__ITestIntfEvents, 0x5, OnStatus)
SINK_ENTRY_EX(10, DIID__ITestIntfEvents, 0x6, OnResults)
SINK_ENTRY_EX(10, DIID__ITestIntfEvents, 0x7, OnFinalResult)
SINK_ENTRY_EX(10, DIID__ITestIntfEvents, 0x8, OnLogin)
SINK_ENTRY_EX(10, DIID__ITestIntfEvents, 0x9, OnImageSave)
SINK_ENTRY_EX(10, DIID__ITestIntfEvents, 0xA, OnServerInit)
END_SINK_MAP()
};
///////////////////////////
// ServerIntfCtrl.cpp
STDMETHODIMP CServerIntf::Connect()
{
// TODO: Add your implementation code here
USES_CONVERSION;
HRESULT hr;
int nConnCLSCTX;
if(!m_blnConnected)
{
CLoginDlg Dlg(this);
if(Dlg.DoModal() == IDOK)
{
// Everyone can connect
hr = CoInitializeSecurity(NULL, -1, NULL, NULL, RPC_C_AUTHN_LEVEL_NONE,
RPC_C_IMP_LEVEL_IDENTIFY, NULL, EOAC_NONE, NULL);
COSERVERINFO si;
MULTI_QI qi;
si.dwReserved1 = 0;
si.pwszName = _T("");
si.pAuthInfo = NULL;
si.dwReserved2 = 0;
qi.pIID = &IID_ITestIntf;
qi.pItf = NULL;
qi.hr = 0;
CComBSTR strTmp = "";
ULONG nSize = 256;
TCHAR strNameBuff[256];
m_strLocation.ToUpper();
GetComputerName(strNameBuff, &nSize);
// Call COM service to create an instance of the remote COM server object.
if(m_strLocation == _T("LOCAL") || m_strLocation == _T("Local") ||
m_strLocation == strNameBuff)
{
si.pwszName = NULL;
nConnCLSCTX = CLSCTX_LOCAL_SERVER;
}
else
{
strTmp = m_strLocation;
si.pwszName = strTmp;
nConnCLSCTX = CLSCTX_REMOTE_SERVER;
}
hr = CoCreateInstanceEx(CLSID_TestIntf, NULL, nConnCLSCTX, &si, 1, &qi);
if(FAILED(hr))
{
MessageBox(_T("Test Com Server Event Initialize Failure"),
_T("ServerIntfCtrl Failed CoCreateInstanceEx"), MB_OK);
ATLTRACE(_T("CoCreateInstanceEx failed"));
return hr;
}
_ASSERT(qi.pItf != NULL);
if(FAILED(qi.hr))
{
ATLTRACE(_T("Failed to connect to server"));
return qi.hr;
}
m_pTstComSvr = (ITestIntf*)qi.pItf;
ATLASSERT(m_pTstComSvr != NULL);
char str[100];
m_pTstComSvrSink = new CTstComSvrEventSink(this);
hr = m_pTstComSvrSink->DispEventAdvise(qi.pItf);
if(FAILED(hr))
{
sprintf(str, "TstComSvr Event Advise Error 0x%X", hr);
MessageBox(A2OLE(str), _T("Tst Com Server Failure"), MB_OK);
}
else
{
m_blnConnected = TRUE;
if(m_pTstComSvr)
m_pTstComSvr->Login(Dlg.m_strUser, Dlg.m_strPass);
}
}
}
return S_OK;
}
Hope this is enough info.
Thanks,
--
DR Bellavance