kurey Posted May 15, 2008 Share Posted May 15, 2008 RC4 function can't work in th Unicode version function : _StringEncrypt _StringEncryptRC4 (Author(s):RazerM) _StringDecryptRC4 (Author(s):RazerM) au3 version: 3.2.10.0 3.2.4.9 Link to comment Share on other sites More sharing options...
PsaltyDS Posted May 15, 2008 Share Posted May 15, 2008 RC4 function can't work in th Unicode version function :_StringEncrypt_StringEncryptRC4 (Author(s):RazerM)_StringDecryptRC4 (Author(s):RazerM)au3 version:3.2.10.03.2.4.9The _StringEncrypt() function that comes with AutoIt's String.au3 UDF works fine with Unicode. Issues with RazerM's UDFs should be taken up in that topic (which you didn't even bother to link to). Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law Link to comment Share on other sites More sharing options...
kurey Posted May 16, 2008 Author Share Posted May 16, 2008 pls unrar and copy the AutoIt3.exe and AutoIt3A.exe into the floder,then run "run_unicode.cmd" and "run_ansi.cmd" the AutoIt3.exe/ AutoIt3A.exe wil run the Example.au3(from the help.chm) then 'Encrypt' or 'Decrypt' something in two windowsExample.part01.rar Link to comment Share on other sites More sharing options...
kurey Posted May 16, 2008 Author Share Posted May 16, 2008 part 2Example.part02.rar Link to comment Share on other sites More sharing options...
PsaltyDS Posted May 16, 2008 Share Posted May 16, 2008 pls unrar and copy the AutoIt3.exe and AutoIt3A.exe into the floder,then run "run_unicode.cmd" and "run_ansi.cmd"the AutoIt3.exe/ AutoIt3A.exe wil run the Example.au3(from the help.chm)then 'Encrypt' or 'Decrypt' something in two windowsNot jolly likely. I already have AutoIt installed, why would I need to download anything and copy it around like that? Why can't you just post a short demo script to the forum that shows your issue? Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law Link to comment Share on other sites More sharing options...
kurey Posted May 17, 2008 Author Share Posted May 17, 2008 as you wishthe code is from the help,and i didn't change anything,i run it with 2 version,pls look at the result picturesexpandcollapse popup#include <guiconstants.au3> #include <string.au3> ; GUI and String stuff $WinMain = GuiCreate('Encryption tool', 400, 400) ; Creates window $EditText = GuiCtrlCreateEdit('',5,5,380,350) ; Creates main edit $InputPass = GuiCtrlCreateInput('',5,360,100,20, 0x21) ; Creates the password box with blured/centered input $InputLevel = GuiCtrlCreateInput(1, 110, 360, 50, 20, 0x2001) $UpDownLevel = GUICtrlSetLimit(GuiCtrlCreateUpDown($inputlevel),10,1) ; These two make the level input with the Up|Down ability $EncryptButton = GuiCtrlCreateButton('Encrypt', 170, 360, 105, 35) ; Encryption button $DecryptButton = GuiCtrlCreateButton('Decrypt', 285, 360, 105, 35) ; Decryption button GUICtrlCreateLabel('Password', 5, 385) GuiCtrlCreateLabel('Level',110,385) ; Simple text labels so you know what is what GuiSetState() ; Shows window Do $Msg = GuiGetMsg() If $msg = $EncryptButton Then GuiSetState(@SW_DISABLE,$WinMain); Stops you from changing anything $string = GuiCtrlRead($EditText); Saves the editbox for later GUICtrlSetData($EditText,'Please wait while the text is Encrypted/Decrypted.'); Friendly message GuiCtrlSetData($EditText,_StringEncrypt(1,$string,GuiCtrlRead($InputPass),GuiCtrlRead($InputLevel))) ; Calls the encryption. Sets the data of editbox with the encrypted string ; The encryption starts with 1/0 to tell it to encrypt/decrypt ; The encryption then has the string that we saved for later from edit box ; It then reads the password box & Reads the level box GuiSetState(@SW_ENABLE,$WinMain); This turns the window back on EndIf If $msg = $DecryptButton Then GuiSetState(@SW_DISABLE,$WinMain); Stops you from changing anything $string = GuiCtrlRead($EditText); Saves the editbox for later GUICtrlSetData($EditText,'Please wait while the text is Encrypted/Decrypted.'); Friendly message GuiCtrlSetData($EditText,_StringEncrypt(0,$string,GuiCtrlRead($InputPass),GuiCtrlRead($InputLevel))) ; Calls the encryption. Sets the data of editbox with the encrypted string ; The encryption starts with 1/0 to tell it to encrypt/decrypt ; The encryption then has the string that we saved for later from edit box ; It then reads the password box & Reads the level box GuiSetState(@SW_ENABLE,$WinMain); This turns the window back on EndIf Until $msg = $GUI_EVENT_CLOSE; Continue loop untill window is closed Link to comment Share on other sites More sharing options...
PsaltyDS Posted May 17, 2008 Share Posted May 17, 2008 as you wish the code is from the help,and i didn't change anything,i run it with 2 version,pls look at the result pictures expandcollapse popup#include <guiconstants.au3> #include <string.au3> ; GUI and String stuff $WinMain = GuiCreate('Encryption tool', 400, 400) ; Creates window $EditText = GuiCtrlCreateEdit('',5,5,380,350) ; Creates main edit $InputPass = GuiCtrlCreateInput('',5,360,100,20, 0x21) ; Creates the password box with blured/centered input $InputLevel = GuiCtrlCreateInput(1, 110, 360, 50, 20, 0x2001) $UpDownLevel = GUICtrlSetLimit(GuiCtrlCreateUpDown($inputlevel),10,1) ; These two make the level input with the Up|Down ability $EncryptButton = GuiCtrlCreateButton('Encrypt', 170, 360, 105, 35) ; Encryption button $DecryptButton = GuiCtrlCreateButton('Decrypt', 285, 360, 105, 35) ; Decryption button GUICtrlCreateLabel('Password', 5, 385) GuiCtrlCreateLabel('Level',110,385) ; Simple text labels so you know what is what GuiSetState() ; Shows window Do $Msg = GuiGetMsg() If $msg = $EncryptButton Then GuiSetState(@SW_DISABLE,$WinMain); Stops you from changing anything $string = GuiCtrlRead($EditText); Saves the editbox for later GUICtrlSetData($EditText,'Please wait while the text is Encrypted/Decrypted.'); Friendly message GuiCtrlSetData($EditText,_StringEncrypt(1,$string,GuiCtrlRead($InputPass),GuiCtrlRead($InputLevel))) ; Calls the encryption. Sets the data of editbox with the encrypted string ; The encryption starts with 1/0 to tell it to encrypt/decrypt ; The encryption then has the string that we saved for later from edit box ; It then reads the password box & Reads the level box GuiSetState(@SW_ENABLE,$WinMain); This turns the window back on EndIf If $msg = $DecryptButton Then GuiSetState(@SW_DISABLE,$WinMain); Stops you from changing anything $string = GuiCtrlRead($EditText); Saves the editbox for later GUICtrlSetData($EditText,'Please wait while the text is Encrypted/Decrypted.'); Friendly message GuiCtrlSetData($EditText,_StringEncrypt(0,$string,GuiCtrlRead($InputPass),GuiCtrlRead($InputLevel))) ; Calls the encryption. Sets the data of editbox with the encrypted string ; The encryption starts with 1/0 to tell it to encrypt/decrypt ; The encryption then has the string that we saved for later from edit box ; It then reads the password box & Reads the level box GuiSetState(@SW_ENABLE,$WinMain); This turns the window back on EndIf Until $msg = $GUI_EVENT_CLOSE; Continue loop untill window is closed I see what you mean now, but can't reproduce your result. This code gives the same result for me in regular AutoIt3.exe (Unicode) and with AutoIt3A.exe (ANSI). Are you running any language packs on your Windows? We fought to a stand still on another issue where certain code pages could cause _StringEncrypt() to fail. I posted an alternative function in the Example Scripts Forum called __StringEncrypt() (note the double underbar in the name). That does not have this problem. Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law Link to comment Share on other sites More sharing options...
kurey Posted May 17, 2008 Author Share Posted May 17, 2008 thank you for your help, __StringEncrypt() is work fine and the reson is the language packs ? i'm useing the windows xp Simplified Chinese verion Link to comment Share on other sites More sharing options...
PsaltyDS Posted May 17, 2008 Share Posted May 17, 2008 thank you for your help, __StringEncrypt() is work fineand the reson is the language packs ? i'm useing the windows xp Simplified Chinese verionOh, yeah. That's probably it. Glad the __StringEncrypt() helped. Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law Link to comment Share on other sites More sharing options...
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