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=deStrchr(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=deStrc end if end if next URLDecode=deStr End function
