Archived Forum Post

Index of archived forum posts


Crypt component unlock failed-SOLVED

Jul 07 '14 at 10:10

I bought a 1-developer-bundle and i can use the components successfully in my developer ambient. But When build a vb6 solutions that uses one or more of the components and install in a client machine i receive a error "Crypt component unlock failed" . I don't know what'ś wrong, i'm using the correspondent permanent unlock code for every component. Thank you Rogerio.


If the library weren't registered, wouldn't it throw an error when the crypt object was instantiated?


I use the Chilkat components with VB6, and have not experienced this problem.

Can you post the full contents of the LastErrorText property immediately after you call UnlockComponent and it fails? Please put the contents in <pre></pre> tags.

Also maybe post a code snippet that fails? make sure you don't include your unlock code though.


I'm using this code to verify:

230     Dim crypt As New ChilkatCrypt2

'  Any string argument automatically begins the 30-day trial.
240     Dim success As Long
250     success = crypt.UnlockComponent("UOLCOMCrypt_xxxxxxxxxxxzzx")
260     If (success <> 1) Then
270         MsgBox "Crypt component unlock failed"
            MsgBox crypt.LastErrorText
280         If vbwProtector.vbwTraceProc Then vbwProtector.vbwProcOut VBWPROCNAME
290         Exit Function
300     End If

I can't obtain the last error in a client machine because a can't use the crypt activex control. Thank you rogerio


Hard to say without the LastErrorText (the code itself looks okay assuming that your unlock code is correct). A couple of thoughts:

Are you using On Error Resume Next before you try to call UnlockComponent?

Did you distribute and register (regsvr32) the chilkat library on the client computer?


See the various posts under the "UnlockComponent" category in the Chilkat blog here:


Hi Jfoulk ! You are alright. My setup was wrong and was missing the information to registry that activex. When I registered it its function! Thank you.