#include <stdio.h>

#pragma warning(push)
#pragma warning(disable: 4146 )
#import "c:\Program Files\Common Files\System\Ado\msado15.dll"     rename_namespace("ADOCG") rename("EOF","EndOfFile")
using namespace ADOCG;
#pragma warning(pop)

int main(int argc, char* argv[])
{
    ::CoInitialize(NULL);
    _ConnectionPtr    spConn(__uuidof(Connection));
    _CommandPtr        spCmd("ADODB.Command");
    _RecordsetPtr    spRec(__uuidof(Recordset));

    TCHAR m_cConnectString[MAX_PATH] = 
        "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\\MyMDB.mdb;Mode=ReadWrite;Persist Security Info=False";
    TCHAR m_cRec[ 300 ]="SELECT * FROM tabl1";
    spConn->ConnectionString=m_cConnectString;
    spConn->Open("","admin","",adConnectUnspecified);
    spCmd->ActiveConnection=spConn;
    spCmd->CommandText=m_cRec;
    
    spRec->CursorLocation=adUseClient;
    spRec->Open((IDispatch*) spCmd,vtMissing,adOpenDynamic,adLockBatchOptimistic,adCmdUnspecified);
    for(spRec->MoveFirst();!spRec->EndOfFile;spRec->MoveNext())
    {
        printf("%s\n",(TCHAR*)(_bstr_t)spRec->GetFields()->GetItem(L"name1")->Value);
    }
    spRec->Close();
    spConn->Close();
    
    ::CoUninitialize();
    return  0 ;
}