ASP中实现的类似URLEncode的编码函数及对应解码函数

转载 2006年06月04日 01:43:00
ASP中实现的类似URLEncode的编码函数及对应解码函数 

<%
'Coding.inc.asp

Function Encode(Str)
 Dim Count, Pos, Ch, Code
 Dim SweetCh
 
 'SweetCh中表示不需要进行编码的字符
 SweetCh = "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijklmnopqrstuvwxyz_{}[]()"
 Encode = ""
 
 Count = Len(Str)
 Pos = 1
 Do While Pos<=Count
  Ch = Mid(Str, Pos, 1)
  
  Code = Asc(Ch)
  If Code>=0 And Code<256 Then  '汉字不予处理
   If Ch<>"%" Then
    If InStr(SweetCh, Ch)=0 Then
     Ch = "%" & Right("0" & Hex(Code), 2)
    End If
   Else
    Ch = "%25"
   End If
  End If
  
  Encode = Encode & Ch
  Pos = Pos + 1
 Loop
End Function

Function Decode(Str)
 Dim Count, Pos, Ch, Code
 
 Decode = ""
 
 Count = Len(Str)
 Pos = 1
 Do While Pos<=Count
  Ch = Mid(Str, Pos, 1)
  If Ch="%" Then
   If Pos+2<=Count Then
    Ch = Chr((InStr("0123456789ABCDEF", UCase(Mid(Str, Pos+1, 1)))-1) * 16 + InStr("0123456789ABCDEF",UCase(Mid(Str, Pos+2, 1))) - 1)
   Else
    '编码串不正确
    Ch = ""
   End If
   Pos = Pos + 2
  End If
  Decode = Decode & Ch
  Pos = Pos + 1
 Loop
End Function
%>

ASP中的URLEncode的解码函数

  有时在传递一些参数时,为了避免中文和一些特殊字符引起错误,我常把一些内容用server.urlencode功能编码,编码后的解码就遇到了问题,在js中可以用unescape,在asp中怎么解码呢?...
  • vince6799
  • vince6799
  • 2006年06月22日 12:55
  • 3796

ASP 文件编码格式与 Server.URLEncode

最近在修改一个遗产程序,因为要下载文件,而这些文件大部分都是以中文命名的,中文的处理对于一些新兴的语言,比如Java,.net什么的都没有问题,可是这是个 asp 程序。当我把asp文件采用本地编码时...
  • redv
  • redv
  • 2005年03月04日 01:04
  • 2646

ASP.NET中UrlEncode应该用Uri.EscapeDataString()

http://www.cnblogs.com/dudu/archive/2011/02/25/asp_net_UrlEncode.html 今天,茄子_2008反馈他博客中的“C++”标签失...
  • mituan1234567
  • mituan1234567
  • 2014年12月21日 15:37
  • 309

asp对中文编码及解码,Decode和Encode中文网址处理

'============================================================== '功能:ASP Server对象内置编码函数 '描述:没有对应的解码...
  • SJian123
  • SJian123
  • 2014年10月16日 16:54
  • 3842

iOS开发中Objective-C 对 URL的URLEncode(编码)与URLDecode(解码)

url字符串中具有特殊功能的特殊字符的字符串,或者中文字符,作为参数用GET方式传递时,需要用urlencode处理一下。...
  • Aaidong
  • Aaidong
  • 2015年05月11日 10:01
  • 8006

asp server.urlencode还原函数

aaa="中文were$&@&符号"response.write aaa&""bbb=server.urlencode(aaa)response.write bbb&""ccc=urldecode(b...
  • lvlingwy
  • lvlingwy
  • 2007年07月10日 14:00
  • 900

asp.net实现下载

//TransmitFile实现下载    protected void Button1_Click(object sender, EventArgs e)     {        /*      ...
  • heyanbin
  • heyanbin
  • 2008年06月02日 13:47
  • 178

urlencode()与urldecode()函数字符编码原理详解

中文字符编码研究系列第五期,详解 urlencode()与urldecode()函数字符编码原理,两个函数分别用于编码 URL 字符串和解码已编码的 URL 字符串,实现对中文字符的编码 ...
  • linshichen
  • linshichen
  • 2016年04月05日 15:37
  • 4103

怎么进行:URLEncode编码 与 URLDecode解码

网页中的表单使用GET方法提交时,数据内容的类型是 application/x-www-form-urlencoded,这种类型会:   1.字符"a"-"z","A"-"Z","0"-"9",...
  • u012827205
  • u012827205
  • 2014年04月07日 12:50
  • 33382
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:ASP中实现的类似URLEncode的编码函数及对应解码函数
举报原因:
原因补充:

(最多只允许输入30个字)