调用com.word组件实现word文档转化为pdf文档(word转pdf)

By admin at 2019-09-07 • 0人收藏 • 1702人看过
import win.ui;
/*DSG{{*/
var winform = win.form(text="aardio form";right=759;bottom=469)
winform.add(
button={cls="button";text="Button";left=121;top=179;right=351;bottom=268;z=1}
)
/*}}*/

import console
console.open()
import com

winform.button.oncommand = function(id,event){

    word = com.CreateObject("Word.Application");
    word.Visible = false
    path = io.fullpath( "C:\Users\popdes\Desktop\test.doc")
    mydoc  = word.Documents.open(path)
    mydoc.visible = false
    mydoc.ActiveDocument = true;
    mydoc.SaveAs("C:\Users\popdes\Desktop\test.pdf",17/*_wdFormatPDF*/);
    mydoc.Close();
    word.Quit();

}

winform.show() 
win.loopMessage();

以上参考于:https://www.oschina.net/question/1384894_155724

image.png


4 个回复 | 最后更新于 2023-06-30
2023-06-29   #1

pdf  转换 word 应该怎么写呢?

2023-06-30   #2

回复#1 @conglogo :

把代码倒过来写就行了

2023-06-30   #3

还真可以这样, 

word = com.CreateObject("Word.Application");
word.Visible = false
path = io.fullpath( "C:\Users\xxx\Desktop\CAT1023WI.pdf")
mydoc  = word.Documents.open(path)
mydoc.visible = false
mydoc.ActiveDocument = false;
mydoc.SaveAs("C:\Users\xxx\Desktop\CAT1023WI.doc",0/*_wdFormatDocument*/);
mydoc.Close();
word.Quit();

image.png

2023-06-30   #4

登录后方可回帖

登 录
信息栏
 私人小站

本站域名

ChengXu.XYZ

投诉联系:  popdes@126.com



快速上位机开发学习,本站主要记录了学习过程中遇到的问题和解决办法及上位机代码分享

这里主要专注于学习交流和经验分享.
纯私人站,当笔记本用的,学到哪写到哪.
如果侵权,联系 Popdes@126.com

友情链接
Aardio官方
Aardio资源网


才仁机械


网站地图SiteMap

Loading...