11

我正在开发一个 C++ 应用程序来从 Excel 文件中读取一些数据。我已经让它工作了,但我对一个部分感到困惑。这是代码(简化为仅读取第一个单元格)。

//Mostly copied from http://www.codeproject.com/KB/wtl/WTLExcel.aspx

#import "c:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLL"
#import "c:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB"
#import "C:\Program Files\Microsoft Office\Office11\excel.exe" rename ("DialogBox","ExcelDialogBox") rename("RGB","ExcelRGB") rename("CopyFile", "ExcelCopyFile") rename("ReplaceText", "ExcelReplaceText") exclude("IFont", "IPicture")

_variant_t varOption((long) DISP_E_PARAMNOTFOUND, VT_ERROR);

int _tmain(int argc, _TCHAR* argv[])
{
    DWORD dwCoInit = 0;
    CoInitializeEx(NULL, dwCoInit);
    Excel::_ApplicationPtr pExcel;    
    pExcel.CreateInstance(_T("Excel.Application"));
    Excel::_WorkbookPtr pBook;
    pBook = pExcel->Workbooks->Open("c:\\test.xls", varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption);
    Excel::_WorksheetPtr pSheet = pBook->Sheets->Item[1];
    Excel::RangePtr pRange = pSheet->GetRange(_bstr_t(_T("A1")));
    _variant_t vItem = pRange->Value2;
    printf(_bstr_t(vItem.bstrVal));    
    pBook->Close(VARIANT_FALSE);
    pExcel->Quit();
    //CoUninitialize();
    return 0;
}

我必须注释掉对 CoUninitialize 的调用才能使程序正常工作。当取消注释 CoUninitialize 时,我在程序退出时的 comip.h 中的 _Release 函数中遇到访问冲突。

这是来自 comip.h 的代码,值得一看。

void _Release() throw()
{
    if (m_pInterface != NULL) {
        m_pInterface->Release();
    }
}

我对 COM 编程不是很有经验,所以我可能缺少一些明显的东西。

  1. 为什么调用 CoUninitialize 会导致异常?

  2. 不调用 CoUninitialize 的后果是什么?

  3. 我在这里做错了什么吗?

4

4 回答 4

17

您遇到的问题是范围之一。简短的回答是将 CoInit 和 CoUninit 从 Ptrs 移到外部范围。例如:

//Mostly copied from http://www.codeproject.com/KB/wtl/WTLExcel.aspx

#import "c:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLL"
#import "c:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB"
#import "C:\Program Files\Microsoft Office\Office11\excel.exe" rename ("DialogBox","ExcelDialogBox") rename("RGB","ExcelRGB") rename("CopyFile", "ExcelCopyFile") rename("ReplaceText", "ExcelReplaceText") exclude("IFont", "IPicture")

_variant_t varOption((long) DISP_E_PARAMNOTFOUND, VT_ERROR);

int _tmain(int argc, _TCHAR* argv[])
{
    DWORD dwCoInit = 0;
    CoInitializeEx(NULL, dwCoInit);
    {
        Excel::_ApplicationPtr pExcel;    
        pExcel.CreateInstance(_T("Excel.Application"));
        Excel::_WorkbookPtr pBook;
        pBook = pExcel->Workbooks->Open("c:\\test.xls", varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption, varOption);
        Excel::_WorksheetPtr pSheet = pBook->Sheets->Item[1];
        Excel::RangePtr pRange = pSheet->GetRange(_bstr_t(_T("A1")));
        _variant_t vItem = pRange->Value2;
        printf(_bstr_t(vItem.bstrVal));    
        pBook->Close(VARIANT_FALSE);
        pExcel->Quit();
    }
    CoUninitialize();
    return 0;
}

更长的答案是 Ptrs 析构函数(调用 Release)在从 main 退出时被调用。这是在 CoUnit 之后,它基本上关闭了您的应用程序和 COM 对象之间的通信通道。

不调用 CoUnit 的后果是什么?对于短暂的进程内 COM 服务器,确实没有任何负面影响。

于 2010-04-16T15:09:02.013 回答
5

一个优雅的解决方案是将 CoInitializeEx 和 CoUninitialize 放在它们自己的类中。请参阅这篇Raymond Chen 的文章

于 2010-10-09T23:54:40.347 回答
2

的意思CoInitialize是让你的线程进入一个公寓;并CoUninitialize从公寓中删除您的线程。

当您不在公寓中时使用接口指针会导致问题,因为您只能在创建它的公寓中使用原始接口指针。(您可以将接口指针编组到另一个公寓,以便在另一个公寓中使用它公寓)。

当您通过接口指针进行调用,并且对象驻留在另一个单元中(在这种情况下是正确的)时,您的接口指针会调用单元中的代理对象,然后通过 RPC 与目标单元中的存根进行通信. 如果你离开了公寓(通过做CoUninitialize),那么这个交通工具将不再可用,从而导致你的错误。

如果偶尔使用进程内服务器,您可以在调用 Release 之前执行 CoUninitialize,因为不涉及传输层,但这不是一个好主意。

顺便说一句,第二个参数CoInitialize指定您是要进入一个 STA(即您的线程将是您公寓中的唯一线程;并且当您这样做时会创建一个新公寓),还是 MTA(其中每个进程都有一个) )。

选项分别是COINIT_APARTMENTTHREADEDCOINIT_MULTITHREADED;您指定0了实际上是COINIT_MULTITHREADED. 恕我直言,在代码中使用符号名称而不是幻数会更清楚。

于 2014-08-25T23:25:00.860 回答
0

0 不是COINIT_MULTITHREADED。0 是COINIT_APARTMENTTHREADED. 参考https://docs.microsoft.com/en-us/windows/win32/api/objbase/ne-objbase-coinit

于 2020-09-30T10:31:16.023 回答