document covert to PDF (macro / commander)…

document covert to PDF (macro / commander)…

利用 OpenOffice (macro) 將文件轉成 PDF …

PS:

1.因資料來源忘記從那來,如果有人知道,歡迎告知、指教…

2.不要問我macro的問題,因為本人不懂,我只是捨人牙慧…

—視環境,要做適當調整

set oo_path=%programfiles%\openoffice.org 3\program

for %%f in (*.xls) do “%oo_path%\soffice.exe” -invisible “macro:///standard.module1.convertwordtopdf(“%cd%%%f”)”
for %%f in (*.tif) do “%oo_path%\soffice.exe” -invisible “macro:///standard.module1.convertwordtopdf(“%cd%%%f”)”
for %%f in (*.jpg) do “%oo_path%\soffice.exe” -invisible “macro:///standard.module1.convertwordtopdf(“%cd%%%f”)”
for %%f in (*.doc) do “%oo_path%\soffice.exe” -invisible “macro:///standard.module1.convertwordtopdf(“%cd%%%f”)”
for %%f in (*.ppt) do “%oo_path%\soffice.exe” -invisible “macro:///standard.module1.convertwordtopdf(“%cd%%%f”)”

dir *.pdf