HRESULT hr = S_OK;
if(IsOpen())
Close();
try
{
ADODB::_StreamPtr s;
s.CreateInstance(__uuidof(ADODB::Stream));
_variant_t vtType;
vtType.vt=VT_ERROR;
vtType.scode=DISP_E_PARAMNOTFOUND ;
_bstr_t bstrUserID,bstrPwd;
s->Open(vtType,
ADODB::ConnectModeEnum::adModeUnknown,
ADODB::StreamOpenOptionsEnum::adOpenStreamUnspecified,
bstrUserID,bstrPwd);
s->Type=ADODB::StreamTypeEnum::adTypeText;
s->WriteText(_bstr_t(lpstrXMLString),ADODB::StreamWriteEnum::adWriteChar);
s->Position=0;
hr = m_pRecordset->Open(_variant_t((IDispatch*)s, TRUE), vtType, ADODB::adOpenForwardOnly, ADODB::adLockOptimistic, ADODB::adCmdFile);
s->Close();
// s->Release();
s=NULL;
return hr == S_OK;
}
catch(_com_error &e)
{
dump_com_error(e);
return FALSE;
}