满洲里森晟网络工作室
设为首页
收藏本站
24小时服务热线:0470-6219660     
 
  网站位置:首页 >> 网页编程
ASP实现UFT8与GB2312转换的代码
作者:admin 发表时间:2015-12-9 人气:
 

在ASP开发中,如果表单提交的时候,表单页是UFT8编码,而接收页确实GB2312编码或者反之的情况,如果参数值是中文,就会出现获取到的参数值是乱码的问题。下面有一个很不错的函数来解决这个问题:

ASP/VB Code复制内容到剪贴板
•'URL地址解码,用于utf-8与GB2312转中文字符通用
•Function DecodeURI(ByVal s)
• s = UnEscape(s)
• Dim reg, cs
• cs = "GBK"
• Set reg = New RegExp
• reg.Pattern = "^(?:[\x00-\x7f]|[\xfc-\xff][\x80-\xbf]{5}|[\xf8-\xfb][\x80-\xbf]{4}|[\xf0-\xf7][\x80-\xbf]{3}|[\xe0-\xef][\x80-\xbf]{2}|[\xc0-\xdf][\x80-\xbf])+$"
• If reg.Test(s) Then cs = "UTF-8"
• Set reg = Nothing
• Dim sm
• Set sm = CreateObject("ADODB.Stream")
• With sm
• .Type = 2
• .Mode = 3
• .Open
• .CharSet = "iso-8859-1"
• .WriteText s
• .Position = 0
• .CharSet = cs
• DecodeURI = .ReadText(-1)
• .Close
• End With
• Set sm = Nothing
•End Function

在接收页可以这样得到正确的中文字符:
username=DecodeURI(server.URLEncode(username))




文章来源:www.sensheng.net.cn
文章点评
  
新闻资讯建站常识
网络安全网页编程
电脑技术摄影美文
知识百科相关下载
问题解答帮助中心
Window2008+IIS7出现错...
Window2008+IIS7部署网...
如何清除“远程桌面连...
win7删除文件夹提示找...
WIN7远程桌面窗口的字...
三星笔记本WIN8系统改...
防止信用卡泄密的四个...
WindowsInstaller服务...
WIN8.1开机弹出syslev...
满洲里森晟网络工作室  新远货运代理有限公司  满洲里中润宏源进出口  满洲里中欧门业  百度搜索  谷歌搜索  360搜索  
 
 
Copyright © 2006—2020 www.SenSheng.net.cn  All Rights Reserved.  满洲里森晟网络工作室
信息产业部备案编号:蒙ICP备11003174号-1    蒙公网安备 15078102000116号