Cryptage par translation

Télécharger le projet
Commenter

Description

La cryptographie est la science qui utilise les mathématiques pour chiffrer et déchiffrer des données. La cryptographie vous permet de stocker des informations sensibles ou de les transmettre à travers des réseaux non sûrs de telle sorte qu’elles ne puissent être lues par personne à l’exception du destinataire convenu.
--------------
La cryptographie est une fonction bijective, donc elle possède une fonction inverse!
--------------
Cryptographie par translation:
Changement de position du caractère en utilisant la fonction de longueur et position!
--------------
l'alphabet prend dans l'intervalle de 32 à 255

Source / Exemple : 


Public Function translater(saisie As String, b As Boolean) As String
translater = ""
For a = 1 To Len(saisie) Step 1 'Toujours appartenir dans l'ensemble [32 à 255]
    If b = False Then
        translater = translater & Chr((((Asc(Mid(saisie, a, 1)) - 32) + 223 - (a Mod 223)) Mod 223) + 32)
    Else
        translater = translater & Chr(((Asc(Mid(saisie, a, 1)) - 32 + (a Mod 223)) Mod 223) + 32)
    End If
Next a
End Function

Public Function generation_mot(lava As Long) As String
generation_mot = ""
Randomize
For a = 1 To Abs(lava) Step 1 'Toujours appartenir dans l'ensemble [32 à 255]
    generation_mot = generation_mot & Chr(CInt(Rnd() * 223) + 32) 'les caractères imprimables
Next a
End Function

Conclusion :


à vous de crypter les caractères suivants: à la ligne et tabulation!
Télécharger le projet

Codes Sources

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (ravorasolofo)