#pragma warning(disable: 4146 )
#pragma warning(disable: 4192 )
#import "..\..\ExternalFiles\bin\msado15.dll" no_namespace  rename("EOF","adoEOF") rename("BOF","adoBOF") rename ("Fields", "adoFields") named_guids
//#import "C:\Program Files\Common Files\System\ado\msado21.tlb"         rename("EOF","ADOEOF") rename("BOF","ADOBOF")
#import "C:\Program Files\Common Files\System\ole db\Oledb32.dll"
#pragma warning(default: 4192 )
#pragma warning(default: 4146 )


int main(int argc, char* argv[])
{

    const char *szSql = " INSERT INTO TABLE tbl (id, text) VALUES (1, 'preved') ";

    CoInitialize(NULL);

    MSDASC::IDataSourceLocatorPtr dl = NULL;
    _ConnectionPtr pConn = NULL;
    _CommandPtr    pCmd;
    _RecordsetPtr  pRS;
    _variant_t     rowsAffected(0L);
    try
    {
        HRESULT hr = pCmd.CreateInstance( CLSID_Command );

        // call UDL dialog
        dl.CreateInstance( __uuidof(MSDASC::DataLinks) );
        pConn = dl->PromptNew();

        if( NULL == pConn )
        {
            return false;
        }
        pConn->Open( pConn->ConnectionString, L"", L"", adConnectUnspecified );

        pCmd->ActiveConnection = pConn;
        pCmd->CommandText = (_bstr_t)szSql;
        pCmd->CommandType = adCmdText;
        pCmd->CommandTimeout = NULL;

       hr = pCmd->Execute(&rowsAffected,  0 ,  0 );
       const long number_afected = rowsAffected.lVal;
     }
    catch (_com_error&)
    {
        return - 1 ;
    }
    if( pConn )
    {
        if( pConn->State == adStateOpen )
        {
           pConn->Close();
        }

    }


    CoUninitialize();
return  0 ;
}