CB6中读取OUTLOOK中的地址簿[3]

                                                exit(1);

                ulong lpcbentryid;
                entryid *lpentryid;
                hres = lpadrbook->getpab(
                &lpcbentryid,
                &lpentryid
                        );
                //_asserte(hres == s_ok);
                if (hres != s_ok)
                                                exit(2);

                ulong ulflags = mapi_best_access;
                ulong ulobjtype = null;
                //lpunknown lpunk = null;
                                        delphiinterface<iabcontainer>  lpcontainer;
                hres = lpadrbook->openentry(
                                                lpcbentryid,
                lpentryid,
                null,
                ulflags,
                &ulobjtype,
                (lpunknown far *)&lpcontainer
                        );

                ulflags = null;

                if (ulobjtype == mapi_abcont)
                {

                //iabcontainer *lpcontainer = static_cast <iabcontainer *>(lpunk);

                lpmapitable lptable = null;
                hres = lpcontainer->getcontentstable(
                ulflags,
                &lptable
                        );
                //_assert(lptable);
                ulong ulrows;
                hres = lptable->getrowcount(0,&ulrows);
                //_asserte(hres == s_ok);