62,025
社区成员
发帖
与我相关
我的任务
分享
//var files = new var[]{"c:\\123.doc","c:\\123.pdf"}
var fso = new ActiveXObject("Scripting.FileSystemObject");
var word = new ActiveXObject("Word.Application");
var PDF = new ActiveXObject("PDFDistiller.PDFDistiller.1");
word.ActivePrinter = "MS Publisher Color Printer";
//word.
//files(0) 为WORD文档文件名
//files(1) 为,转换后需要保存的路径
//调用fso.GetBaseName(files(0))后,为无路径,无扩展名,的文件名
//files.length为文件参数的个数,使用循环可以支持多个WORD文档的转换
var docfile = "c:\\123.doc";
var psfile = "c:\\" + fso.GetBaseName(files(0)) + ".ps";
var pdffile = "c:\\" + fso.GetBaseName(files(0)) + ".pdf";
var logfile = "c:\\" + fso.GetBaseName(files(0)) + ".log";