none
Vb.net : problème de décryptage - Longueur des données à déchiffrer est invalide RRS feed

  • Question

  • Bonjour.

    Je travaille sur un programme qui communique avec un webservice. Je crypte les données envoyées, et mon programme les décrypte. J'ai une erreur sur le décryptage de mes données, il m'indique que la longueur des données à décrypter est invalide.

    Voici ma fonction :

       Public Shared Function Decrypter(ByVal chaine As String) As String
            Dim AES As New System.Security.Cryptography.RijndaelManaged
            Dim Hash_AES As New System.Security.Cryptography.MD5CryptoServiceProvider
            Dim decrypted As String = ""
            Try
                Dim hash(31) As Byte
                Dim temp As Byte() = Hash_AES.ComputeHash(System.Text.ASCIIEncoding.Unicode.GetBytes("Glaudioman"))
                Array.Copy(temp, 0, hash, 0, 16)
                Array.Copy(temp, 0, hash, 15, 16)
                AES.Key = hash
                AES.Mode = System.Security.Cryptography.CipherMode.CBC
                AES.Padding = PaddingMode.Zeros
                Dim DESDecrypter As System.Security.Cryptography.ICryptoTransform = AES.CreateDecryptor
                Dim Buffer As Byte() = Convert.FromBase64String(chaine)
                decrypted = System.Text.ASCIIEncoding.Unicode.GetString(DESDecrypter.TransformFinalBlock(Buffer, 0, Buffer.Length))
                Return decrypted
            Catch ex As Exception
                Return Nothing
            End Try
        End Function

    Et la chaine à décrypter :

    gA8AAB+LCAAAAAAABAA9l8eS8koMhft9WJBMWhINNgyZAXaGIYchp6e/n878dcsFtrulo9iSfHRfrud2ruTm7tfNXMI93Lf7uKnLuJW7ub3LubMrOs9deJ5C8+M2rsx/Eo67i1ye3aUbu4OrwL9m5wTFyTXdiN/ULVwAxsJl+W3gero0MuOuzlsF3grSFmhQ4Pp2V65f5A5Z9cDeQJtmfwJSCqQtqz20DVgbuBdSL+gZR48q8tq8DdjNsJ5H4gOui6uh3dK90beJXiUQZ8jLcN+x/2atiLQSKB3eBrKwBuoThD2rZzjfPPmuxW6E/B9WK7xloFmAfUTKx3XRsM09Dc0S+Sv8VETCEdwD15b1GZgpqOf8d/BfD5QreyX+e3h/52LIbiGziYfS+CEG3QXfxJAWIHnCfQ3nzfXRoQKF6bDFFx1Qv9EwqSjksL7JfY5fflwDXQp49gLFCH+M4DohySK9g/sLnhVPLfCKWFpDnzPoPnu/UKfBX/AUwGGeuYK3xpoTeuXA8NGnjFd6aDVgJcQbTyyPExeL8Ae0KVh1OPPc7zw94emA0oO2itQysifS4gVuSh7vcaWJRwGrLzxlsaXE2xCcFagPKCvKTNOrgMVF0A+KW4ikNToUseaMbwvg9nnvKSY50Jr4KsHvgPw1KxEanUVtGVUGvYHteegCnYEOGHN8lQEjAL+maH2gGOMLX/H8sHsFrUYODMFZs9LnOZJOb+X2hZUDHsgjO4OlQ+THlVs5fNFC5ob9D5gB0spYtlJ2j6DPsm4Ri0MTodMOST5W1JDtEaM7ezNl+RhUO1VT6MbEfcX7G2kZVuxETEH2iUIHrjw6+VCE3NvsekKfE48QhDFaj4l+EhtuqhAbUMZwFdBpgCVFfOuDnmSvi/zZv/NaxUMNeELi9INmFq8vnZYleA88/UTjODbXWU1B34O+A/pQp8+olryniFiXZ8uTAVdbcX2CsGbVsvAXXRqiXaNJB38EYK3waBMuD44X1Df0TSD9FxqfOLWJRJYMOqPVFxJCNBljdU7eewq7Ao6dqzUoUzC6IL+Q2FeEW9DuuMZQHlR9PBCnrOb0XOd3xcMrRe2JXiO4A7jHyuarzmCV+1t2tJFZ45firQvHAquy6N3Ep3f8YhlVZ3eLHRNwWkRhRKRCqIr8P5C6R68he55q1kvWfJPvKzRM8FSANgveBQuKqst7JKcUrQcYH7RJQdlXRibJkwOaV3naYsURCU8stZpTQbu9cs9yZYaEN9pYBfGg7mPHEO684tTmbvlllSgO9x4JVfZ9VcY5+q5VLaxKVYnGWXkfqBZMsP+Gt6zCR7xZRbY6NGb9F/4qVsXBeiHDR+csPsqyZvUmi0Y3/JBShawgJVBEJtjRkKUBvmmB9lEPG/CcQJadxyN4XRA8tNmqmiehiXjbg25VY0lUEtrLg9NBizKIX6pafSQbXhG0JSi/Onl5OLLsPtTpAtW8p+yL4LTamWHf8iuJ7R+wllD7UN/xnHWLv85redMlHne43thuPvSxqYa8CQh91bklSObllGqpRTnGtcYKO3lz2W75uoKvhL4Wd/PoRPnt6Qwu+C+w3oTGdDfbnryX1Q92SJ1ipfVLOw+WESV0iND/B1kRFpmnUsrVKldWNfGB1i2dkreqUEMnMIFvzY92Okvcf4hpHWrrOV9Qt+GboOeIu3nScv+s/vXXh+54PCP6Mv859MrI00nJTGKRRWeqitzm33poiEXWEQ6S0kb+DAsH6H5krQWfD9eLNesjPVVZ6y1j7B2xNlPd2Ap1oJ7bVB7aWbJa+AbV+saAeF6lv/WLMQg7sijJ+kqd/a2ni/JvgP5T9ZsMvzV45mGr+iHrWTx1R6+JzlFW+lhuWefJ4C+bBEpYlVEETupOOXCtrnuqcYFO40T5NAAphn1VeCbcr3BVsdImnDdxiUF5wwMzaG0eeqt/h+i6xJoVHjtA09VUEKHlW94eaf7Kqfaa12q8WcYlVWfr6H3Hfwf4X2gd09zyl911zVIF5eQ3krvsRJrarMraTJEA1bpyHMwSMiqqWlbz56y9lBshtl400dqcliGXAp59TVlN6ZkHOw+SdbRf7S+k31HzcAffpjVVWEd+Q2M9wU7MHn7zoQ9SHJodFp7htfrpKWZl0H3VkxOUBay54seeKlEGzZbqtSv5bK8TV+Veh6OsDm6VKcl11ixnWW4n29btXKfVbbuq43c4SljgqaNUNL0HcEY6QZ78F8PKH/AjJC5UXRLqyl314RtoU3SbqFMcNF/XoLmyWlE1tD5TwkqbO09gW6e1/LVqmFIt+4D+gNMq1II9m4aTmoyqSFgi3eqeZclFGtQ0Yw+hXOKpDZwdfYmU1DWsy1cV6y57Dc09MTBm6PTChjprNqHZV4ZNUh04C9CeNS2vNFlt5fEp6Csordu1sTSB76z39NEjq56VVs8KNX8m/80SM834XfT0NAfaSYi0P1TnuME5+7+zHvBxoE4fIO+gidbmmTIWlvFBD1keerR4GqPfmfsBb1k1umkieuK9M560qh7xv8LrNv9b7NJwl8AN0dJm0FA9KYF2NWXED945aDpb62vthk0XVckjmBdV/wv7aX6R6mxbfDth3BXfEXp2QH0p4in2KnAdkX9i9Qp/Bzus+pzklQ17VtFfeD0AoUsU7VRZvO0bqMxOg+c4vE14Y3AMwbyh34y3JhZu4NrrG+jIylu1sa9vBeuJG2gKOskhGB248/jc5gKrXwdZ3Yd/q++DGxhtqO27z76DbKIdg2SdoYNeRZ1769xfyLIuEWoOGuscjeCzcxNj91vV1nq9fTGeeeuqy7U1VyYUH5vMm+x5sv1vtk5pTuoTk5TmxQVXqC/PEvc49HZaGsqGCBts3q4j+T/G2O6tgA8AAA==

    Quelqu'un aurait une idée ?

    Merci d'avance !


    pieret

    mardi 28 février 2017 16:13

Réponses

  • Trouvé ! Comme quoi une bonne nuit de sommeil...

    Ma fonction était bonne, c’est juste que je compressait les données renvoyées par le webservice. Le webservice cryptait les données et zippait le cryptage, et dans mon programme je décryptait avant de dézipper. Donc je décryptait une mauvais chaîne.

    Merci a ceux qui ont pris le temps de regarder !!!!!!!


    pieret




    • Marqué comme réponse glaudioman mercredi 1 mars 2017 08:17
    • Modifié glaudioman mercredi 1 mars 2017 08:18
    mercredi 1 mars 2017 08:17