static TCOMCriticalSection CS;

struct ThreadParam
{
  BSTR * Str_uid;
  BSTR * Str;
  int * int_0;
  int * int_1;
  TSQLEventServiseImpl * com;
};

void _USERENTRY StartThread(void* Params)
{
  ThreadParam *tp=(ThreadParam *)Params;
  tp->com->Fire_OnSend(tp->Str_uid,tp->Str,tp->int_0,tp->int_1); // сдесь  вылетаем с ошибкой  "память неможет быть Read" 
}

STDMETHODIMP TSQLEventServiseImpl::Send(BSTR Str_uid, BSTR Str, int int_0,int int_1)
{
   HRESULT hres = S_OK;
   try
   {
     TCOMCriticalSection::Lock Lock(CS);
     //Fire_OnSend(&Str_uid,&Str,?_0,?_1); // это было раньше ...

     ThreadParam par;     // это все новое :)
     par.Str_uid = &Str_uid;
     par.Str = &Str;
     par.int_0 = ?_0;
     par.int_1 = ?_1;
     par.com = this;
     _beginthread(&StartThread ,16384 ,&par);
   }
   catch(Exception &e)
   {
     hres = Error(e.Message.c_str(),IID_ISQLEventServise,E_FAIL);
   }
   catch(...)
   {
     hres = Error(_T( "Критическая ошибка !" ),IID_ISQLEventServise,E_UNEXPECTED);
   }
   return hres;
}

STDMETHODIMP TSQLEventServiseImpl::Send(BSTR Str_uid, BSTR Str, int int_0,int int_1)

{
...
BSTR  *  s1 = Str_uid;
BSTR  *  s2 = Str;
par->Str_uid = s1;
par->Str = s2;
...