COM

• As a client when I need to call into an interface for a given method to perform a specific task
  
• As a component that performs a finite task
  

1. I create an ATL project (NewArticle) and add an ATL component to it with an interface called INewArticleEvent and a method called NewArticle.
   
2. I create a new COM+ application (NewArticleApp) and add the INewArticleEvent component as an event class.
   
3. I create another ATL project (LatestUpates) and add an ATL component to it and implement the INewArticleEvent interface.
   
4. For this second component, I create a new COM+ application (LatestUpdatesApp) and add the component as a regular class (as opposed to an event class).
   
5. I add a subscription to the component and specify the INewArticle.NewArticle interface.
   
6. Now when I write code to fire the NewArticle event, the subscribing component in my LatestUpdates component is called as it should be by COM+.
   

sub Trans
  Selection.Text = COMObj->Translate(Selection.Text)
end sub

STDMETHODIMP CCPPTranslate::Translate(BSTR* pbstrText, BSTR* pbstrRet)
{
	// TODO: Add your implementation code here

	USES_CONVERSION;
	
	if (m_Translator.IsOk())
	{
		char* pszText = m_Translator.Translate(W2A(*pbstrText));
		CComBSTR ComBSTR = CComBSTR(pszText);
		
		// Must not forget to free the memory allocated in CTranslate::Translate
		delete[] pszText;
		
		*pbstrRet = ComBSTR.Detach();
		
		return S_OK;
	
	}