WAP之家:为您提供最全最新的WAP技术,CP.SP.3G等行业资讯。 WAP之家交流论坛全新开放 点击进入>>
WAP资讯 | 3G动态 | SP动态 | 运营商动态 | 内容商动态 | 制造商动态 | 论坛讨论>> 每次自动访问
WAP技术 | WAP源码 | 手机编程 | 手机源码 | 无线技术 | J2ME技术 | 手机软件 添加到收藏夹
IVR技术 | SP资料 | SMS MMS技术 | 商业方案 | IVR下载 | 书籍教程 | 工具软件 语言:繁體中文

WAP之家技术文章WAP教程网站教程ASP写的汉字转换为UTF-8的一段代码

ASP写的汉字转换为UTF-8的一段代码
作者:不详  来源:转载  发布时间:2005-7-9 17:54:28
汉字转换为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
[] [返回上一页] [打 印]
文章评论

用户名: 查看更多评论

分 值:100分 85分 70分 55分 40分 25分 10分 0分

内 容:

         (注“”为必填内容。) 验证码: 验证码,看不清楚?请点击刷新验证码