Unc3nZureD 14 Posted April 27, 2012 Share Posted April 27, 2012 (edited) I'm currently trying to make a serial-system for my software, and it would be the following logic: Creat a Serial: $Number = Random(10, 99999, 1) $Encrypted = _StringEncrypt(1, $Number, "Test_Code", 2) ClipPut($Encrypted) Okay, it works well. But when I want to read an input and decrypt it, my program fails. Decrypting the code would give me a number. Decryption: $Given = GUICtrlRead($Input1) $Decrypted = _StringEncrypt(0, $Given, "Test_Code", 2) If IsNumber($Encrypted) = 1 Then MsgBox(64, "", "Awesome! Your Key is perfect." & @CRLF & "Your username is: " & $Decrypted) Else MsgBox(16, "", "Key is wrong." & @CRLF & "Incorrect username is: " & $Decrypted) EndIf No, it's not a number... Is there any way to fix it? Edited April 27, 2012 by Unc3nZureD Link to post Share on other sites
guinness 1,528 Posted April 27, 2012 Share Posted April 27, 2012 (edited) Are you sure that's returning a number? Look at StringIsNumber anyway. Edited April 27, 2012 by guinness UDF List: _AdapterConnections() • _AlwaysRun() • _AppMon() • _AppMonEx() • _ArrayFilter/_ArrayReduce • _BinaryBin() • _CheckMsgBox() • _CmdLineRaw() • _ContextMenu() • _ConvertLHWebColor()/_ConvertSHWebColor() • _DesktopDimensions() • _DisplayPassword() • _DotNet_Load()/_DotNet_Unload() • _Fibonacci() • _FileCompare() • _FileCompareContents() • _FileNameByHandle() • _FilePrefix/SRE() • _FindInFile() • _GetBackgroundColor()/_SetBackgroundColor() • _GetConrolID() • _GetCtrlClass() • _GetDirectoryFormat() • _GetDriveMediaType() • _GetFilename()/_GetFilenameExt() • _GetHardwareID() • _GetIP() • _GetIP_Country() • _GetOSLanguage() • _GetSavedSource() • _GetStringSize() • _GetSystemPaths() • _GetURLImage() • _GIFImage() • _GoogleWeather() • _GUICtrlCreateGroup() • _GUICtrlListBox_CreateArray() • _GUICtrlListView_CreateArray() • _GUICtrlListView_SaveCSV() • _GUICtrlListView_SaveHTML() • _GUICtrlListView_SaveTxt() • _GUICtrlListView_SaveXML() • _GUICtrlMenu_Recent() • _GUICtrlMenu_SetItemImage() • _GUICtrlTreeView_CreateArray() • _GUIDisable() • _GUIImageList_SetIconFromHandle() • _GUIRegisterMsg() • _GUISetIcon() • _Icon_Clear()/_Icon_Set() • _IdleTime() • _InetGet() • _InetGetGUI() • _InetGetProgress() • _IPDetails() • _IsFileOlder() • _IsGUID() • _IsHex() • _IsPalindrome() • _IsRegKey() • _IsStringRegExp() • _IsSystemDrive() • _IsUPX() • _IsValidType() • _IsWebColor() • _Language() • _Log() • _MicrosoftInternetConnectivity() • _MSDNDataType() • _PathFull/GetRelative/Split() • _PathSplitEx() • _PrintFromArray() • _ProgressSetMarquee() • _ReDim() • _RockPaperScissors()/_RockPaperScissorsLizardSpock() • _ScrollingCredits • _SelfDelete() • _SelfRename() • _SelfUpdate() • _SendTo() • _ShellAll() • _ShellFile() • _ShellFolder() • _SingletonHWID() • _SingletonPID() • _Startup() • _StringCompact() • _StringIsValid() • _StringRegExpMetaCharacters() • _StringReplaceWholeWord() • _StringStripChars() • _Temperature() • _TrialPeriod() • _UKToUSDate()/_USToUKDate() • _WinAPI_Create_CTL_CODE() • _WinAPI_CreateGUID() • _WMIDateStringToDate()/_DateToWMIDateString() • Au3 script parsing • AutoIt Search • AutoIt3 Portable • AutoIt3WrapperToPragma • AutoItWinGetTitle()/AutoItWinSetTitle() • Coding • DirToHTML5 • FileInstallr • FileReadLastChars() • GeoIP database • GUI - Only Close Button • GUI Examples • GUICtrlDeleteImage() • GUICtrlGetBkColor() • GUICtrlGetStyle() • GUIEvents • GUIGetBkColor() • Int_Parse() & Int_TryParse() • IsISBN() • LockFile() • Mapping CtrlIDs • OOP in AutoIt • ParseHeadersToSciTE() • PasswordValid • PasteBin • Posts Per Day • PreExpand • Protect Globals • Queue() • Resource Update • ResourcesEx • SciTE Jump • Settings INI • SHELLHOOK • Shunting-Yard • Signature Creator • Stack() • Stopwatch() • StringAddLF()/StringStripLF() • StringEOLToCRLF() • VSCROLL • WM_COPYDATA • More Examples... Updated: 22/04/2018 Link to post Share on other sites
UEZ 1,330 Posted April 27, 2012 Share Posted April 27, 2012 Try this: If StringIsInt($Decrypted) Then MsgBox(64, "", "Awesome! Your Key is perfect." & @CRLF & "Your username is: " & $Decrypted) Else MsgBox(16, "", "Key is wrong." & @CRLF & "Incorrect username is: " & $Decrypted) EndIf Br, UEZ Please don't send me any personal message and ask for support! I will not reply! Selection of finest graphical examples at Codepen.io The own fart smells best! ✌Her 'sikim hıyar' diyene bir avuç tuz alıp koşma!¯\_(ツ)_/¯ ٩(●̮̮̃•̃)۶ ٩(-̮̮̃-̃)۶ૐ Link to post Share on other sites
Unc3nZureD 14 Posted April 27, 2012 Author Share Posted April 27, 2012 (edited) Hmm, StringIsNumber doesn't exist. And UEZ: Someway it still isn't OK. Fo example the "3F1A25F26D18BC1729D27D6A552069E45304812F" Returns: "65927" And it doesn't accept it. I tried a non generated code just a simplified one: $qwe = "123" $asd = 123 MsgBox(0, "", IsNumber($qwe) & @CRLF & IsNumber($asd)) The first one is not a number but second one is a number! Edited April 27, 2012 by Unc3nZureD Link to post Share on other sites
guinness 1,528 Posted April 27, 2012 Share Posted April 27, 2012 Whoops, maybe StringIsXDigit. UDF List: _AdapterConnections() • _AlwaysRun() • _AppMon() • _AppMonEx() • _ArrayFilter/_ArrayReduce • _BinaryBin() • _CheckMsgBox() • _CmdLineRaw() • _ContextMenu() • _ConvertLHWebColor()/_ConvertSHWebColor() • _DesktopDimensions() • _DisplayPassword() • _DotNet_Load()/_DotNet_Unload() • _Fibonacci() • _FileCompare() • _FileCompareContents() • _FileNameByHandle() • _FilePrefix/SRE() • _FindInFile() • _GetBackgroundColor()/_SetBackgroundColor() • _GetConrolID() • _GetCtrlClass() • _GetDirectoryFormat() • _GetDriveMediaType() • _GetFilename()/_GetFilenameExt() • _GetHardwareID() • _GetIP() • _GetIP_Country() • _GetOSLanguage() • _GetSavedSource() • _GetStringSize() • _GetSystemPaths() • _GetURLImage() • _GIFImage() • _GoogleWeather() • _GUICtrlCreateGroup() • _GUICtrlListBox_CreateArray() • _GUICtrlListView_CreateArray() • _GUICtrlListView_SaveCSV() • _GUICtrlListView_SaveHTML() • _GUICtrlListView_SaveTxt() • _GUICtrlListView_SaveXML() • _GUICtrlMenu_Recent() • _GUICtrlMenu_SetItemImage() • _GUICtrlTreeView_CreateArray() • _GUIDisable() • _GUIImageList_SetIconFromHandle() • _GUIRegisterMsg() • _GUISetIcon() • _Icon_Clear()/_Icon_Set() • _IdleTime() • _InetGet() • _InetGetGUI() • _InetGetProgress() • _IPDetails() • _IsFileOlder() • _IsGUID() • _IsHex() • _IsPalindrome() • _IsRegKey() • _IsStringRegExp() • _IsSystemDrive() • _IsUPX() • _IsValidType() • _IsWebColor() • _Language() • _Log() • _MicrosoftInternetConnectivity() • _MSDNDataType() • _PathFull/GetRelative/Split() • _PathSplitEx() • _PrintFromArray() • _ProgressSetMarquee() • _ReDim() • _RockPaperScissors()/_RockPaperScissorsLizardSpock() • _ScrollingCredits • _SelfDelete() • _SelfRename() • _SelfUpdate() • _SendTo() • _ShellAll() • _ShellFile() • _ShellFolder() • _SingletonHWID() • _SingletonPID() • _Startup() • _StringCompact() • _StringIsValid() • _StringRegExpMetaCharacters() • _StringReplaceWholeWord() • _StringStripChars() • _Temperature() • _TrialPeriod() • _UKToUSDate()/_USToUKDate() • _WinAPI_Create_CTL_CODE() • _WinAPI_CreateGUID() • _WMIDateStringToDate()/_DateToWMIDateString() • Au3 script parsing • AutoIt Search • AutoIt3 Portable • AutoIt3WrapperToPragma • AutoItWinGetTitle()/AutoItWinSetTitle() • Coding • DirToHTML5 • FileInstallr • FileReadLastChars() • GeoIP database • GUI - Only Close Button • GUI Examples • GUICtrlDeleteImage() • GUICtrlGetBkColor() • GUICtrlGetStyle() • GUIEvents • GUIGetBkColor() • Int_Parse() & Int_TryParse() • IsISBN() • LockFile() • Mapping CtrlIDs • OOP in AutoIt • ParseHeadersToSciTE() • PasswordValid • PasteBin • Posts Per Day • PreExpand • Protect Globals • Queue() • Resource Update • ResourcesEx • SciTE Jump • Settings INI • SHELLHOOK • Shunting-Yard • Signature Creator • Stack() • Stopwatch() • StringAddLF()/StringStripLF() • StringEOLToCRLF() • VSCROLL • WM_COPYDATA • More Examples... Updated: 22/04/2018 Link to post Share on other sites
Unc3nZureD 14 Posted April 27, 2012 Author Share Posted April 27, 2012 It's getting closer but still not good :S Real code: 3F1A22826D18C26129D27A6C552069E15304845F Fake code: asd Both are accepted. Username at real one: 43273 Username at fake one: Is an ascii character for the symbol of women. It is not a valid username =D Link to post Share on other sites
UEZ 1,330 Posted April 27, 2012 Share Posted April 27, 2012 (edited) You mixed up a variable -> If IsNumber($Encrypted) Then it must be If IsNumber($Decrypted) Then This example works for me. #include <string.au3> $Number = Random(10, 99999, 1) ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $Number = ' & $Number & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console $Encrypted = _StringEncrypt(1, $Number, "Test_Code", 2) ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $Encrypted = ' & $Encrypted & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console $Given = $Encrypted $Decrypted = _StringEncrypt(0, $Given, "Test_Code", 2) If StringIsInt($Decrypted) Then MsgBox(64, "", "Awesome! Your Key is perfect." & @CRLF & "Your username is: " & $Decrypted) Else MsgBox(16, "", "Key is wrong." & @CRLF & "Incorrect username is: " & $Decrypted) EndIf Br, UEZ Edited April 27, 2012 by UEZ Please don't send me any personal message and ask for support! I will not reply! Selection of finest graphical examples at Codepen.io The own fart smells best! ✌Her 'sikim hıyar' diyene bir avuç tuz alıp koşma!¯\_(ツ)_/¯ ٩(●̮̮̃•̃)۶ ٩(-̮̮̃-̃)۶ૐ Link to post Share on other sites
Unc3nZureD 14 Posted April 27, 2012 Author Share Posted April 27, 2012 Lol. Epic Fail. Thanks Link to post Share on other sites
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now