将doc文件批量转为pdf文件

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

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

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

于是决定自己写一个，

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

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

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

1. void CTestDocDlg::OnBnClickedButton1()
2. {
3. _beginthreadex(NULL, 0, convertThread, this, 0, NULL);
4. //StartConvert(m_FileSrc);
5. }
6. void CTestDocDlg::OnBnClickedButton2()
7. {
8. // TODO: 在此添加控件通知处理程序代码
9. TCHAR Buffer[MAX_PATH];
10. BROWSEINFO bi;
11. ZeroMemory(&bi, sizeof(BROWSEINFO));
12. bi.hwndOwner = m_hWnd;
13. bi.ulFlags = BIF_RETURNONLYFSDIRS ;    //要求返回文件系统的目录
14. bi.pszDisplayName = Buffer;            //此参数如为NULL则不能显示对话框
15. bi.lpszTitle = _T("请选择文件夹");
16. bi.lpfn = NULL;
17. bi.iImage=IDR_MAINFRAME;
18. LPITEMIDLIST pIDList = SHBrowseForFolder(&bi);//调用显示选择对话框
19. if(pIDList)
20. {
21. SHGetPathFromIDList(pIDList, Buffer);
22. //取得文件夹路径到Buffer里
23. UpdateData(FALSE);
24. m_FileSrc = Buffer;//将文件夹路径保存在一个CString对象里
25. if(m_FileSrc != "" && m_FileSrc.GetAt(m_FileSrc.GetLength() - 1) != '\\')
26. m_FileSrc += "\\";
27. m_destPath.SetWindowText(m_FileSrc);
28. }
29. else
30. {
31. }
32. }
33. int CTestDocDlg::StartConvert(CString path)
34. {
35. CFileFind fileFinder;
36. CString filePth = path + _T("*.doc");
37. BOOL bFinished = fileFinder.FindFile(filePth);
38. // 先搜集文件信息，保存起来，再集中处理！
39. while(bFinished)
40. {
41. bFinished = fileFinder.FindNextFile();
42. CString fileName = fileFinder.GetFileName();
43. AddFileInfo(fileName.GetBuffer(0));
44. //ConvertFile(path + fileName);
45. }
46. fileFinder.Close();
47. std::vector<std::string>::iterator theIter;
48. for(theIter  = m_vecFileName.begin(); theIter != m_vecFileName.end(); theIter++)
49. {
50. ConvertFile(path + theIter->c_str());
51. }
52. return 0;
53. }
54. int CTestDocDlg::ConvertFile(CString szFileName)
55. {
56. CApplication app;
57. app.CreateDispatch("WPS.APPLICATION");
58. //app.SetVisible(TRUE);
59. //app.doc
60. app.put_Visible(FALSE);
61. CDocuments docs = app.get_Documents();
62. CDocument0 doc = docs.Open(szFileName, FALSE, TRUE, FALSE, NULL, NULL, TRUE, NULL, NULL, 0, 0, FALSE, FALSE, 0, FALSE);
63. CString pdfName = szFileName;
64. pdfName.Replace("doc", _T("pdf"));
65. doc.ExportPdf(pdfName, NULL, NULL);
66. //docs.Close(NULL, NULL, NULL);
67. //doc.Close(NULL, NULL, NULL);
68. COleVariant vtOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR),
69. vtTrue((short)TRUE),
70. vtFalse((short)FALSE);
71. doc.Close(vtFalse, vtOptional, vtOptional);
72. return 0;
73. }
74. unsigned int WINAPI CTestDocDlg::convertThread(void *pParam)
75. {
76. CoInitialize(NULL);
77. ((CTestDocDlg *)pParam)->ReadConvert();
78. ::CoUninitialize();
79. return 0;
80. }
81. int CTestDocDlg::ReadConvert()
82. {
83. StartConvert(m_FileSrc);
84. return 0;
85. }
86. void CTestDocDlg::AddFileInfo(CString strFileName)
87. {
88. m_vecFileName.push_back(strFileName.GetBuffer(0));
89. }

后面才知道原来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