(Lianja) Extract Embedded Files from PDF

Demonstrates how to get information about the embedded files (if any) contained within a PDF, and shows how to extract each file.

Note: This example requires Chilkat v9.5.0.95 or greater.

Chilkat Lianja Extension Download Chilkat Lianja Extension

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

loPdf = createobject("CkPdf")

llSuccess = loPdf.LoadFile("qa_data/pdf/embedded_files/my_embedded_files_test.pdf")
if (llSuccess = .F.) then
    ? loPdf.LastErrorText
    release loPdf
    return
endif

// Note: The embedded file functionality was added in Chilkat v9.5.0.95

// How many embedded files exist within the opened PDF?
lnNumFiles = loPdf.NumEmbeddedFiles
? "Number of embedded files: " + str(lnNumFiles)

loJson = createobject("CkJsonObject")
loJson.EmitCompact = .F.

loBd = createobject("CkBinData")

// Get information about each file, and extract each to the filesystem.
i = 0
do while i < lnNumFiles

    llSuccess = loPdf.GetEmbeddedFileInfo(i,loJson)
    if (llSuccess = .F.) then
        ? loPdf.LastErrorText
        release loPdf
        release loJson
        release loBd
        return
    endif

    ? loJson.Emit()

    // Get the filename from the JSON.
    lcFilename = "someFile.dat"

    // The filename SHOULD always be present..
    if (loJson.HasMember("filename") = .T.) then
        lcFilename = loJson.StringOf("filename")
    endif

    // Get the file data.
    llSuccess = loPdf.GetEmbeddedFileBd(i,loBd)
    if (llSuccess = .F.) then
        ? loPdf.LastErrorText
        release loPdf
        release loJson
        release loBd
        return
    endif

    // Save the contents of the bd to the filename (in the current working directory) in the filesystem.
    llSuccess = loBd.WriteFile(lcFilename)
    if (llSuccess = .F.) then
        ? "Failed to write output file."
    endif

    i = i + 1
enddo

// Sample output for the above code:

// Number of embedded files: 3
// {
//   "filename": "employees.json",
//   "desc": "JSON",
//   "subType": "application/json",
//   "size": 159,
//   "creationDate": "D:20230715170506-05'00'",
//   "modDate": "D:20160207153838-05'00'"
// }
// 
// {
//   "filename": "rsaPubKey.pem",
//   "desc": "RSA Public Key PEM",
//   "size": 451,
//   "creationDate": "D:20230715170546-05'00'",
//   "modDate": "D:20150724133153-05'00'"
// }
// 
// {
//   "filename": "starfish.jpg",
//   "desc": "Starfish JPG",
//   "subType": "image/jpeg",
//   "size": 6229,
//   "creationDate": "D:20230715170356-05'00'",
//   "modDate": "D:20080529103055-05'00'"
// }


release loPdf
release loJson
release loBd