Insert Blank Page
To insert a blank page into an existing PDF Document please load that PDF Document first to memory and then call:
insertblank(pageno As Long)
This function returns 0 in case of an error and pageno in case of success.
Please do not forget to save you document after changes have beeing done.
An easier function is the function
append_blank. Please visit
Append PDF to see some sample code!
Remove Pages
The following sample will demonstrate how to remove a given amount of pages from a loaded PDF document.
dim pdf
dim pdffile
dim TargetPDF
dim spage 'startpage
dim pagec 'pagecount
TargetPDF = "c:\output.pdf"
pdffile = "c:\input.pdf"
set pdf = createobject("aloahapdf.edit")
If pdf.load_pdf_to_mem(CStr(pdffile)) = true Then
if pdf.DeletePages(clng(spage), clng(pagec)) = true then
call pdf.save_pdf_to_file(cstr(TargetPDF))
end if
end if
set pdf = nothing
Aloaha Software / Knowledge Base / PDF SDK / Insert Blank Page