Debenu Quick PDF Library - PDF SDK Community Forum : CopyPageRanges Results in blank page http://www.quickpdf.org/forum/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Sat, 04 Apr 2026 05:59:32 +0000 Thu, 23 Aug 2012 23:44:51 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 11.01 360 www.quickpdf.org/forum/RSS_post_feed.asp?TID=2378 <![CDATA[Debenu Quick PDF Library - PDF SDK Community Forum]]> http://www.quickpdf.org/forum/forum_images/QPDF_Forum_Title.png http://www.quickpdf.org/forum/ <![CDATA[CopyPageRanges Results in blank page : You will have to get official...]]> http://www.quickpdf.org/forum/copypageranges-results-in-blank-page_topic2378_post10008.html#10008 Author: Wheeley
Subject: 2378
Posted: 23 Aug 12 at 11:44PM

You will have to get official support to answer that question. There were known performance issues when dealing with large files that the previous owner didn't address. I don't know if Debenu has fixed them or not. I do know they are a much better company at responding to issues in the library. So put in an official support ticket and see what they say. Go here:

http://www.debenu.com/support/contact/

Wheeley
]]> Thu, 23 Aug 2012 23:44:51 +0000 http://www.quickpdf.org/forum/copypageranges-results-in-blank-page_topic2378_post10008.html#10008 <![CDATA[CopyPageRanges Results in blank page : That did the trick. Thanks...]]> http://www.quickpdf.org/forum/copypageranges-results-in-blank-page_topic2378_post10006.html#10006 Author: bwolfe
Subject: 2378
Posted: 23 Aug 12 at 9:25PM

That did the trick. Thanks so much.
 
Can you tell me why CopyPageRanges takes so long on larger files?
 
I have a PDF that has 1715 pages. When I open it, it is fine. When execute CopyPageRanges and specifiy a single page, it takes quite a while. For each page, to copy to, the CopyPageRanges takes an inordinate amount of time to execute. It doesn't take a long time for 400 pages, but once you get to 1000 or so, it crawls.
]]> Thu, 23 Aug 2012 21:25:51 +0000 http://www.quickpdf.org/forum/copypageranges-results-in-blank-page_topic2378_post10006.html#10006 <![CDATA[CopyPageRanges Results in blank page : What you are not understanding...]]> http://www.quickpdf.org/forum/copypageranges-results-in-blank-page_topic2378_post10005.html#10005 Author: Wheeley
Subject: 2378
Posted: 23 Aug 12 at 9:02PM

What you are not understanding is even before you load the file QuickPDF already has a blank document in memory. This is by default and intentional. So your line GetDocumentID (1) is in fact selecting the default blank document which is why CopyPageRanges is failing. So, what you should do is GetDocumentID (DocumentCount()) and it should work.

Wheeley
]]> Thu, 23 Aug 2012 21:02:05 +0000 http://www.quickpdf.org/forum/copypageranges-results-in-blank-page_topic2378_post10005.html#10005 <![CDATA[CopyPageRanges Results in blank page : I am attempting to loop thru...]]> http://www.quickpdf.org/forum/copypageranges-results-in-blank-page_topic2378_post10004.html#10004 Author: bwolfe
Subject: 2378
Posted: 23 Aug 12 at 5:14PM

I am attempting to loop thru a PDF document and create multiple pages per PDF. My original PDF is 409 pages and has security on Document Assembly. My loop reports successful (1) on page 1 and unsuccessful (0) on subsequent pages with an error code of 412. I took an unsecured PDF with 1 page and attempted and CopyPageRanges reports successful. No matter what I try, I get a PDF with a blank page. I am fairly certain, after reviewing the forums, that I have the correct PDF selected at the time of extraction. It seems pretty straightforward.
 
Sub ConvertQuickPDF(ByVal oFile As IO.FileInfo, ByVal oFolder As IO.DirectoryInfo)
        Dim oQP As QuickPDFAX0814.PDFLibrary = Nothing
        Dim lID As Integer = 0
        Dim lNewID As Integer = 0
        Dim oNewFile As IO.FileInfo = Nothing
        Dim lPageCount As Integer = 0
        Dim i As Integer = 0
        Const SPK As String = "***********"
        Try
            oQP = New QuickPDFAX0814.PDFLibrary
            oQP.UnlockKey(SPK)
            lID = oQP.LoadFromFile(oFile.FullName, "")
            lPageCount = oQP.PageCount
'Get First Document ID
            lID = oQP.GetDocumentID(1)

            For i = 1 To lPageCount
                oQP.SelectDocument(lID)
                oQP.SelectPage(i)
'Get New Document
                lNewID = oQP.NewDocument()
'Select New Document
                oQP.SelectDocument(lNewID)
'Copy a page by number from original PDF to new pdf
                oQP.CopyPageRanges(lID, i.ToString)
'Delete blank initial page
                oQP.DeletePages(1, 1)
                oNewFile = New IO.FileInfo(oFolder.FullName & "\" & Format(i, "00000000") & ".pdf")
                IO.Directory.CreateDirectory(oNewFile.DirectoryName)
'Save new PDF  - always a blank page
                oQP.SaveToFile(oNewFile.FullName)
'Remove the New PDF from collection
                oQP.RemoveDocument(lNewID)
            Next
            oQP.RemoveDocument(lID)
        Catch ex As Exception
        End Try
    End Sub
]]> Thu, 23 Aug 2012 17:14:09 +0000 http://www.quickpdf.org/forum/copypageranges-results-in-blank-page_topic2378_post10004.html#10004