Dim xrights As registrationc JRSpell1.SerialNumber = 123456 JRSpell1.RegCode = 000000 xrights = JRSpell1.GetUserRight
Public Enum registrationc             noreg=0             UserReg=1             ProgrammerReg=2 End Enum
|