VBScript Requires Chilkat v11.7.0+

PDF Footnotes in Markdown: Inline, at the End, or Dropped

See more PDF Text Extraction Examples

Demonstrates the "footnotes" option of the "markdown" operation. Small-print notes at the foot of a page are kept where they are ("inline", the default), gathered at the end of the document ("end"), or left out ("none"). VBScript

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

success = 0

'  This example requires the Chilkat API to have been previously unlocked.
'  See Global Unlock Sample for sample code.

'  The two-page PDF used in this example is available at footnotes.pdf

set pdf = CreateObject("Chilkat.Pdf")
success = pdf.LoadFile("qa_data/pdf/footnotes.pdf")
If (success = 0) Then
    outFile.WriteLine(pdf.LastErrorText)
    WScript.Quit
End If

set json = CreateObject("Chilkat.JsonObject")
set jsonOut = CreateObject("Chilkat.JsonObject")

'  Page 1 has two superscript references in the text and the two notes in small print at its foot;
'  page 2 has a third.
success = pdf.ExtractText("markdown",json,jsonOut)
If (success = 0) Then
    outFile.WriteLine(pdf.LastErrorText)
    WScript.Quit
End If

outFile.WriteLine("---- footnotes: inline (default) ----")
outFile.WriteLine(jsonOut.StringOf("markdown"))

success = json.UpdateString("footnotes","end")
success = pdf.ExtractText("markdown",json,jsonOut)
If (success = 0) Then
    outFile.WriteLine(pdf.LastErrorText)
    WScript.Quit
End If

outFile.WriteLine("---- footnotes: end ----")
outFile.WriteLine(jsonOut.StringOf("markdown"))

success = json.UpdateString("footnotes","none")
success = pdf.ExtractText("markdown",json,jsonOut)
If (success = 0) Then
    outFile.WriteLine(pdf.LastErrorText)
    WScript.Quit
End If

outFile.WriteLine("---- footnotes: none ----")
outFile.WriteLine(jsonOut.StringOf("markdown"))

'  Sample output:

'  ---- footnotes: inline (default) ----
'  <!-- page 1 -->
'  
'  # The Lens on Loan
'  
'  The society located a fourth-order lens of the correct period at a museum1 in the next county, and an agreement to loan it for ten years was signed in November.2 The lens will be lit with a low-wattage electric lamp rather than oil, and it will be displayed as a historic light rather than registered as an aid to navigation.
'  
'  1 The county maritime museum, which holds three lenses from decommissioned lights. 2 The loan is renewable and carries no fee; the society insures the lens.
'  
'  <!-- page 2 -->
'  
'  # Public Access
'  
'  The grounds opened to visitors on weekends from July. Nearly three thousand people climbed the tower over the summer,3 with no incidents.
'  
'  3 Counted at the entrance by the volunteers on duty.
'  
'  ---- footnotes: end ----
'  <!-- page 1 -->
'  
'  # The Lens on Loan
'  
'  The society located a fourth-order lens of the correct period at a museum1 in the next county, and an agreement to loan it for ten years was signed in November.2 The lens will be lit with a low-wattage electric lamp rather than oil, and it will be displayed as a historic light rather than registered as an aid to navigation.
'  
'  <!-- page 2 -->
'  
'  # Public Access
'  
'  The grounds opened to visitors on weekends from July. Nearly three thousand people climbed the tower over the summer,3 with no incidents.
'  
'  1 The county maritime museum, which holds three lenses from decommissioned lights. 2 The loan is renewable and carries no fee; the society insures the lens.
'  
'  3 Counted at the entrance by the volunteers on duty.
'  
'  ---- footnotes: none ----
'  <!-- page 1 -->
'  
'  # The Lens on Loan
'  
'  The society located a fourth-order lens of the correct period at a museum1 in the next county, and an agreement to loan it for ten years was signed in November.2 The lens will be lit with a low-wattage electric lamp rather than oil, and it will be displayed as a historic light rather than registered as an aid to navigation.
'  
'  <!-- page 2 -->
'  
'  # Public Access
'  
'  The grounds opened to visitors on weekends from July. Nearly three thousand people climbed the tower over the summer,3 with no incidents.

outFile.Close