True PDF Software
for you!

  • Deutsch
  • English

Status Message Using OnAfterPrint Event Handler

  1. Sub OnAfterPrint()
  2.     Dim filelist
  3.  
  4.     filelist = ""
  5.     For Each fn In Context("FileList").items
  6.         filelist = filelist & fn & vbCrLf
  7.     Next
  8.     MsgBox "Your document was created." & vbCrLf & vbCrLf & _
  9.         Context("OutputFileName") & vbCrLf & vbCrLf & _
  10.         "It contains " & Context("PageCount") & " pages in " & _
  11.         Context("FileCount") & " files." & vbCrLf & vbCrLf & _
  12.         "Output files:" & vbCrLf & filelist
  13. End Sub

Download Example Files

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 writer installation. You can use the MacroDir setting to change the location of the VBS files if needed.

AttachmentSize
Package icon Example files458 bytes