WPS文件批量轉換成PDF

2021-10-18 17:16:15 字數 1804 閱讀 5628

年初儲存的大量wps文件,需要轉換成pdf格式,起初使用wps等軟體逐個轉換,實在是太麻煩了。上網搜尋了相關軟體,令人失望一直沒有找到合適的軟體,雖有word轉換pdf的,但對word版本有要求,更重要的是不支援wps字尾的檔案,於是決定自己動手用vb.net寫乙個。**如下:

private

sub cmdrun_click(

byval sender as

system.object

,byval e as

system.eventargs)

handles cmdrun.click

trydim mypath = textboxpath.text

dim wpsno as int16 =

0dim filenames()as

string

if textboxpath.text

<>

""then

for each myfile in

system.io.directory.getfiles(mypath)

textboxpath.text

=system.io.path.getfilename(myfile)

'文字框顯示正在轉換的不含路徑的檔名稱

filenames = split(myfile,

".")

'將檔名分為字首和字尾

if filenames.length=2

then

'判斷分離的陣列是否是字首和字尾,防止出現無字尾的檔案執行出錯和多個.的檔案。

if filenames(1)

="wps"

or filenames(1)

="doc"

or filenames(1)

="txt"

or filenames(1)

="docx"

or filenames(1)

="rtf"

or filenames(1)

="wpt"

or filenames(1)

="dot"

or filenames(1)

="dotx"

or filenames(1)

="dotm"

or filenames(1)

="xml"

or filenames(1)

="mht"

or filenames(1)

="mhtl"

or filenames(1)

="html"

or filenames(1)

="htm"

or filenames(1)

="uof"

then

'開啟檔案

(myfile)

'接受所有的修改))

'儲存檔案

'轉換成pdf0)

+".pdf"

, word.wdexportformat.wdexportformatpdf)()

wpsno = wpsno +

1end

ifend

ifnext

else

msgbox("請選擇資料夾!")

endif

catch ex as exception

msgbox(ex.message)

endtry

注意:執行環境須安裝wps,並在環境中新增wps api庫

方法:開啟專案—>引用—>新增引用—>瀏覽—>在wps系統目錄找到wpsapi.dll(wps文字) 或etapi.dll(wps**)

C 實現文件轉換成PDF

網上有很多將doc ppt xls等型別的文件轉換成pdf的方法,目前了解到的有兩大類 1.使用虛擬印表機將doc ppt xls等型別的文件 2.使用office com元件 我採用了第二種方法實現,初步測試通過,還沒有放到伺服器上進行批量實時轉換的測試。下面開始介紹詳細步驟 1.安裝office...

PDF轉換成Word 文件新思路

最近總是有很多需要閱讀的書籍啊,啊,亂七八糟的東西,而這種東西一般都是pdf格式的,大部分都是只能看不能摸的東西,作為一名cv工程師,怎麼能夠頂得住這種東西呢。於是就在網上找啊找啊,找那些免費的,能夠使用的,免費pdf轉換成word的工具。結果!我找不到。嘻嘻 在鬱悶之下,我找到了新思路 假的 那些...

pdf型別的文件怎麼轉換成txt

雖然說pdf文件的標準性給不少閱讀者提供了方便,但也給編輯文字者帶來了許多麻煩。回憶起當時畢業 設計的文段,簡直痛苦的要命。竟然傻到用print screen擷取畫面到畫圖板,再回粘到txt中,夠白了。最近接到公司內部的安排,要求將客戶傳來的資料轉成txt格式,為了能不被折磨,我花費了乙個晚上的時間...