c++ word\\excel\\ppt转pdf .rar

c++ word\excel\ppt转pdf

#include “StdAfx.h“
#include “Converter.h“


CConverter::CConverter（void）
{
}

CConverter::~CConverter（void）
{
}

//
// Word转换成PDF
//
//
//
BOOL CConverter::Convert（CString strSourcePath CString strTargetPath MSWord::WdExportFormat wdExportFormat）
{

	BOOL						result = FALSE;
	MSWord::_ApplicationPtr		pWdApplicationPtr;
	MSWord::_DocumentPtr		pWdDocumentPtr;

	COleVariant					sourcePath = strSourcePath;
	COleVariant					targetPath = strTargetPath;
	COleVariant					vTrue（（short）TRUE）;
	COleVariant					vFalse（（short）FALSE）;
	COleVariant					vZero（（short）0）;
	COleVariant					vOptional（（long）DISP_E_PARAMNOTFOUND VT_ERROR）;

	CoInitialize（NULL）;
	try
	{
		HRESULT hResult = pWdApplicationPtr.CreateInstance（“Word.Application“）;
		if （hResult != S_OK）
		{
			AfxMessageBox（_T（“Application创建失败，请确保安装了word 2000或以上版本!“） MB_OK|MB_ICONWARNING）;
			CoUninitialize（）;
			return result;
		}
		pWdDocumentPtr = pWdApplicationPtr->Documents->Open（sourcePath 
						vTrue				// Confirm Conversion.
						vFalse				// ReadOnly.
						vFalse				// AddToRecentFiles.
						vOptional			// PasswordDocument.
						vOptional			// PasswordTemplate.
						vOptional			// Revert.
						vOptional			// WritePasswordDocument.
						vOptional			// WritePasswordTemplate.
						vOptional			// Format. // Last argument for Word 97
						vOptional			// Encoding // New for Word 2000/2002
						vFalse				// visible
						vOptional			// openAndRepair
						vZero				// docDirection
						vOptional			// NoEncodingDialog
						vOptional）;
		//pWdDocumentPtr = pWdApplicationPtr->Documents->Open2000（sourcePath 
		//						vTrue				// Confirm Conversion.
		//						vFalse				// ReadOnly.
		//						vFalse				// AddToRecentFiles.
		//						vOptional			// PasswordDocument.
		//						vOptional			// PasswordTemplate.
		//						vOptional			// Revert.
		//						vOptional			// WritePasswordDocument.
		//						vOptional			// WritePasswordTemplate.
		//						vOptional			// Format. // Last argument for Word 97
		//						vOptional			// Encoding // New for Word 2000/2002
		//						vOptional）;			// Visible

		if（pWdDocumentPtr == NULL）
		{
			CoUninitialize（）;
			return result;
		}
		hResult = pWdDocumentPtr->ExportAsFixedFormat（（_bstr_t ）strTargetPath // target path
					wdExportFormat					// export format
					FALSE							// Open After Export
					wdExportOptimizeForPrint		// Export OptimizeFor
					wdExportAllDocument			// Export Range
					0								// start page
					0								// end page
					wdExportDocumentContent		// Export Item
					TRUE							// Include Doc Props
					TRUE							// Keep IRM
					wdExportCreateWordBookmarks	// Export Create Bookmarks
					TRUE							// Doc Structure Tags
					TRUE							// Bitmap Missing Fonts
					FALSE）;							// Use ISO19005_1
		if （hResult == S_OK）
		{
			result = TRUE;
		}
	}
	catch（CException* e）
	{
		TCHAR   szError[1024];   
		e

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

    ..A..H.     94720  2020-11-21 12:44  WordToPdf\.vs\WordToPdf\v14\.suo

     文件        897  2011-03-29 17:08  WordToPdf\Backup\WordToPdf.sln

     文件      80698  2011-04-02 10:40  WordToPdf\Include\Excel\CApplicationExcel.h

     文件      46320  2011-04-02 10:13  WordToPdf\Include\Excel\CWorkbookExcel.h

     文件       8154  2011-04-02 10:13  WordToPdf\Include\Excel\CWorkbooksExcel.h

     文件      14326  2011-04-02 13:35  WordToPdf\Include\Ppt\CApplicationPpt.h

     文件      24320  2011-04-02 13:35  WordToPdf\Include\Ppt\CPresentationPpt.h

     文件       3641  2011-04-02 13:34  WordToPdf\Include\Ppt\CPresentationsPpt.h

     文件      47222  2011-04-02 13:02  WordToPdf\Include\Word\CApplicationWord.h

     文件      76809  2011-04-02 10:10  WordToPdf\Include\Word\CDocument0Word.h

     文件       8055  2011-04-02 10:08  WordToPdf\Include\Word\CDocumentsWord.h

     文件   82051072  2020-11-21 11:35  WordToPdf\ipch\WORDTOPDF-6dfc0577\WORDTOPDF-e753bedf.ipch

     文件      66560  2020-11-21 12:16  WordToPdf\Release\WordToPdf.exe

     文件    1063421  2020-11-21 12:16  WordToPdf\Release\WordToPdf.iobj

     文件     181616  2020-11-21 12:16  WordToPdf\Release\WordToPdf.ipdb

     文件    7770112  2020-11-21 12:16  WordToPdf\Release\WordToPdf.pdb

     文件      37948  2020-11-21 11:35  WordToPdf\UpgradeLog.htm

     文件       7085  2011-04-02 14:53  WordToPdf\WordToPdf\Converter.cpp

     文件       1678  2020-11-21 12:16  WordToPdf\WordToPdf\Converter.h

     文件       2799  2011-03-29 11:00  WordToPdf\WordToPdf\ReadMe.txt

     文件       6712  2011-04-02 14:53  WordToPdf\WordToPdf\Release\BuildLog.htm

     文件     607835  2020-11-21 12:16  WordToPdf\WordToPdf\Release\Converter.obj

     文件    5318521  2012-10-01 20:36  WordToPdf\WordToPdf\Release\excel.tlh

     文件    5111880  2012-10-01 20:36  WordToPdf\WordToPdf\Release\excel.tli

     文件    1212687  2012-10-01 20:34  WordToPdf\WordToPdf\Release\mso.tlh

     文件     929282  2012-10-01 20:34  WordToPdf\WordToPdf\Release\mso.tli

     文件    1231589  2012-10-01 20:36  WordToPdf\WordToPdf\Release\msppt.tlh

     文件     988309  2012-10-01 20:36  WordToPdf\WordToPdf\Release\msppt.tli

     文件    2839163  2012-10-01 20:36  WordToPdf\WordToPdf\Release\msword.tlh

     文件    2265875  2012-10-01 20:36  WordToPdf\WordToPdf\Release\msword.tli

............此处省略63个文件信息