Jump to content
Adauto Sanches Soares

Func _Crypt_DecryptData

Recommended Posts

Bom dia senhores,

Meu primeiro post, então já peço desculpas se houver algo incorreto.

Gostaria de saber se alguém consegue me dar uma luz . . . . estou utilizando as funções EncryptData e DecryptData, mas tendo problemas ao decriptar uma senha que utiliza 2 sinais de exclamação (!!). Na verdade a console me indica que foi decriptada com os caracteres, mas ao utilizar "Send" os caracteres não são inseridos.

Segue parte do código:

FileOpen(FILECr)
        $sFim = FileReadLine(FILECr, "3")
        FileClose($FILECr)

        Local $sUserKey = $sFim
        $aRet = IniRead($sfile, $sSystem, $sParam, "")
        $aPass = StringSplit($aRet, ";")
        If $aPass[0] > 1 Then
            $sUser = $aPass[1]
            $sPass = $aPass[2]
        Else
            Return @error
        EndIf

        $sPswd = _Crypt_DecryptData($sPass, $sUserKey, $CALG_RC2)
        $sPswdM = BinaryToString ($sPswdM)

...

...

...

...

    If WinExists("Client") Then
        Send($sUserM)
        Sleep(500)
        Send("{TAB}")
        Sleep(500)
        Send($sPswdM)

 

Share this post


Link to post
Share on other sites

Olá Adauto.

   Eu diria que seu erro não é na função _Crypt_DecryptData, mas na função SEND.

   Como vc mesmo observou o console te retorna a senha correta, porém o SEND não funciona.

   Por quê? Coincidentemente a letra "!" (ponto de exclamação) é uma macro no comando SEND para poder enviar a tecla ALT, assim, quando vc envia a seqüência:

Send("!a")

   Vc está enviando um ALT-A para o computador entendeu?

   No seu caso, onde a letra "!" faz parte do que precisa ser enviado é necessário modificar o comportamento da função SEND, informando o segundo parâmetro como 1 (um).

Send("!a", 1)

   Dessa forma, vc está dizendo para a função SEND que o "!" deve ser interpretado apenas como mais uma letra.

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now


×