ATL控件怎样WEB中支持事件?? 在线等待 高分相送


哪位高手能告之我的代码的问题在哪里???
我的控件支持IProvideClassInfo和IProvideClassInfo2接口,控件巳运行至MessageBox()但不处理WEB中脚本语言,请问这是为什么??
代码如下:template <class T>
class CProxy_IHssj : public IConnectionPointImpl<T, &DIID__IHssj, CComDynamicUnkArray>
{
//Warning this class may be recreated by the wizard.
public:
HRESULT Fire_Test()
{
   CComVariant varResult;
   T* pT = static_cast<T*>(this);
   int nConnectionIndex;
   int nConnections = m_vec.GetSize();   for (nConnectionIndex = 0; nConnectionIndex < nConnections; nConnectionIndex++)
   {
   pT->Lock();
   CComPtr<IUnknown> sp = m_vec.GetAt(nConnectionIndex);
   pT->Unlock();
   IDispatch* pDispatch = reinterpret_cast<IDispatch*>(sp.p);
   if (pDispatch != NULL)
   {
  VariantClear(&varResult);
DISPPARAMS disp = { NULL, NULL, 0, 0 };
pDispatch->Invoke(0x2, IID_NULL, LOCALE_USER_DEFAULT,   DISPATCH_METHOD, &disp, &varResult, NULL, NULL);
::MessageBox(NULL,"test12",NULL,MB_OK);
   }
}
return varResult.scode;
}
};
........
class ATL_NO_VTABLE CTest : 
public CComObjectRootEx<CComMultiThreadModel>,
public IConnectionPointContainerImpl<CTest>,
public IProvideClassInfo2Impl< &CLSID_Test, &DIID__ITestEvent, &LIBID_TestLib>,
public CProxy_ITestEvent< CTest >BEGIN_COM_MAP(CHsyh)
         ....
COM_INTERFACE_ENTRY(IConnectionPointContainer)
  COM_INTERFACE_ENTRY(IProvideClassInfo)
         COM_INTERFACE_ENTRY(IProvideClassInfo2)
  COM_INTERFACE_ENTRY_IMPL(IConnectionPointContainer)
END_COM_MAP()