Dim i, j, aL1, aL2, c, p
aL1 = Array(&h22, &h5C, &h2F, &h08, &h0C, &h0A, &h0D, &h09)
aL2 = Array(&h22, &h5C, &h2F, &h62, &h66, &h6E, &h72, &h74)
For i = 1 To Len(str)
p = True
c = Mid(str, i, 1)
For j = 0 To 7
If c = Chr(aL1(j)) Then
jsEncode = jsEncode &"\" &Chr(aL2(j))
p = False
Exit For
End If
Next
If p Then
Dim a
a = AscW(c)
If a >31 And a <127 Then
jsEncode = jsEncode &c
ElseIf a >-1 Or a <65535 Then
jsEncode = jsEncode &"\u" &String(4 - Len(Hex(a)), "0") &Hex(a)
End If
End If
Next
End Function Response.Write("Text=汉字&UserID=0001&UserName=" &jsEncode( rs("username")))
asp使用utf-8编码乱码,是设置错误造成的,解决方法如下:
1、首先在浏览器的开发者上面查看了源代码,发现是utf-8。
2、python运行之后,返回的还是一些看不懂的符号。
3、其实是utf-8是没错的,只是需要给他明确一下,原来的请求是这样的。
4、然后需要在后面明确这一段代码,r.encoding = 'UTF-8'。
5、之后再请求获取自己要的数据,就会发现这次没有乱码了。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)