http://www.quickpdf.org/forum/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Mon, 04 May 2026 07:06:03 +0000 Thu, 06 Oct 2011 21:06:41 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 11.01 360 www.quickpdf.org/forum/RSS_post_feed.asp?TID=1987 http://www.quickpdf.org/forum/forum_images/QPDF_Forum_Title.png http://www.quickpdf.org/forum/ http://www.quickpdf.org/forum/is-removedocument-effectively-same-as-close_topic1987_post8452.html#8452 Author: Ingo
Subject: 1987
Posted: 06 Oct 11 at 9:06PM

Hi Tyke!

CreateObject does what the name is telling ...
and after this you can work on pdf-files (load, manipulate, save, ...
and .Free will destroy the object at the end and relase the memory.
In a pdf-file you can have/create more than one document and
so it's possible to remove one, too.

Cheers, Ingo
]]> Thu, 06 Oct 2011 21:06:41 +0000 http://www.quickpdf.org/forum/is-removedocument-effectively-same-as-close_topic1987_post8452.html#8452 http://www.quickpdf.org/forum/is-removedocument-effectively-same-as-close_topic1987_post8451.html#8451 Author: LittleTyke
Subject: 1987
Posted: 06 Oct 11 at 2:53PM

I've just downloaded the Quick PDF Lite package in order to get document properties from a number of PDF files. This is how I've coded it and the results look fine:

Private Sub Command1_Click()

    Dim PDFLibrary As QuickPDFLite0725.PDFLibrary
    Dim DocID As Long
   
    Set PDFLibrary = CreateObject("QuickPDFLite0725.PDFLibrary")
    Call PDFLibrary.LoadFromFile("F:\VBCD\MAXPRO.PDF")
    DocID = PDFLibrary.SelectedDocument()
   
    Debug.Print "PDF Version: " & PDFLibrary.GetInformation(0)
    Debug.Print "Author: " & PDFLibrary.GetInformation(1)
    Debug.Print "Title: " & PDFLibrary.GetInformation(2)
    Debug.Print "Subject: " & PDFLibrary.GetInformation(3)
    Debug.Print "Keywords: " & PDFLibrary.GetInformation(4)
    Debug.Print "Creator: " & PDFLibrary.GetInformation(5)
    Debug.Print "Producer: " & PDFLibrary.GetInformation(6)
    Debug.Print "Creation date: " & PDFLibrary.GetInformation(7)
    Debug.Print "Modification date: " & PDFLibrary.GetInformation(8)
   
    Call PDFLibrary.RemoveDocument(DocID)
   
    Set PDFLibrary = Nothing

End Sub

Does that look about right as one is supposed to work with Quick PDF? In Acrobat Reader I can explicitly File/Close a PDF file when finished with, but the Quick PDF object model doesn't include a Close method. Closest I can find is RemoveDocument, for which I need to have retrieved the DocumentID.

The above code will eventually be in a loop to recurse through a number of folders, picking up PDF files found and pumping the properties data to a text file or Access database. So the loop will do:  LoadFromFile, SelectedDocument, GetInformation, and RemoveDocument continuously, only setting PDFLibrary = Nothing when all the folders have been recursed and the loop is terminated.

Thanks!

]]> Thu, 06 Oct 2011 14:53:16 +0000 http://www.quickpdf.org/forum/is-removedocument-effectively-same-as-close_topic1987_post8451.html#8451