PDF Xpress for ActiveX - User Guide > How To > Save Image as PDF/A |
PDF Xpress™ supports saving the image in PDF/A format.
VB Example |
Copy Code
|
---|---|
'this method will demonstrate how to create a PDF/A-1b compliant 'document from a compressed image of a Document Public Sub SaveImageAsPDFa(ByVal imageFileName As String, ByVal targetDocument As PdfDocument, ByVal iccFileName As String) Dim targetPageOptions As New PageOptions 'using standard page size targetPageOptions.MediaHeight = 72.0 * 11 targetPageOptions.MediaWidth = 72.0 * 8.5 targetDocument.CreatePage(-1, targetPageOptions) targetDocument.AddImage(0, 0, 0, targetPageOptions.MediaWidth, targetPageOptions.MediaHeight, PDF_ImageFitShrink, imageFileName, 0) Dim convertOpts As New ConvertOptions 'specify a valid ICC profile to embed convertOpts.IccProfileFilename = iccFileName convertOpts.Type = PDF_PdfType_PdfA1b 'save the converted PDF/A-1b document Dim saveOpts As New SaveOptions saveOpts.Filename = "imagePDFa.pdf" targetDocument.SaveDocument(saveOpts) End Sub |