Print Page | Close Window

Unlock

Printed From: Debenu Quick PDF Library - PDF SDK Community Forum
Category: For Users of the Library
Forum Name: I need help - I can help
Forum Description: Problems and solutions while programming with the Debenu Quick PDF Library and Debenu PDF Viewer SDK
URL: http://www.quickpdf.org/forum/forum_posts.asp?TID=4027
Printed Date: 18 May 24 at 8:49AM
Software Version: Web Wiz Forums 11.01 - http://www.webwizforums.com


Topic: Unlock
Posted By: Chris62
Subject: Unlock
Date Posted: 09 Nov 23 at 11:34AM
Hello,

If I want to unlock the QPDF with my key, I get an error message and a crash:

Runtime Error 217 at 13D0DC31

Here is the Source of VB6:

Dim LizenzKey As String

  LizenzKey = "ji3xxxxxxxxxxxxxy"  
Set QPdf = New DebenuPDFLibraryAX1312.PDFLibrary

If QPdf.UnlockKey(LizenzKey) = 0 Then Exit Sub   '*here is crashing!

Please help me
Thanks
Chris



Replies:
Posted By: Ingo
Date Posted: 10 Nov 23 at 5:39PM
Hi Chris :)

Here's a complete sample perhaps this will give you an idea how to solve this issue.

Cheers and welcome here,
Ingo



Dim ClassName
Dim LicenseKey
Dim FileName

ClassName = "DebenuPDFLibraryAX1011.PDFLibrary"
LicenseKey = "..." 'SET YOUR LICENSE KEY HERE...
FileName = "c:\hello-world.pdf"

Dim QP
Dim Result

Set QP = CreateObject(ClassName)
Result = QP.UnlockKey(LicenseKey)
    
If Result = 1 Then

    MsgBox "Library version: " + QP.LibraryVersion
    MsgBox (QP.LicenseInfo)

    Call QP.DrawText(100, 500, "Hello world from Visual Basic 6.0.")
    
    If QP.SaveToFile(FileName) = 1 Then
        MsgBox "File " + FileName + " written successfully."
        
    Else
        MsgBox "Error, file could not be written."
    End If
Else
    MsgBox "Invalid license key. Please set your license key by editing this file."
End If


----------


Once you've downloaded and installed Quick PDF Library please register (using regsvr32.exe) the file shown below.

* DebenuPDFLibraryAX1011.dll

By default located at: C:\Program Files\Quick PDF Library\ActiveX\DebenuPDFLibraryAX1011.dll

Note: if you're using 64-bit Windows then look in the "Program Files (x86)" directory.




-------------
Cheers,
Ingo



Posted By: Chris62
Date Posted: 12 Nov 23 at 4:46PM
Hello,

thank you very much for your help :-) GreatSmile
I'm glad that there are still competent people who help others. I appreciate very much.

I solved the problem:
The AXDLL was registered in the system directory (SysWOW64).
That's why it didn't work in the VB6 IDE, where the DLL must be in the program directory?
As a compiled EXE it works everywhere, except within the IDE!

Can I actually buy newer versions of DEBENU ActiveX?
Or has all further development stopped?

Thank you
Chris


Posted By: Ingo
Date Posted: 13 Nov 23 at 9:02PM
Seems to me that you've made the first big steps into development - congrats ;-)
You won't be able to buy newer versions of the library since beginning of 2023.
Debenu - the publishers of QuickPDF - were merged into the Foxit-team.
First time development was still active... support was less active... now Foxit is concentrating entirely on its own products. The aim was probably to remove the competitor from the market.

Anyway... version 13.12 is already a stable version with much functionalities and it depends on your needs if it's usefull for you. 



-------------
Cheers,
Ingo




Print Page | Close Window

Forum Software by Web Wiz Forums® version 11.01 - http://www.webwizforums.com
Copyright ©2001-2014 Web Wiz Ltd. - http://www.webwiz.co.uk