Réponse acceptée !
Rien que pour toi :
<%
// encodage
function encodepwd(pwd)
table1 = array("0","1","2","3","4","5","6","7","8","9","a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","Z","Y","Z")
table2 = array("zero","unite","deux","trois","quatre","cinq","six","sept","huit","neuf","alpha","bravo","charlie","delta","echo","foxtrot","golf","hotel","india","juliet","kilo","lima","mike","november","oscar","papa","quebec","romeo","sierra","tango","uniform","victor","whisky","x-ray","yankee","zulu","ALPHA","BRAVO","CHARLIE","DELTA","ECHO","FOXTROT","GOLF","HOTEL","INDIA","JULIET","KILO","LIMA","MIKE","NOVEMBER","OSCAR","PAPA","QUEBEC","ROMEO","SIERRA","TANGO","UNIFORM","VICTOR","WHISKY","X-RAY","YANKEE","ZULU")
pwdcode = ""
for i=0 to (len(pwd)-1) step 1
for j=0 to ubound(table1) step 1
if (table1(j)=mid(pwd,i+1,1)) then
pwdcode = pwdcode & table2(j)
if (i<>len(pwd)-1) then
pwdcode = pwdcode & "_"
end if
end if
next
next
encodepwd = pwdcode
end function
%>
<%
// decodage
function decodepwd(pwdcode)
table1 = array("0","1","2","3","4","5","6","7","8","9","a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","Z","Y","Z")
table2 = array("zero","unite","deux","trois","quatre","cinq","six","sept","huit","neuf","alpha","bravo","charlie","delta","echo","foxtrot","golf","hotel","india","juliet","kilo","lima","mike","november","oscar","papa","quebec","romeo","sierra","tango","uniform","victor","whisky","x-ray","yankee","zulu","ALPHA","BRAVO","CHARLIE","DELTA","ECHO","FOXTROT","GOLF","HOTEL","INDIA","JULIET","KILO","LIMA","MIKE","NOVEMBER","OSCAR","PAPA","QUEBEC","ROMEO","SIERRA","TANGO","UNIFORM","VICTOR","WHISKY","X-RAY","YANKEE","ZULU")
tablepwd = split(pwdcode,"_")
pwd = ""
for i=0 to ubound(tablepwd) step 1
for j=0 to ubound(table2) step 1
if (table2(j)=tablepwd(i)) then
pwd = pwd & table1(j)
end if
next
next
decodepwd = pwd
end function
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html charset=windows-1252">
<title>exemple</title>
</head>
<body>
Exemple :<br><br>
<%
pwd = "aEf21PwS3u"
response.write "pwd : " & pwd &"<br>"
pwdcode = encodepwd(pwd)
response.write "pwdcode : " & pwdcode &"<br>"
pwddecode = decodepwd(pwdcode)
response.write "pwddecode : " & pwddecode &"<br>"
%>
</body>
</html>
PS : je l'ai fait aussi en PHP ...