一个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
//不知道汉字转成utf8以后是什么样子?function AnsiToUtf8(const S: string): UTF8String;DescriptionAnsiToUtf8 converts the string specified by S, which uses the ANSI encoding system, to 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