将doc文件批量转为pdf文件

需要将不少doc文件转为pdf,WPS带有这种功能，但是鼠标点击次数太多以后整个人都变得很烦躁

用了一下午去搜这方面的工具软件，找到若干。有一些免费，有一些试用的，但总归就找到一个真正能用，虽说生成的文件名中有未授权字样，但批量修改文件名简单多了。

谁知道到了实验室的电脑上因为什么打印机错误，还是不能用！

于是决定自己写一个，

第二天上午开始搜资料，乱搜一阵，居然发现WPS有二次开发的功能，大喜

但是，没有C++开发接口的资料，而且官方论坛的C++例子是针对老版本的。

于是参考别人写的C#和VB的例子，在那摸索一阵，总算完事。

  

void CTestDocDlg::OnBnClickedButton1()
{
    _beginthreadex(NULL, 0, convertThread, this, 0, NULL);
    //StartConvert(m_FileSrc);
}


void CTestDocDlg::OnBnClickedButton2()
{
    // TODO: 在此添加控件通知处理程序代码

    TCHAR Buffer[MAX_PATH];
    BROWSEINFO bi;
    ZeroMemory(&bi, sizeof(BROWSEINFO));
    bi.hwndOwner = m_hWnd;
    bi.ulFlags = BIF_RETURNONLYFSDIRS ;    //要求返回文件系统的目录

    bi.pszDisplayName = Buffer;            //此参数如为NULL则不能显示对话框
    bi.lpszTitle = _T("请选择文件夹");
    bi.lpfn = NULL;
    bi.iImage=IDR_MAINFRAME;

    LPITEMIDLIST pIDList = SHBrowseForFolder(&bi);//调用显示选择对话框
    if(pIDList)
    {
        SHGetPathFromIDList(pIDList, Buffer);
        //取得文件夹路径到Buffer里
        UpdateData(FALSE);

        m_FileSrc = Buffer;//将文件夹路径保存在一个CString对象里
        if(m_FileSrc != "" && m_FileSrc.GetAt(m_FileSrc.GetLength() - 1) != '\\')
            m_FileSrc += "\\";
        m_destPath.SetWindowText(m_FileSrc);


    }
    else
    {

    }
}

int CTestDocDlg::StartConvert(CString path)
{
    CFileFind fileFinder;
    CString filePth = path + _T("*.doc");

    BOOL bFinished = fileFinder.FindFile(filePth);

    // 先搜集文件信息，保存起来，再集中处理！
    while(bFinished)
    {
        bFinished = fileFinder.FindNextFile();
        CString fileName = fileFinder.GetFileName();
        AddFileInfo(fileName.GetBuffer(0));
        //ConvertFile(path + fileName);
    }
    fileFinder.Close();

    std::vector<std::string>::iterator theIter;
    for(theIter  = m_vecFileName.begin(); theIter != m_vecFileName.end(); theIter++)
    {
        ConvertFile(path + theIter->c_str());
    }

    return 0;
}

int CTestDocDlg::ConvertFile(CString szFileName)
{
    CApplication app;
    app.CreateDispatch("WPS.APPLICATION");
    //app.SetVisible(TRUE);
    //app.doc
    app.put_Visible(FALSE);
    CDocuments docs = app.get_Documents();
    CDocument0 doc = docs.Open(szFileName, FALSE, TRUE, FALSE, NULL, NULL, TRUE, NULL, NULL, 0, 0, FALSE, FALSE, 0, FALSE);
    CString pdfName = szFileName;
    pdfName.Replace("doc", _T("pdf"));
    doc.ExportPdf(pdfName, NULL, NULL);
    //docs.Close(NULL, NULL, NULL);
    //doc.Close(NULL, NULL, NULL);
    COleVariant vtOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR),
        vtTrue((short)TRUE),
        vtFalse((short)FALSE);
    doc.Close(vtFalse, vtOptional, vtOptional);
    return 0;
}

unsigned int WINAPI CTestDocDlg::convertThread(void *pParam)
{
    CoInitialize(NULL);
    ((CTestDocDlg *)pParam)->ReadConvert();
    ::CoUninitialize();
    return 0;
}

int CTestDocDlg::ReadConvert()
{
    StartConvert(m_FileSrc);
    return 0;
}

void CTestDocDlg::AddFileInfo(CString strFileName)
{
    m_vecFileName.push_back(strFileName.GetBuffer(0));
}

 

后面才知道原来C++版本的WPS二次开发，接口也是参考WORD的！！！

参考http://stackoverflow.com/questions/145573/creating-opening-and-printing-a-word-file-from-c

 

2014/03/22 10:32

 

总算是解决了文档关闭问题（转PDF）

不关闭的话，doc文件一直被占用，

但调用close函数总是失败，后面参考

http://support.microsoft.com/kb/220911/en-us

重新构造了close函数参数，总算是解决了

 

2014/03/22 11:05

把转换代码放在线程中打开文件总是失败，

后面线程总算是解决了，换了个初始化COM的函数，另外每个线程都要进行初始化！

原始是因为COM组件和线程的关联原因

参考了http://support.microsoft.com/kb/238393/en-us

http://www.qtcn.org/bbs/simple/?t31216.html