对Server.UrlEncode进行字符反编译

我们这里试输出一段字符：<％response.write Server.UrlEncode("织梦幻影")％>，页面显示结果为：％D6％AF％C3％CE％BB％C3％D3％B0，已成功编译。

　　如果再对其进行反编译处理呢？

该函数转自互联网

function urldecode(encodestr) 
newstr="" 
havechar=false 
lastchar="" 
for i=1 to len(encodestr) 
char_c=mid(encodestr,i,1) 
if char_c="+" then 
newstr=newstr & " " 
elseif char_c="％" then 
next_1_c=mid(encodestr,i+1,2) 
next_1_num=cint("&H" & next_1_c) 
if havechar then 
havechar=false 
newstr=newstr & chr(cint("&H" & lastchar & next_1_c)) 
else 
if abs(next_1_num)《=127 then 
newstr=newstr & chr(next_1_num) 
else 
havechar=true 
lastchar=next_1_c 
end if 
end if 
i=i+2 
else 
newstr=newstr & char_c 
end if 
next 
urldecode=newstr 
end function

　　最后输出反编译为：<％response.write UrlDecode("％D6％AF％C3％CE％BB％C3％D3％B0")％>

　　或者：<％response.write UrlDecode(Server.UrlEncode("织梦幻影"))％>