ValidLicenseExists(LicenseCode As Integer) As Boolean

Application object

This method can be used to check if a certain license is valid. It is to be used by optional product components that can be a part of a Forms business solution, to check whether they are allowed to run or not on a specific PC (or a specific application module).

You can use the method like this:

If Application.ValidLicenseExists(1) = FALSE Then

    MessageBox "License not valid"

    Exit Sub

End If

 

These optional programs could use it in the AppStart event, and subscribe to events if the answer is TRUE, and not if the answer is FALSE. For programs that call CreateObject on a FORMS application, this is the first method that should be called. If the answer is FALSE, they should release the FORMS application and not continue operations.

Parameter

LicenseCode – should be a unique number for each program. Example:

1 – The EMAIL product component

2 – Not used

3 – Not used

Return value

Returns TRUE if the license is valid and FALSE if it is not. If FALSE is returned, the calling code should end its execution after having presented a message to the user that the license is invalid or insufficient.

Remarks

Used by FORMS-related optional components. Only for internal use.

The Application object