::CoInitialize(NULL);
try{
CString ConnStr =  "Provider=SQLOLEDB.1 ;Persist Security Info=False;Initial Catalog=ObjCS;Data Source=FINDER";
CString userid =  "sa" ;   CString paswd =  "mypaswd" ; CString TableName =  "THandleAttr" ;
HRESULT hr;
_variant_t vCn;
_ConnectionPtr Cn;
_RecordsetPtr Rs;
_CommandPtr Cmnd;
// Connect
hr = Cn.CreateInstance(__uuidof(Connection));   if(FAILED(hr)) throw _com_error(hr);
hr = Cn->Open(_bstr_t(ConnStr),_bstr_t(userid),_bstr_t(paswd),adConnectUnspecified);
Cn->CursorLocation = adUseServer;//Cn->CursorLocation = adUseClient;
//
// CREATE TABLE TTmp
hr = Cmnd.CreateInstance(__uuidof(Command));   	if(FAILED(hr)) throw _com_error(hr);
Cmnd->ActiveConnection = Cn;
Cmnd->CommandType = adCmdText;
Cmnd->CommandText = _bstr_t( "CREATE TABLE TTmp (F_ID int NOT NULL DEFAULT 0 )");
Cmnd->Execute(&vtMissing,&vtMissing,adCmdText);
//
// ПОПЫТКА Reconnect
Cmnd = NULL; Cn->Close(); Cn = NULL;
::CoUninitialize();
Sleep( 1000 );
::CoInitialize(NULL);
hr = Cn.CreateInstance(__uuidof(Connection));   if(FAILED(hr)) throw _com_error(hr);
hr = Cn->Open(_bstr_t(ConnStr),_bstr_t(userid),_bstr_t(paswd),adConnectUnspecified);
Cn->CursorLocation = adUseServer;//Cn->CursorLocation = adUseClient;
//
// OPEN NEW TABLE TTmp & AddNew
hr = Rs.CreateInstance(__uuidof(Recordset));	if(FAILED(hr)) throw _com_error(hr);
Rs->CursorLocation = adUseServer; //Rs->CursorLocation = adUseClient; 
Rs->CursorType = adOpenKeyset;
Rs->LockType  = adLockBatchOptimistic;
vCn = Cn.GetInterfacePtr();
hr = Rs->Open(_bstr_t( "TTmp" ),vCn,adOpenKeyset, adLockBatchOptimistic, adCmdTable);
if(FAILED(hr)) throw _com_error(hr);
//
// От AddNew идет исключение: !!!!!!
Rs->AddNew();  // Error: Item cannot be found in the collection corresponding to the requested name or ordinal
//	...SetValue; Rs->UpdateBatch(adAffectCurrent);
Rs->Close();
Cn->Close();
}
catch(_com_error e)
...
::CoUninitialize();	

CString ConnStr =  "Provider=SQLOLEDB.1 ;Persist Security Info=False;Initial Catalog=ObjCS;Data Source=FINDER";
CString userid =  "sa" ;   CString paswd =  "empires" ; CString TableName =  "THandleAttr" ;
HRESULT hr;   _variant_t vCn;   _ConnectionPtr Cn;
_RecordsetPtr Rs;   _CommandPtr Cmnd;
// Connect
hr = Cn.CreateInstance(__uuidof(Connection));   if(FAILED(hr)) throw _com_error(hr);
hr = Cn->Open(_bstr_t(ConnStr),_bstr_t(userid),_bstr_t(paswd),adConnectUnspecified);
Cn->Execute(_bstr_t( "CREATE TABLE TTmp (F_ID int IDENTITY (1 , 1 ) NOT NULL PRIMARY KEY CLUSTERED,F_S int NOT NULL DEFAULT  0 )"),&vtMissing,adCmdText);
// OPEN NEW TABLE TTmp & AddNew
hr = Rs.CreateInstance(__uuidof(Recordset));	if(FAILED(hr)) throw _com_error(hr);
Rs->CursorLocation = adUseServer; //Rs->CursorLocation = adUseClient; 
vCn = Cn.GetInterfacePtr();
hr = Rs->Open(_bstr_t( "TTmp" ),vCn,adOpenKeyset, adLockBatchOptimistic, adCmdTable);
if(FAILED(hr)) throw _com_error(hr);
// Exception !!!
Rs->AddNew();  // Error: Item cannot be found in the collection corresponding to the requested name or ordinal
//	...SetValue; Rs->UpdateBatch(adAffectCurrent);
Rs->Close();
Cn->Close();