复制代码代码如下所示：
个人代码样式注释（变量名中的第一个小写字母表表示变量的类型）
i：整数类型。
s：是字符串；
功能u2utf8（ByVal a_inum）
暗淡的成绩，sutf8
昏暗的itemp，ihexnum，我

ihexnum =装饰（a_inum）

如果ihexnum =然后
退出功能
最后如果

结果=

如果（ihexnum＜128）然后
结果=结果ihexnum
（ihexnum＜2048）然后
结果= ChrB（H80 +（ihexnum和h3f））
ihexnum = ihexnum H40
结果= ChrB（HC0 +（ihexnum和H1F））结果
（ihexnum＜65536）然后
结果= ChrB（H80 +（ihexnum和h3f））
ihexnum = ihexnum H40
结果= ChrB（H80 +（ihexnum和h3f））结果
ihexnum = ihexnum H40
结果= ChrB（He0 +（ihexnum和HF））结果
最后如果

u2utf8 =结果
端功能

功能gb2utf（ByVal a_sstr）
昏暗的SGB，结果，把
昏暗的艾朗，iunicode，itemp，我

SGB =装饰（a_sstr）
艾朗= Len（SGB）
我= 1，艾朗
把=中（SGB，我，1）
itemp = ASC（茎）

如果（itemp > 127或itemp＜0）然后
iunicode = ascw（茎）
如果iunicode＜0
iunicode = iunicode + 65536
最后如果
其他的
iunicode = itemp
最后如果

结果=结果u2utf8（iunicode）
下一个

gb2utf =结果
端功能

调用方法
response.binarywrite（gb2utf（中国））