ASP编码和解码函数详解
2015-10-08 10:58
686 查看
用ASP开发的时候遇到一个解码问题。虽然在ASP中使用Request获取编码过URL字符串会自动解码,但是Request.BinaryRead(Request.TotalBytes)取得Post数据时却不会解码,所以只能手动进行解码。
ASP解码函数:
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
只是个人爱好,自己研究了一下编码的实现思路,最后自己写了一个编码函数,提供大家参考。注:ASP有内置的编码函数,即是Server.URLEncode。
ASP编码函数:
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
建议大家在中文编码的时候,还是使用ASP 内置的函数。虽然上面这个编码函数测试过N 遍了,没有发现问题,但是以防万一存在Bug。
以上就是关于ASP编码和解码函数,希望对大家的学习有所帮助。
您可能感兴趣的文章:
相关文章推荐
- Asp.net Web.Config - 配置元素 trace
- Asp.net Web.Config - 配置元素 caching
- Spring @Aspect切面参数传递
- 打开asp出现An error occurred on the server when processing the URL
- 对于ASP下的分页问题
- Spring @Aspect实现切面编程
- ASP.NET中HTML页面的访问验证设置方法
- ASP.NET动态网站制作(6)-- JS(1)
- 关于ASP.NET MVC的Html.BeginForm()方法
- Codeforces 583A Asphalting Roads
- ASP.NET MVC中URL末尾斜杠的实现
- 关于asp.net和iis的进程/线程问题,假如网站有1000个人访问,会产生多少个进程/线程啊
- A. Asphalting Roads
- 在ASP.NET MVC中对表进行通用的增删改
- asp.net mvc 初学数据库实例
- asp.net(C#)页面事件顺序
- 让用户做测试员 利用IIS自定义错误页
- ASP.NET MVC3 入门指南之数据验证[源码RAR下载]
- 模型(Model)– ASP.NET MVC 4 系列
- asp.net mvc Model验证中MetadataType的应用