Submit articles - Debt Consolidation - Debt Consolidation - Debt Consolidation - Free Advertising
PDA

View Full Version : <!--hppage status="protected"--> - How to Unlock ?

pragos
Apr 15th 2006, 12:38 am
Hello ,

Someone doing cheat on my toplist and he was protect html codes ...

Can we Encode it ? I need to unlock his codes...

His Protected Page :

<!--hppage status="protected"-->

<html>

<HEAD>

<SCRIPT LANGUAGE="JavaScript"><!--

document.write(unescape("%3C%53%43%52%49%50%54%20%4C%41%4E%47%55%41%47%45%3D%22%4A%61%76%61%53%63%72%69%70%74%22%3E%3C%21%2D%2D%0D%0A%68%70%5F%6F%6B%3D%74%72%75%65%3B%66%75%6E%63%74%69%6F%6E%20%68%70%5F%64%30%30%28%73%29%7B%69%66%28%21%68%70%5F%6F%6B%29%72%65%74%75%72%6E%3B%64%6F%63%75%6D%65%6E%74%2E%77%72%69%74%65%28%73%29%7D%2F%2F%2D%2D%3E%3C%2F%53%43%52%49%50%54%3E"));//--></SCRIPT><SCRIPT LANGUAGE="JavaScript"><!--

hp_d00(unescape("%3C%68%65%61%64%3E%0D%0A%09%3C%74%69%74%6C%65%3E%55%6E%74%69%74%6C%65%64%3C%2F%74%69%74%6C%65%3E%0D%0A%3C%73%63%72%69%70%74%20%6C%61%6E%67%75%61%67%65%3D%22%6A%61%76%61%73%63%72%69%70%74%22%3E%3C%21%2D%2D%0D%0A%76%61%72%20%6E%69%64%3D%30%3B%0D%0A%76%61%72%20%74%69%64%3D%34%33%31%3B%0D%0A%76%61%72%20%6D%69%64%3D%39%34%37%3B%0D%0A%76%61%72%20%66%75%6C%6C%3D%31%3B%0D%0A%76%61%72%20%68%65%69%67%68%74%3D%73%63%72%65%65%6E%2E%61%76%61%69%6C%48%65%69%67%68%74%20%2D%20%33%30%3B%0D%0A%76%61%72%20%77%69%64%74%68%3D%73%63%72%65%65%6E%2E%61%76%61%69%6C%57%69%64%74%68%20%2D%20%31%30%3B%0D%0A%76%61%72%20%70%6F%70%44%69%61%6C%6F%67%4F%70%74%69%6F%6E%73%20%3D%20%22%64%69%61%6C%6F%67%57%69%64%74%68%3A%22%2B%77%69%64%74%68%2B%22%70%78%3B%20%64%69%61%6C%6F%67%48%65%69%67%68%74%3A%22%2B%68%65%69%67%68%74%2B%22%70%78%3B%20%64%69%61%6C%6F%67%54%6F%70%3A%30%70%78%3B%20%64%69%61%6C%6F%67%4C%65%66%74%3A%30%70%78%3B%20%65%64%67%65%3A%52%61%69%73%65%64%3B%20%63%65%6E%74%65%72%3A%30%3B%20%68%65%6C%70%3A%30%3B%20%72%65%73%69%7A%61%62%6C%65%3A%31%3B%20%73%63%72%6F%6C%6C%3A%31%3B%20%73%74%61%74%75%73%3A%30%22%3B%0D%0A%76%61%72%20%70%6F%70%57%69%6E%64%6F%77%4F%70%74%69%6F%6E%73%20%3D%20%22%73%63%72%6F%6C%6C%62%61%72%73%3D%31%2C%6D%65%6E%75%62%61%72%3D%31%2C%74%6F%6F%6C%62%61%72%3D%31%2C%6C%6F%63%61%74%69%6F%6E%3D%31%2C%70%65%72%73%6F%6E%61%6C%62%61%72%3D%31%2C%73%74%61%74%75%73%3D%31%2C%72%65%73%69%7A%61%62%6C%65%3D%31%22%3B%0D%0A%76%61%72%20%65%78%69%74%20%3D%20%74%72%75%65%3B%0D%0A%76%61%72%20%75%73%65%50%6F%70%44%69%61%6C%6F%67%20%3D%20%74%72%75%65%3B%0D%0A%76%61%72%20%69%73%55%73%69%6E%67%53%70%65%63%69%61%6C%20%3D%20%66%61%6C%73%65%3B%0D%0A%66%75%6E%63%74%69%6F%6E%20%6E%6F%72%6D%61%6C%5F%65%78%69%74%28%29%7B%0D%0A%69%66%28%65%78%69%74%20%26%26%20%21%69%73%55%73%69%6E%67%53%70%65%63%69%61%6C%29%20%7B%0D%0A%65%78%69%74%20%3D%20%66%61%6C%73%65%3B%0D%0A%77%69%6E%64%6F%77%2E%6F%70%65%6E%28%70%6F%70%55%52%4C%2C%22%22%2C%70%6F%70%57%69%6E%64%6F%77%4F%70%74%69%6F%6E%73%29%3B%7D%7D%0D%0A%2D%2D%3E%3C%2F%73%63%72%69%70%74%3E%0D%0A"));//--></SCRIPT><SCRIPT LANGUAGE="JavaScript"><!--

hp_d00(unescape("%3C%73%63%72%69%70%74%20%6C%61%6E%67%75%61%67%65%3D%22%6A%73%63%72%69%70%74%2E%65%6E%63%6F%64%65%22%20%73%72%63%3D%22%68%74%74%70%3A%2F%2F%77%77%77%2E%63%69%63%69%77%65%62%2E%6E%65%74%2F%63%6F%70%7A%2E%6A%73%22%3E%3C%2F%73%63%72%69%70%74%3E"));//--></SCRIPT><SCRIPT LANGUAGE="JavaScript"><!--

hp_d00(unescape("%09%0D%0A%3C%2F%68%65%61%64%3E"));//--></SCRIPT></HEAD>

<BODY><NOSCRIPT>To display this page you need a browser with JavaScript support.</NOSCRIPT><SCRIPT LANGUAGE="JavaScript"><!--

hp_d00(unescape("%3C%62%6F%64%79%20%6F%6E%55%6E%6C%6F%61%64%3D%22%6E%6F%72%6D%61%6C%5F%65%78%69%74%28%29%22%3E%0D%0A%0D%0A%0D%0A%0D%0A%3C%2F%62%6F%64%79%3E"));//--></SCRIPT></BODY>

</html>
clancey
Apr 15th 2006, 5:26 pm
If you have perl installed, do the following.

Save that material to a file named "junk.html"

Write a small perl script called reveal.pl

Run the script and view the contents of the file named "revealed.html"

This is the script:


$infile = "junk.html";
$outfile = "revealed.html";

open(INFILE, "$infile");
if(!INFILE) { return "cannot open $infile"; }
if(INFILE)
{
my @content = <INFILE>;
$theText = join( "", @content);
}
close(INFILE);

while ( $theText =~ m/([=\%\&]([A-Za-z0-9]{2}))/g )
{ my $to = hex($2); $to = chr($to); if($2 ne "01") { $theText =~ s/[=\%]$2/$to/g; } }

open(OUTFILE, ">$outfile");
if(!OUTFILE) { return "cannot create $outfile"; }
print OUTFILE $theText;
close(OUTFILE);