VC如何调用Adobe Acrobat将office转pdf

[paodan]

VC如何调用Adobe Acrobat将office（word,excel,ppt）转pdf,java实现也可以。

[WaistCoat16]

没弄过。

官网关于二次开发：http://livedocs.adobe.com/acrobat_sdk/9/Acrobat9_HTMLHelp/wwhelp/wwhimpl/js/html/wwhelp.htm?&accessible=true

[大熊猫侯佩]

没搞过，adobe官网应该有SDK吧？

[oyljerry]

variant_t vFileName(m_strPdfFile);
_variant_t vOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR);
_variant_t vTrue(VARIANT_TRUE);
_variant_t vFalse(VARIANT_FALSE);
_variant_t vCopies((short)1);
_variant_t vRange((short)0);

m_pWord->ActivePrinter = (_bstr_t)"Adobe PDF";

m_pWord->PrintOut (
/*[in] VARIANT * Background = &vtMissing*/ &vFalse ,
/*[in] VARIANT * Append = &vtMissing*/&vFalse ,
/*[in] VARIANT * Range = &vtMissing*/ &vRange ,
/*[in] VARIANT * OutputFileName = &vtMissing*/&vFileName ,
/*[in] VARIANT * From = &vtMissing*/ &vOptional,
/*[in] VARIANT * To = &vtMissing*/ &vOptional,
/*[in] VARIANT * Item = &vtMissing*/ &vOptional,
/*[in] VARIANT * Copies = &vtMissing*/&vCopies ,
/*[in] VARIANT * Pages = &vtMissing*/ &vOptional,
/*[in] VARIANT * PageType = &vtMissing*/&vOptional ,
/*[in] VARIANT * PrintToFile = &vtMissing*/ &vFalse,
/*[in] VARIANT * Collate = &vtMissing*/ &vOptional,
/*[in] VARIANT * FileName = &vtMissing*/ &vOptional,
/*[in] VARIANT * ActivePrinterMacGX = &vtMissing*/ &vOptional,
/*[in] VARIANT * ManualDuplexPrint = &vtMissing*/&vOptional) ;

[paodan]

[Quote=引用 3 楼 oyljerry 的回复:]
variant_t  vFileName(m_strPdfFile); 
  _variant_t  vOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR); 
  _variant_t  vTrue(VARIANT_TRUE); 
  _variant_t  vFalse(VARIANT_FALSE); 
  _variant_t  vCopies((short)1); 
  _variant_t  vRange((short)0); 
   
  m_pWord->ActivePrinter  =  (_bstr_t)"Adobe  PDF"; 
   
  m_pWord->PrintOut  ( 
  /*[in]  VARIANT  *  Background  =  &vtMissing*/  &vFalse  , 
  /*[in]  VARIANT  *  Append  =  &vtMissing*/&vFalse  , 
  /*[in]  VARIANT  *  Range  =  &vtMissing*/  &vRange  , 
  /*[in]  VARIANT  *  OutputFileName  =  &vtMissing*/&vFileName  , 
  /*[in]  VARIANT  *  From  =  &vtMissing*/  &vOptional, 
  /*[in]  VARIANT  *  To  =  &vtMissing*/  &vOptional, 
  /*[in]  VARIANT  *  Item  =  &vtMissing*/  &vOptional, 
  /*[in]  VARIANT  *  Copies  =  &vtMissing*/&vCopies  , 
  /*[in]  VARIANT  *  Pages  =  &vtMissing*/  &vOptional, 
  /*[in]  VARIANT  *  PageType  =  &vtMissing*/&vOptional  , 
  /*[in]  VARIANT  *  PrintToFile  =  &vtMissing*/  &vFalse, 
  /*[in]  VARIANT  *  Collate  =  &vtMissing*/  &vOptional, 
  /*[in]  VARIANT  *  FileName  =  &vtMissing*/  &vOptional, 
  /*[in]  VARIANT  *  ActivePrinterMacGX  =  &vtMissing*/  &vOptional, 
  /*[in]  VARIANT  *  ManualDuplexPrint  =  &vtMissing*/&vOptional)  ; 

[/Quote]m_pWord是什么类型的指针？_Application?Documents?_Document?这三个我都查了，没有ActivePrinter这个属性

[paodan]

[Quote=引用 3 楼 oyljerry 的回复:]
   
  m_pWord->ActivePrinter  =  (_bstr_t)"Adobe  PDF"; 
   
  m_pWord->PrintOut  (...)
 
[/Quote]试了一下，应该是Application.SetActivePrinter("Adobe PDF");//设置打印机
Doucument.Printout(...);

[paodan]

我转化后生成的pdf文件打开时说格式错误，这是怎么回事

[hanwangabc]

[Quote=引用 6 楼 paodan 的回复:]
我转化后生成的pdf文件打开时说格式错误，这是怎么回事
[/Quote]Doucument.Printout(...);生成的是ps文件，需要Acrobat Distiller把ps转换为pdf格式，网上找了一些资料，你看一下http://topic.csdn.net/t/20031106/13/2433410.html，我也没做过

[paodan]

[Quote=引用 7 楼 hanwangabc 的回复:]
引用 6 楼 paodan 的回复:
我转化后生成的pdf文件打开时说格式错误，这是怎么回事
Doucument.Printout(...);生成的是ps文件，需要Acrobat Distiller把ps转换为pdf格式，网上找了一些资料，你看一下http://topic.csdn.net/t/20031106/13/2433410.html，我也没做过
[/Quote]我试验了一下，

  //_Document m_doc;
  m_doc.PrintOut  (  
  /*[in]  VARIANT  *  Background  =  &vtMissing*/  &vFalse  ,  
  /*[in]  VARIANT  *  Append  =  &vtMissing*/&vFalse  ,  
  /*[in]  VARIANT  *  Range  =  &vtMissing*/  &vRange  ,  
  /*[in]  VARIANT  *  OutputFileName  =  &vtMissing*/&vFileName,
  /*[in]  VARIANT  *  From  =  &vtMissing*/  &vOptional,  
  /*[in]  VARIANT  *  To  =  &vtMissing*/  &vOptional,  
  /*[in]  VARIANT  *  Item  =  &vtMissing*/  &vOptional,  
  /*[in]  VARIANT  *  Copies  =  &vtMissing*/&vCopies  ,  
  /*[in]  VARIANT  *  Pages  =  &vtMissing*/  &vOptional,  
  /*[in]  VARIANT  *  PageType  =  &vtMissing*/&vOptional  ,  
  /*[in]  VARIANT  *  PrintToFile  =  &vtMissing*/  &vFalse,  
  /*[in]  VARIANT  *  Collate  =  &vtMissing*/  &vOptional,  
  /*[in]  VARIANT  *  FileName  =  &vtMissing*/  &vOptional,  
  /*[in]  VARIANT  *  ActivePrinterMacGX  =  &vtMissing*/  &vOptional,  
  /*[in]  VARIANT  *  ManualDuplexPrint  =  &vtMissing*/&vOptional，
&vOptional，&vOptional，&vOptional);  //word2003需要18个参数

则打印出的是ps,假如不指定vFileName的话，即改为vOptional，那么程序运行时会弹出保存pdf文件的对话框，需要手工选择路径，这样能够正确生成pdf文件，但是比较麻烦，怎样自动保存到指定路径？

[paodan]

还有一个现象是打印为pdf文件完成后，后连续显示两次转化后的pdf文件，这个好像是Adobe Acrobat的问题，要是直接使用Adobe PDF打印机，右击打印word文件，完成后也出现这个现象，不知道如何避免

[paodan]

过两天结贴