🚀 go-pugleaf

Hello to all.

(BCB6 Enterprise)

I have imported the Microsoft ActiveX Data Objects 2.8 Library, because 
i have to make an application that doesn't use ADOExpress.

I use the imported objects in this function:

HRESULT __fastcall ADODatabase::ExecuteCmd(wchar_t* CmdStr,VARIANT* pParams)
{
   HRESULT hr = -1;
   ConnectionPtr DBConn;
   CommandPtr DBCommand;
   RecordsetPtr RecTemp;

   try
   {
     hr=DBConn.CreateInstance(CLSID_Connection);
     if(SUCCEEDED(hr))
     {
       RecTemp.CreateInstance(CLSID_Recordset);
       hr = pDBCommand.CreateInstance(CLSID_Command);
       if(SUCCEEDED(hr))
       {
         DBCommand->CommandText = CmdStr;
         DBCommand->ActiveConnection = DBConn;
         RecTemp = DBCommand->Execute( TVariantInParam(1),
                              Params,
                              adCmdText);
       }

     }
   }

   catch(...)
   {
     hr = -1;
   }
   return hr;
}

but I always get a compiling error ('CommandText is not accessible').

I have edited the ADODB_TLB.h file, changing the lines where the 
property CommandText is defined to define the write part of the property 
in this way:

   __property   BSTR            CommandText = {read = get_CommandText}; 
//original line
   __property   BSTR            CommandText = {read = get_CommandText 
write = put_CommandText}; //Line modified by me

but I cannot get the command to work

I think that Tlibimp is buggy, and also is the Import type library 
option of the menu.

Any suggestion? I repeat that i cannot use ADOExpress.

Thanks in advance.