ASP编码和解码函数详解

ASP编码解码：当内置函数不够用时

在ASP开发中，处理URL参数编码解码是家常便饭。通常情况下，使用Request对象获取的URL字符串，ASP会自动帮你完成解码，省心不少。但有个场景是例外：当你通过Request.BinaryRead(Request.TotalBytes)直接读取POST原始数据时，会发现所有编码过的字符都“原形毕露”，以百分号（%）加上十六进制数的形式呈现。这时，系统可不会主动帮你翻译，手动解码就成了必选项。

ASP解码函数：手动解析百分号编码

下面这个函数，就是专门为上述场景准备的。它能将形如“%E4%B8%AD”这样的编码字符串，还原成原始字符。

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

其核心逻辑是遍历字符串，识别“%”符号，并将其后紧跟的十六进制数转换为对应的字符。对于加号“+”，则按照URL编码规范替换为空格。处理一些特殊字符时，它也有相应的判断逻辑来确保准确性。

ASP编码函数：探索编码原理的实现

说完解码，我们再来看看编码。其实ASP本身提供了强大的Server.URLEncode函数，日常使用它绝对是最稳妥的选择。不过，理解背后的原理总是有益的。出于兴趣，这里也分享一个手动实现的编码函数，它展示了如何将一个字符串（特别是双字节的中文字符）转换为百分号编码格式。

private Function URLEncoding(vstrIn)
   strReturn = ""
  For i = 1 To Len(vstrIn)
   ThisChr = Mid(vStrIn,i,1)
   If Abs(Asc(ThisChr)) < &HFF Then
   strReturn = strReturn & ThisChr
   Else
   innerCode = Asc(ThisChr)
   If innerCode < 0 Then
   innerCode = innerCode + &H10000
   End If
   Hight8 = (innerCode And &HFF00)/ &HFF
   Low8 = innerCode And &HFF
   strReturn = strReturn & "%" & Hex(Hight8) & "%" & Hex(Low8)
   End If
  Next
  URLEncoding = strReturn
End Function

这个函数的思路在于区分单字节和双字节字符。对于ASCII字符，它选择原样输出；而对于中文字符这类双字节字符，则会取出其高位和低位的字节值，分别转换为十六进制，并加上“%”前缀进行组合。

话说回来，必须强调一点：在生产环境中，强烈建议你始终使用ASP内置的Server.URLEncode函数进行编码。上面这个自定义函数尽管经过多次测试，但难保没有未发现的边界情况或潜在Bug。内置函数经过长期实践检验，其稳定性和兼容性都更有保障。

总之，处理好编码解码是Web开发中避免乱码、确保数据正确传输的基础。希望这两个具体的函数示例及其背后的逻辑解读，能帮你更从容地应对ASP开发中遇到的相关问题。