Private Const MyProductName ="Office Trainer" . . . If Not (UserNameT = "") Or Not (ProdNameT = "") Then RawKey = GenKeyString(UserNameT, ProdNameT & MyProductName, FeatID) BinKey = HexStrToBinStr(RawKey) KeyCode = FormatKeyCode(Base32Enc(BinKey), 4) Else KeyCode = "Please Enter Licensee and/or Serial Number; End If . . .
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)