STDMETHODIMP CADOTier::AppendParameter(enum DataTypeEnum type, VARIANT value, enum ParameterDirectionEnum where, long size) { _ParameterPtr param; HRESULT hr = param.CreateInstance(__uuidof(Parameter)); if (SUCCEEDED(hr)) hr = param->put_Type(type); if (SUCCEEDED(hr)) hr = param->put_Value(value); if (SUCCEEDED(hr)) hr = param->put_Direction(where); if (SUCCEEDED(hr)) hr = param->put_Size(size); Parameters* params = 0; if (SUCCEEDED(hr)) hr = m_command->get_Parameters(¶ms); if (SUCCEEDED(hr)) hr = params->Append(param); if (SUCCEEDED(hr)) { params->Release(); param->Release(); } return hr; }