ASP小技巧：对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("织梦幻影"))%>