Cryptage d'une chaîne par xor

Soyez le premier à donner votre avis sur cette source.

Snippet vu 20 325 fois - Téléchargée 36 fois

Contenu du snippet

Cette fonction vous permet de crypter et décrypter une chaîne (mot de passe..). Bon c'est une sécurité minime facile à "casser", mais c'est déjà ça...

Pour décrypter une chaîne cryptée, appeler cette fonction avec en paramètre votre chaîne cryptée.
a+

Source / Exemple :


<%
' Crypte et décrypte un mot de passe selon la méthode Xor
	function crypter(s)
		dim i
		dim temp
	
		for i=1 to len(s)
			temp=temp+chr(asc(mid(s,i,1)) xor 33)
		next
	
		crypter=temp
	end function
%>

A voir également

Ajouter un commentaire

Commentaires

LleWellA
Messages postés
37
Date d'inscription
mardi 18 juin 2002
Statut
Membre
Dernière intervention
28 juin 2007

Salut,

heu juste une question ???
Comment fait-on pour décrypter ? cela devrait être un XOR .. Mais quel valeur ?
merci

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.