PowerBuilder

Global Unlock

Demonstrates how to unlock the Chilkat API with a global (Bundle) purchased unlock code, or with a 30-day trial unlock code. PowerBuilder

integer li_rc
long li_Success
oleobject loo_Glob
long li_Status

li_Success = 0

//  The Chilkat API can be unlocked for a fully-functional 30-day trial by passing any
//  string to the UnlockBundle method.  A program can unlock once at the start. Once unlocked,
//  all subsequently instantiated objects are created in the unlocked state. 
//  
//  <b>After licensing Chilkat, replace the "Anything for 30-day trial" with the purchased unlock code.</b>
//  To verify the purchased unlock code was recognized, examine the contents of the LastErrorText
//  property after unlocking.  For example:
loo_Glob = create oleobject
li_rc = loo_Glob.ConnectToNewObject("Chilkat.Global")
if li_rc < 0 then
    destroy loo_Glob
    MessageBox("Error","Connecting to COM object failed")
    return
end if
li_Success = loo_Glob.UnlockBundle("Anything for 30-day trial")
if li_Success = 0 then
    Write-Debug loo_Glob.LastErrorText
    destroy loo_Glob
    return
end if

li_Status = loo_Glob.UnlockStatus
if li_Status = 2 then
    Write-Debug "Unlocked using purchased unlock code."
else
    Write-Debug "Unlocked in trial mode."
end if

//  The LastErrorText can be examined in the success case to see if it was unlocked in
//  trial more, or with a purchased unlock code.
Write-Debug loo_Glob.LastErrorText


destroy loo_Glob