Что нового

Генерация лицензионного ключа

QQruza

Новичок
Сообщения
23
Репутация
0
Скрипт для генерации лицензионного ключ из заданной даты, формата XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX (Можно любое количество символов) (X- латинская буква алфавита, цифра)
Скрипт для дешифровки лицензионного ключа в дату.

Заранее благодарен всем откликнувшимся.
 

ra4o

AutoIT Гуру
Сообщения
1 088
Репутация
212
Код:
#include <Crypt.au3>

Local Const $sUserKey = "CryptPassword" ;Пароль
Local $sData = @MDAY&'-'&@MON&'-'&@YEAR ;Строка для шифрования

Local $bEncrypted = _Crypt_EncryptData($sData, $sUserKey, $CALG_AES_256) ;Зашифрованная строка
MsgBox(4096, "Зашифрованная строка", $bEncrypted)
$bEncrypted = _Crypt_DecryptData($bEncrypted, $sUserKey, $CALG_AES_256) ;Исходная строка
MsgBox(4096, "Исходная строка", BinaryToString($bEncrypted))
 
Верх