如何 Encode 和 Decode URL 地址？

最新推荐文章于 2023-07-25 16:10:49 发布

最新推荐文章于 2023-07-25 16:10:49 发布 · 152 阅读

文章标签：

#VBScript #ASP.net #ASP #.net

博客指出 ASP 的 Server 对象有 Server.Encode() 方法，却无相应解码方法。强调此类方法很有用，并提供了使用 VBScript 和 JScript 实现解码的代码。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

这个问题比较热门的说～ASP 的 Server 对象提供了一个 Server.Encode() 方法，但是却没有相应的 Server.Decode() 方法或者 Unencode() 方法 >_< 也许 M$ 认为这没必要……大错特错啊。这样的方法非常有用，这里提供一种实现～包括 VBScript 和 JScript 代码。

VBScript
<% 
Function URLDecode(str) 
str = Replace(str, "+", " ") 
For i = 1 To Len(str) 
sT = Mid(str, i, 1) 
If sT = "%" Then 
If i+2 < Len(str) Then 
sR = sR & _ 
Chr(CLng("&H" & Mid(str, i+1, 2))) 
i = i+2 
End If 
Else 
sR = sR & sT 
End If 
Next 
URLDecode = sR 
End Function 

Function URLEncode(str) 
URLEncode = Server.URLEncode(str) 
End Function 

str1 = "http://www.foo.com/blah.asp?foo=1 & 2 &g=0" 
str2 = URLEncode(str1) 
str3 = URLDecode(str2) 
Response.Write(str1 & "<br>" & str2 & "<br>" & str3) 
%>
JScript