RegistrationEngineMBS.Alphabet as String

dim r as new RegistrationEngineMBS

r.Field(0)="Hello World"
r.Field(1)="MyProduct 2008"

r.Alphabet="ABC123"
MsgBox r.Calc // shows: A1AC-2312-12CC

r.Alphabet="0123456789"
MsgBox r.Calc // shows: 4308-2905-4013

Must have at least two characters.
Characters must be unique.
Default is "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ".
(Read and Write property)

Some examples using this property:

• /Util/Registration Number Generator

RegistrationEngineMBS.BlockLength as Integer

dim r as new RegistrationEngineMBS

r.Field(0)="Hello World"
r.Field(1)="MyProduct 2008"

r.NumberLength=10
r.BlockLength=5
MsgBox r.Calc // shows: ICYRR-ES4UX

r.NumberLength=16
r.BlockLength=4
MsgBox r.Calc // shows: ICYR-RES4-UXQ1

If this value is 0, no delimeters are used.
(Read and Write property)

Some examples using this property:

• /Util/Registration Number Generator

RegistrationEngineMBS.Delimiter as String

Default is "-".
(Read and Write property)

Some examples using this property:

• /Util/Registration Number Generator

RegistrationEngineMBS.Mode as Integer

Currently always 0.
Set to 1 to use 128bit instead of 64bit number.
(Read and Write property)

RegistrationEngineMBS.NumberLength as Integer

dim r as new RegistrationEngineMBS

r.Field(0)="Hello World"
r.Field(1)="MyProduct 2008"

r.NumberLength=10
r.BlockLength=5
MsgBox r.Calc // shows: ICYRR-ES4UX

r.NumberLength=16
r.BlockLength=4
MsgBox r.Calc // shows: ICYR-RES4-UXQ1

(Read and Write property)

Some examples using this property:

• /Util/Registration Number Generator

RegistrationEngineMBS.Platform as Integer

Value is set in the constructor to current platform, but you can change it if you want to run the key generator on a different platform.

Values are:

1	Mac
2	Windows
3	Linux

All other values behave like PlatformSpecificKeys is false.
This value is only used if PlatformSpecificKeys is true.
(Read and Write property)

RegistrationEngineMBS.PlatformSpecificKeys as Boolean

Set to false if you want to have Windows, Mac OS X and Linux all use the same serial numbers.
Set to true if you want to different serial numbers depending on the platform.

Default is false.
(Read and Write property)

Some examples using this property:

• /Util/Registration Number Generator

RegistrationEngineMBS.Prefix as String

(Read and Write property)

RegistrationEngineMBS.Seed as Integer

(Read and Write property)

RegistrationEngineMBS.Suffix as String

dim r as new RegistrationEngineMBS

r.Field(0)="Hello World"
r.Field(1)="Xojo"
r.suffix="-RB600CPFUSA-MAC"

r.BlockLength=8
r.NumberLength=32

MsgBox r.Calc
// shows: EV6GG9P2-DI533EV6-GG9P2DI5-33EV6GG9-RB600CPFUSA-MAC
// looks like a Xojo serial number ;-)

(Read and Write property)