ASP中将汉字转换为UTF-8的一段代码

最新推荐文章于 2025-10-03 16:45:37 发布
最新推荐文章于 2025-10-03 16:45:37 发布 · 275 阅读 · 0
文章标签：

#ASP

本文提供了一段使用ASP编写的将汉字转换为UTF-8编码的代码。该代码通过遍历输入字符串中的每个字符，并将其转换为对应的UTF-8格式输出。

汉字转换为UTF-8的一段代码
终于找到这段代码了，一个ASP写的中文转UTF-8，大家可以试试

function chinese2unicode(Salon)
dim i
dim Salon_one
dim Salon_unicode
for i=1 to len(Salon)
Salon_one=Mid(Salon,i,1)
Salon_unicode=Salon_unicode&chr(38)
Salon_unicode=Salon_unicode&chr(35)
Salon_unicode=Salon_unicode&chr(120)
Salon_unicode=Salon_unicode& Hex(ascw(Salon_one))
Salon_unicode=Salon_unicode&chr(59)
next
Response.Write Salon_unicode
end function

<!-- END newscontent -->
iteye_20954
关注
Web-拾贝
oscar999的专栏
03-10 1万+
JavaScript MVC框架PK：Angular、Backbone、CanJS与Emberhttp://www.youkuaiyun.com/article/2013-04-25/2815032-A-Comparison-of-Angular-Backbone-CanJS-and-Ember一个好的js method 方法查询的网站， 有browser兼容的介绍http://help.dottoro.co...
ASP写的汉字转换UTF-8及UTF-8转GB2312
csdn_aspnet的专栏，请点击博客主页右上角三个点中的私信联系
09-26 6879
汉字转换为UTF-8 function chinese2unicode(Str)   dim i   dim Str_one   dim Str_unicode   for i=1 to len(Str)   Str_one=Mid(Str,i,1)   Str_unicode=Str_unicode&chr(38)   Str_unicode=Str_unicode&chr(35
完整版文本转UTF-8编码教程与工具实战详解
weixin_36235398的博客
10-03 902
字符集是一组抽象字符的集合，每个字符代表一种书写单位，例如字母、汉字、标点符号或表情符号。它本质上是一个“名录”，列出某个语言或多种语言中允许使用的字符。字符集并不关心这些字符如何在计算机中存储或传输，也不规定其对应的数值编号，仅用于定义可用字符的范围。例如，ASCII字符集包含128个字符，涵盖英文字母（大写和小写）、阿拉伯数字、基本标点符号及控制字符；而GB2312则收录了6763个常用汉字和682个非汉字图形字符，适用于简体中文环境。值得注意的是，字符集本身不具备编码能力。
关于网上流行的ASP版GB2312转UTF-8 函数的错误修正！
标题无所谓
05-11 1935
同样的文章我已经发到蓝色理想：http://bbs.blueidea.com/thread-3060231-1-1.html       原函数出处：http://www.blueidea.com/tech/program/2006/3538.asp 感谢作者发出来这个函数，但是发现这个函数有个小错误： 如果需要转换的字符串都是汉字就没问题。但是如果遇到中间有数字或字母的时候就会被截断
ASP页面改为UTF-8编码后，刷新页面中文输入输出不定时乱码终极解决方案
业余编程
11-07 877
后来想起 Nosql.asp 文件内的提示文字未使用中文，全部使用的是 &#数字;这样的 UNiCode 形式来表示中文字符。受此启发，于是有了以下函数，改装 Response.Write ，自动检测是否有Ascii值大于255的字符，有的话，则全部转换为&#；形式。从此再也没有出现过乱码了。
ASP写的汉字转换为UTF-8的一段代码（转）
cuankuangzhong6373的博客
02-27 552
汉字转换为UTF-8的一段代码终于找到这段代码了，一个ASP写的中文转UTF-8，大家可以试试 function chinese2unicode(Salon)　dim i　dim Salon_one　dim Salon_uni...
ASP.NET与ASP互通COOKIES的一点经验
10-29
要解决这个问题，我们需要在ASP.NET中将GB2312编码的URL编码字符串解码回UTF-8，然后再转换回GB2312编码，以正确显示中文信息。这可以通过以下代码完成： ```vbnet Dim uName As String = System.Web.HttpContext....
ASP.NET中将GridView数据导出为Excel文件的方法
设置Response.ContentEncoding为UTF-7或UTF-8，以支持中文字符的正确显示，避免导出后出现乱码问题。然后使用Response.AddHeader方法添加“content-disposition”头信息，值为“attachment; filename=ExcelFile.xls...
在ASP.net中将数据直接输出成excel内容
10-11
- 对于非ASCII字符（如中文），需要确保正确的编码，这里使用了`utf-8`编码。 - 由于这种方法依赖于Excel能够解析HTML，所以可能会受限于特定的Excel版本和功能支持。 6. **替代方案** - 如果需要更高级的功能，...
【ctf.show-web赛题】
一纸荒芜的博客
03-21 3723
主要分享自己做题的心得和积累，共勉之。
汉字转拼音首字母工具，ASP版汉字转拼音程序
03-02
在网上找了很多汉字转拼音首字母的工具，感觉都不合适。自己用科汛的函数写了一个，很好用。可以批量处理。
asp-姓名(汉字)转换拼音(首字母)方法（原创）
pityzheng的专栏
11-17 2534
前期准备工作：1、需要编码的数据库表，本例为sql 6.5数据库，表名为aa_u_personal ，姓名标题为P_name，存储拼音列标题为BianMa;2、拼音表（PinYinDatebase.mdb，需要者请提供E-mail）文件。以下为asp文件源代码Response.Buffer=falseServer.ScriptTimeOut=6000   dim conn 来
asp中文编码和php编码的区别,ASP 汉字实业编码反转换
weixin_28745821的博客
03-12 155
ASP 汉字实体编码反转换ASP中有没类似PHP里html_entity_decode的方法，可以将中国这种实体编码的转成汉字“中国”？或者有没有人可以提供一个自己实现的方法？------解决思路----------------------FunctionHTMLDecode(sText)DimIsText=Replace(sText,"&",Chr(38))sText=...
汉字转UTF-8过程，你知道吗？
qianlia的博客
06-27 6747
什么是UTF-8编码 UTF-8是一种变长字节编码方式。 对于某一个字符的UTF-8编码，如果只有一个字节则其最高二进制位为0；如果是多字节，其第一个字节从最高位开始，连续的二进制位值为1的个数决定了其编码的位数，其余各字节均以10开头。UTF-8最多可用到6个字节。 如表： 1字节： 0xxxxxxx 2字节：110xxxxx 10xxxxxx 3字节：1110xxxx 10xxxxxx 10xxxxxx 4字节：11110xxx 10xxxxxx 10xxxxxx 10xxxxxx 5字节：111110
(UTF-8)ASP汉字转拼音函数(附Access数据库)
OSnow的专栏
06-02 2112
    很久以来没有一个很好的，能够在UTF-8编码的ASP中汉字生成拼音的函数。当使用ASCW得到一个汉字的ASCII码值的时候也是没有任何规律来获得一个汉字的拼音。测试了很久也没有找到一个很好的办法，后来发现在MS SQL中当Chinese_PRC_CS_AS_KS_WS排序时，可以划定汉字拼音的区域，经过整理，终于可以实现在UTF-8编码下汉字转拼音，随时制作出来了MS SQL汉字转拼音函数
asp生成UTF-8格式的文件
gliet1981的专栏
04-07 1347
ASP由于是一种古老的语言，它的一些功能对UTF-8支持非常差。比如，你想生成一个UTF-8格式的文件，使用常用的 scrīpting.FileSystemObject 对象就不行。scripting.FileSystemObject 对象创建文件的函数，是下面方式：FileSystemObject.CreateTextFile(filename[,overwrite[,unicode]])其中的
将汉字转为UTF-8编码
dieshengla2331的博客
11-18 338
01./** 02. * 将文件名中的汉字转为UTF8编码的串,以便下载时能正确显示另存的文件名. 03. * @param s 原文件名 04. * @return 重新编码后的文件名 05. */ 06.public String toUtf8String(String s) { 07. if (s == null || s.equals("")...
ASP汉字转换UTF-8及UTF-8转GB2312 不知道繁体可不可以?
feng_sundy 的专栏
11-03 3665
汉字转换为UTF-8function chinese2unicode(Str)   dim i   dim Str_one   dim Str_unicode   for i=1 to len(Str)     Str_one=Mid(Str,i,1)     Str_unicode=Str_unicode&chr(38)     Str_unicode=Str_unicode&chr(35)  
ASP将gb2312字符串转换为utf-8的字符串
最新发布
11-19
<think> 我们已经在之前的讨论中介绍了使用ADODB.Stream进行编码转换的方法。现在，用户明确要求将GB2312字符串转换为UTF-8字符串。我们可以利用之前提供的两个函数（str2bytes和bytes2str）组合实现。 步骤： 1. 将GB2312字符串转换为字节数组（使用str2bytes函数，指定源编码为"gb2312"） 2. 将字节数组转换为UTF-8字符串（使用bytes2str函数，指定目标编码为"utf-8"） 注意：由于ASP环境限制，我们无法直接使用C#的编码转换方法（如引用[1]中的代码），但我们可以用ADODB.Stream对象实现类似功能。 下面给出具体的代码实现： </think> 在ASP中实现GB2312字符串到UTF-8的转换，可以通过`ADODB.Stream`对象高效完成。以下是完整解决方案： ### 转换方法（使用ADODB.Stream） ```asp <% ' 将GB2312字符串转换为UTF-8字符串 Function GB2UTF8(gbStr) Dim stream Set stream = Server.CreateObject("ADODB.Stream") ' Step1: 将GB2312文本写入流 stream.Type = 2 ' 文本模式 stream.Charset = "gb2312" stream.Open stream.WriteText gbStr stream.Flush ' Step2: 切换为二进制模式读取字节 stream.Position = 0 stream.Type = 1 ' 二进制模式 Dim bytes bytes = stream.Read ' Step3: 重新设置UTF-8编码读取文本 stream.Close stream.Type = 2 ' 文本模式 stream.Charset = "utf-8" stream.Open stream.Write bytes ' 写入二进制数据 stream.Position = 0 GB2UTF8 = stream.ReadText stream.Close Set stream = Nothing End Function ``` ### 使用示例 ```asp <% ' 测试数据（GB2312编码的中文） Dim gbText, utf8Text gbText = "需要转换的中文字符" ' 执行转换 utf8Text = GB2UTF8(gbText) ' 输出结果（确保页面设置为UTF-8） Response.ContentType = "text/html; charset=utf-8" Response.Write("转换结果：" & utf8Text) %> ``` ### 关键说明 1. **编码标识一致性** 转换后需设置响应头匹配目标编码： ```asp <% Response.ContentType = "text/html; charset=utf-8" %> ``` 2. **多字节字符处理** 此方法支持完整字符集转换（包括中文/日文等），避免逐字符处理的截断问题[^1]。 3. **数据流机制** 通过内存流的三步操作实现无损转码： ```mermaid graph LR A[GB2312文本] --> B{文本模式写入} B --> C[二进制数据] C --> D{UTF-8模式读取} D --> E[UTF-8文本] ``` ### 备选方案（小文本） ```asp ' 简化版函数（适用于短文本） Function SimpleGB2UTF8(str) With Server.CreateObject("ADODB.Stream") .Open .Charset = "gb2312" .WriteText str .Position = 0 .Charset = "utf-8" SimpleGB2UTF8 = .ReadText .Close End With End Function ``` ### 常见问题解决 - **乱码问题**：检查原始字符串编码是否确认为GB2312 - **特殊字符丢失**：确保使用`ADODB.Stream`而非`Mid`等字符串函数 - **数据库存储**：转换后直接存入`nvarchar`字段避免二次转码 如需处理UTF-8到GB2312的反向转换，参考先前提供的`UTF82GB`函数[^2]。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值