Archive for 四月, 2010

ASP来实现UTF8转换GB2312国标码

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 = sResult & iHexNum     ElseIf...