ASP来实现UTF8转换GB2312国标码-GB2312转UTF-8,需要的朋友可以参考下。

代码如下: ‘个人代码风格注释（变量名中第一个小写字母表表示变量类型） ‘i:为Integer型; ‘s:为String; Function U2UTF8(Byval a_iNum) Dim sResult,sUTF8 Dim iTemp,iHexNum,i iHexNum = Trim(a_iNum) If iHexNum = “” Then Exit Function End If sResult = “” If (iHexNum < 128) Then sResult = sResu