Problem with _StringEncrypt

[FrenchTroll]

Hello,

Sorry for my english but i am french...

How can we write in a inifile an encrypted password by an imputbox ?

#include <guiconstants.au3>
#include <string.au3>
      
GUICreate("test")
$input = GUICtrlCreateInput ( "", 10,  5, 100, 20, $ES_PASSWORD)
$EncryptButton = GuiCtrlCreateButton('Encrypt', 31, 54, 40, 40)

GUISetState () 

While 1
sleep(1)
$msg = GUIGetMsg()
       Select       
    Case $msg = $EncryptButton
           $pass = GuiCtrlRead($input)
           IniWrite("Conf.ini", "PASS", "Mot de passe", _StringEncrypt(0,$pass,"12345","2"))                
               ExitLoop
       EndSelect
Wend

that return only one strange letter...

THANKS

[Valuater]

0 is to decrypt

#include <guiconstants.au3>
#include <string.au3>
      
GUICreate("test")
$input = GUICtrlCreateInput ( "", 10,  5, 100, 20, $ES_PASSWORD)
$EncryptButton = GuiCtrlCreateButton('Encrypt', 31, 54, 40, 40)

GUISetState ()

While 1
sleep(1)
$msg = GUIGetMsg()
       Select        
    Case $msg = $EncryptButton
           $pass = GuiCtrlRead($input)
           ;IniWrite("Conf.ini", "PASS", "Mot de passe", _StringEncrypt(1,$pass,"12345","2"))  
           $encypt = _StringEncrypt(1,$pass,"12345","2")
            MsgBox(0x0,"encypted", $encypt)
            $dencypt = _StringEncrypt(0,$encypt,"12345","2")
            MsgBox(0x0,"encypted", $dencypt)
               ExitLoop
       EndSelect
Wend

8)

[Jos]

change this line:

IniWrite("Conf.ini", "PASS", "Mot de passe", _StringEncrypt(1, $pass, "12345", 2))

[FrenchTroll]

Arff...

Thanks both

Edited July 2, 2007 by FrenchTroll