none
Codificação base 64 RRS feed

  • Pergunta

  • Alguém sabe me informar como fazer esse tipo de codificação, chamada "BASE 64"

    usei esse código

    Dim senha As String
    Dim base64 As String
    senha = txtpass.Text
    base64 =Convert.ToBase64String(System.Text.Encoding.UTF8.GetBytes(senha))
    

    mas ele não ta gerando uma senha iguais as que estão em meu banco de dados

    as que estão no banco são todas no formato "0p+1o2+ep0or1SmecqyqBd9VAmA=" "/IxZaUv01Ka1eatNxRtA6LXVCX8=" e assim por diante.

    o codigo gera senha no estilo "bmluaG9sb3Zl" "YmxhYmxhYmxh" e assim por diante.

    no codigo php que estudei pra tentar gerar as senhas o codigo é esse

    $password = base64_encode(pack('H*', sha1($_POST['password'])));

    Alguém sabe me informar o que falta eu fazer pra deixar minhas senhas com formato iguais ao do codigo php?

    quinta-feira, 14 de julho de 2016 04:23

Respostas

  • BOM PESSOAL, CONSEGUIR RESOLVER MEU PROBLEMA SOZINHO

    A PROBLEMA É QUE EU TAVA CODIFICANDO SÓ EM BASE64, E O MODELO QUE EU QUERIA QUE FICASSE ELE MISTURA BASE64 COM SHA1

    AI DEI UMA PESQUISA E FIZ ESSE CODIGO

            
            Dim SHA1CryptoServiceProvider, sha1Hasher As New SHA1CryptoServiceProvider()
            Dim ePass() As Byte
            Dim encoder = New UTF8Encoding()
            ePass = sha1Hasher.ComputeHash(encoder.GetBytes(txtpass.Text))
    
            SUALABEL.TEXT = Convert.ToBase64String(ePass)

    ESPERO QUE ALGUÉM POSSA SER AJUDADO COM MEU CÓDIGO, VALEU A TODOS. ;)


    • Editado Breno Riot quinta-feira, 14 de julho de 2016 06:00
    • Marcado como Resposta Breno Riot quinta-feira, 14 de julho de 2016 06:02
    quinta-feira, 14 de julho de 2016 05:59