asp网址分割分问请教!!!
来源:百度知道 编辑:UC知道 时间:2024/05/16 18:18:10
这个函数是反编辑程序,可以帮你转换,使用方法为:urldecode("%C1%F7%CF%E3%D3%F0")
Function URLDecode(strUrlEnCode)
Dim strURLDecode
Dim c, i, v
strURLDecode=""
For i = 1 to Len(strUrlEnCode)
c = Mid(strUrlEnCode,i,1)
If c = "%" Then
v = eval("&h" + Mid(strUrlEnCode, i + 1, 2))