Donald,
I don't have the sample code in front of me, but I don't think you want a BSTR* try just BSTR instead.
>Idl = [id(2), helpstring("method OneWord")] HRESULT OneWord([in] BSTR cParseStr, [out] BSTR* retval);
>
>.h = STDMETHOD(OneWord)(/*[in]*/ BSTR cParseStr, /*[out]*/ BSTR* retval);
>
>.CPP = STDMETHODIMP CStringin::OneWord(BSTR cParseStr, BSTR *retval)