This example will show you how to manipulate the file name after the file name macros have been applied. The example was not created to do anything meaningful. It will read the set output file name and reverse it :-)
Rem -- Rem -- Run this function when the macros are applied. Rem -- Sub OnMacrosApplied Dim fso, output, filename, extension, foldername Rem -- Create a file system object for file path helper functions Set fso = CreateObject("Scripting.FilesystemObject") Rem -- Get the current output value output = context("Config")("output") Rem -- Get the file path parts filename = fso.GetBaseName(output) foldername = fso.GetParentFolderName(output) extension = fso.GetExtensionName(output) Rem -- Reverse the file name filename = StrReverse(filename) Rem -- Assemble the file path again output = foldername & "\" & filename & "." & extension Rem -- Set the new file path in the output context("Config")("output") = output Rem -- Make sure the configuration isn't reloaded because of an option set selection. context("Config")("rememberlastoptionset") = "no" Rem -- Clean up Set fso = Nothing End Sub
You can download and run the example yourself. The files needed are available here. The VBS file must be placed in the
macros sub folder of the PDF printer installation. You can use the MacroDir setting to change the location of the VBS files if needed.
|Example file||0.6 KB|