ASP让url的中文显示为编码
2018-09-06 10:29
  asp解码url 
复制代码 代码如下: 
<a href=1.asp?action=<%=server.urlencode(你好)%>>asdf</a> 
解码函数 
[code] 
<% 
Function URLDecode(enStr) 
dim deStr,strSpecial 
dim c,i,v 
deStr= 
strSpecial=!#$%&()*+,.-_/:;<=>?@[\]^`{}~% 
for i=1 to len(enStr) 
c=Mid(enStr,i,1) 
if c=% then 
v=eval(&h+Mid(enStr,i+1,2)) 
if inStr(strSpecial,chr(v))>0 then 
deStr=deStr&chr(v) 
i=i+2 
else 
v=eval(&h+ Mid(enStr,i+1,2) + Mid(enStr,i+4,2)) 
deStr=deStr & chr(v) 
i=i+5 
end if 
else 
if c=+ then 
deStr=deStr& 
else 
deStr=deStr&c 
end if 
end if 
next 
URLDecode=deStr 
End function 
response.Write URLDecode(request.QueryString(action)) 
%> 
[html]