Monday, January 21, 2013

batch word to pdf

http://superuser.com/questions/17612/batch-convert-word-documents-to-pdfs-free

In particular, 

Save this to a file SaveAsPDF.js and run it from the command line using cscript.exe //nologo SaveAsPDF.js SomeFolder\MyDocToConvert.doc:

  var fso = new ActiveXObject("Scripting.FileSystemObject");  var docPath = WScript.Arguments(0);  docPath = fso.GetAbsolutePathName(docPath);    var pdfPath = docPath.replace(/\.doc[^.]*$/, ".pdf");  var objWord = null;    try  {      WScript.Echo("Saving '" + docPath + "' as '" + pdfPath + "'...");        objWord = new ActiveXObject("Word.Application");      objWord.Visible = false;        var objDoc = objWord.Documents.Open(docPath);        var wdFormatPdf = 17;      objDoc.SaveAs(pdfPath, wdFormatPdf);      objDoc.Close();        WScript.Echo("Done.");  }  finally  {      if (objWord != null)      {          objWord.Quit();      }  }

No comments: