初学者问题:关于automation中如何使acad.exe进程可视......

Question

我用VC中通过引入autocad的类型库后,为何无法显示已执行的acad.exe?请高手帮忙呀......以下是其代码:
  //      IAcadApplication m_cadApp;在对话框类中声明,以下代码也是在对话框类中调用
   LPUNKNOWN lpUnk;
LPDISPATCH lpDispatch;
LPDISPATCH lpDocDisp;
LPDISPATCH lpLineDisp;
CLSID clsid;
COleException e;
if(CLSIDFromProgID(OLESTR("AutoCAD.Application"),&clsid)!=S_OK)
{
AfxMessageBox("不能得到注册对象");
EndDialog(IDABORT);
return ;
}

if (GetActiveObject(clsid, NULL, &lpUnk) ==S_OK)
{
HRESULT hr = lpUnk->QueryInterface(IID_IDispatch,
(LPVOID*)&lpDispatch);
lpUnk->Release();
if (hr == NOERROR)
m_cadApp.AttachDispatch(lpDispatch, TRUE);
}
// if not dispatch ptr attached yet, need to create one
if (m_cadApp.m_lpDispatch == NULL &&
!m_cadApp.CreateDispatch(clsid, &e))
{
AfxMessageBox("不能创建新对象");
                  EnableDialog(IDABORT);
                  return;
} //试图使它可见,代码就在这里出错,但acad.exe进程已成功调入
m_cadApp.SetVisible(TRUE); 
    }