ATL / WTL / STL

class ATL_NO_VTABLE CFamily : 
	public CComObjectRootEx<CComSingleThreadModel>,
	public CComCoClass<CFamily, &CLSID_Family>,
	public IDispatchImpl<IFamily, &IID_IFamily, &LIBID_TESTCOM_V6Lib>
{
public:
	CFamily()
	{
	_firstname = "Angel";
	}

DECLARE_REGISTRY_RESOURCEID(IDR_FAMILY)

DECLARE_PROTECT_FINAL_CONSTRUCT()

BEGIN_COM_MAP(CFamily)
	COM_INTERFACE_ENTRY(IFamily)
	COM_INTERFACE_ENTRY(IDispatch)
END_COM_MAP()

// IFamily
public:
	STDMETHOD(get_FirstName)(/*[out, retval]*/ BSTR *pVal);
	STDMETHOD(put_FirstName)(/*[in]*/ BSTR newVal);
private:
	CComBSTR _firstname;//this and the assignment in the constructor is the only change I made
};

// get put stuff...

STDMETHODIMP CFamily::get_FirstName(BSTR *pVal)
{
	*pVal = _firstname.Copy();
	return S_OK;
}

STDMETHODIMP CFamily::put_FirstName(BSTR newVal)
{
	_firstname.m_str = newVal;
	return S_OK;
}

#import "../debug/TestCOM_V6.dll" no_namespace

//dialog code here....

void CComTesterDlg::OnSetFirstName() 
{
	UpdateData();
	::CoInitialize(NULL);
	IFamilyPtr first;

	HRESULT hr = first.CreateInstance(__uuidof(Family));
	if (SUCCEEDED(hr))	
	first->PutFirstName(m_FirstName.AllocSysString());

	first = NULL;
	::CoUninitialize();
	
	
}

void CComTesterDlg::OnShowFirstName() 
{
	::CoInitialize(NULL);
	IFamilyPtr first;

	HRESULT hr = first.CreateInstance(__uuidof(Family));
	if (SUCCEEDED(hr))	
		m_ShowFirstName  = (char*)(first->GetFirstName());

//	::CoUninitialize();	

	UpdateData(FALSE);
}