WEB技术论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

搜索
热搜: ASP asp.net php
查看: 117|回复: 0
打印 上一主题 下一主题

ASP乱码中文gb2,gb2312转utf8编码

[复制链接]

534

主题

541

帖子

2044

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
2044
跳转到指定楼层
楼主
发表于 2018-8-7 21:56:44 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
Function gb2utf8(Chinese)
dim j,a
if isnull(Chinese) then
  gb2utf8=""
  exit function
end if
  For J = 1 to Len (Chinese)
a=Mid(Chinese, J, 1)
gb2utf8=gb2utf8 & "&#x" & Hex(Ascw(a)) & ";"
next
End Function
爱仿站的中年人
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

|手机版|码农集营 ( ) 深圳龙岗交友群

GMT+8, 2018-11-7 19:12 , Processed in 0.076274 second(s), 22 queries .

Powered by 码农集营 X3.4

快速回复 返回顶部 返回列表