Antes de nada decir que me parece tremendamente sospechoso querer obtener por codigo direcciones de correo de una pagina web, me suena a
spam, pero por otro lado no estoy para juzgar a nadie
El caso es que el texto esta codificado con el mismo algoritmo que se utiliza para codificar las url. El cual es bastante sencillo de descifrar:
Código Delphi
[-]
function URLDecode(s: string): string;
var
i: integer;
Ch: integer;
begin
result := '';
i := 1;
while i <= Length(s) do
begin
if copy(s, i, 1) = '%' then
begin
Ch := StrToIntDef('$' + copy(s, i + 1, 2), -1);
if (Ch > 0) and (Ch < 256) then
result := result + Char(Ch);
inc(i, 2);
end
else
result := result + copy(s, i, 1);
inc(i);
end;
end;
En concreto si le aplicas la funcion anterior al texto que tu indicas nos queda esto:
Código:
document.write('<a href="mailto:antandujar5@hotmail.com?subject=APRILIA%20PEGASO%20650%20ei%202004" >antandujar5@hotmail.com</a>');
A partir de ahi usalo para lo que quieras
