VB.NET

Global Unlock

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

Dim success As Boolean = False

'  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:
Dim glob As New Chilkat.Global
success = glob.UnlockBundle("Anything for 30-day trial")
If (success = False) Then
    Debug.WriteLine(glob.LastErrorText)
    Exit Sub
End If


Dim status As Integer = glob.UnlockStatus
If (status = 2) Then
    Debug.WriteLine("Unlocked using purchased unlock code.")
Else
    Debug.WriteLine("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.
Debug.WriteLine(glob.LastErrorText)