Convert Microsoft Visio Drawing (vsd) To PDF Automatically
Answer : I found this nice vbs script and adapted it to visio.It can be called via cygwin (works for all kind of Office stuff) Option Explicit Main() Sub Main() If WScript.Arguments.Count > 0 Then Dim objFSO : Set objFSO = CreateObject("Scripting.FileSystemObject") Dim i For i = 0 to wscript.arguments.count - 1 Dim strFilePath : strFilePath = WScript.Arguments.Item(i) Dim dirPath : dirPath = objFSO.GetParentFolderName(strFilePath) Dim fileBaseName : fileBaseName = objFSO.GetBaseName(strFilePath) 'WScript.Echo strFilePath Dim strNewFileName : strNewFileName = dirPath & "\" & fileBaseName & ".pdf" 'WScript.Echo strNewFileName Dim strFileExt : strFileExt = UCase(objFSO.GetExtensionName(strFilePath)) Select Case strFileExt Case "DOC" DOC2PDF strFilePath, strNewFileName Case ...