在浏览器上直接输入url 时，中文传参乱码问题

这样的地址 xxx.asp?name=中国  ，通过 超链接打开这个链接 ，xxx.asp能够成才接收参数，但是如果将地址直接放到浏览器地址栏上，回车， xxx.asp就无法正确接收中文参数，一直显示乱码。做了很多实验终于知道原因：

因为我的xxx.asp是gb2312编码， 如果通过超链接进入，地址编码与xxx.asp编码会保持一致， 而如果通过浏览器地址栏进入， 现在大部分浏览器地址栏中的字符都被当做utf-8处理。 所以我们知道原因了，通过地址栏传过来的字符串都被当成了utf-8的编码进行传递，自然xxx.asp处理会变成乱码。

所以解决这个问题就是要将url中的utf-8字符转成gb2312然后再，重新传一遍参数

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>

<body>
<%
function chinese2unicode(Str)
  dim i
  dim Str_one
  dim Str_unicode
  for i=1 to len(Str)
    Str_one=Mid(Str,i,1)
    Str_unicode=Str_unicode&chr(38)
    Str_unicode=Str_unicode&chr(35)
    Str_unicode=Str_unicode&chr(120)
    Str_unicode=Str_unicode& Hex(ascw(Str_one))
    Str_unicode=Str_unicode&chr(59)
  next
  Response.Write Str_unicode
end function    

function UTF2GB(UTFStr)
    for Dig=1 to len(UTFStr)
        if mid(UTFStr,Dig,1)="%" then
            if len(UTFStr) >= Dig+8 then
                GBStr=GBStr & ConvChinese(mid(UTFStr,Dig,9))
                Dig=Dig+8
            else
                GBStr=GBStr & mid(UTFStr,Dig,1)
            end if
        else
            GBStr=GBStr & mid(UTFStr,Dig,1)
        end if
    next
    UTF2GB=GBStr
end function

function ConvChinese(x)
    A=split(mid(x,2),"%")
    i=0
    j=0

    for i=0 to ubound(A)
        A(i)=c16to2(A(i))
    next

    for i=0 to ubound(A)-1
        DigS=instr(A(i),"0")
        Unicode=""
        for j=1 to DigS-1
            if j=1 then
                A(i)=right(A(i),len(A(i))-DigS)
                Unicode=Unicode & A(i)
            else
                i=i+1
                A(i)=right(A(i),len(A(i))-2)
                Unicode=Unicode & A(i)
            end if
        next

        if len(c2to16(Unicode))=4 then
            ConvChinese=ConvChinese & chrw(int("&H" & c2to16(Unicode)))
        else
            ConvChinese=ConvChinese & chr(int("&H" & c2to16(Unicode)))
        end if
    next
end function

function c2to16(x)
    i=1
    for i=1 to len(x)  step 4
        c2to16=c2to16 & hex(c2to10(mid(x,i,4)))
    next
end function 

function c2to10(x)
    c2to10=0
    if x="0" then exit function
    i=0
    for i= 0 to len(x) -1
        if mid(x,len(x)-i,1)="1" then c2to10=c2to10+2^(i)
    next
end function

function c16to2(x)
    i=0
    for i=1 to len(trim(x))
        tempstr= c10to2(cint(int("&h" & mid(x,i,1))))
        do while len(tempstr)<4
        tempstr="0" & tempstr
        loop
        c16to2=c16to2 & tempstr
    next
end function

function c10to2(x)
    mysign=sgn(x)
    x=abs(x)
    DigS=1
    do
        if x<2^DigS then
            exit do
        else
            DigS=DigS+1
        end if
    loop
    tempnum=x

    i=0
    for i=DigS to 1 step-1
        if tempnum>=2^(i-1) then
            tempnum=tempnum-2^(i-1)
            c10to2=c10to2 & "1"
        else
            c10to2=c10to2 & "0"
        end if
    next
    if mysign=-1 then c10to2="-" & c10to2
end function

response.Write UTF2GB(request.QueryString)&"<br>"
response.Redirect("bb.asp?"&UTF2GB(request.QueryString))%>
</body>
</html>

bb.asp

<%
response.Write request.QueryString&"<br>"
response.Write request.QueryString("id")
%>

bb.asp 中的request.QueryString("id") 可以正常显示成中文了。

UTF2GB函数就是将utf-8编码的字符 ，转换成了中文，然后再讲参数重新传递一下，就正常了。这里为什么不在xxx.asp里直接
UTF2GB（request.QueryString("id")）这样来做？这样做并不会显示成正确的中文，因为
request.QueryString("id") 取值的时候已经被系统自动转化成了中文，因为编码不对所以，就变成了乱码的中文， 在这之上再进行转换已经没有意义，它已经不是utf-8编码，而是被转化成乱码的中文
。

-------------------------------------------------------------------------------------------------------------------------------------------------------------------

半个小时后，我终于找到问题的关键。。。继续更新。。。。。。。。。

知道为什么会出现乱码了， 因为在地址栏输入地址，地址会被执行utf-8 的 urlencode ，地址被转码了， 到了xxx.asp后，取值的时候， 会自动按页面编码执行相应的urldecode函数， 也就是gb2312编码下的urldecode 函数， 所以就出现了乱码，有个很简单的办法就是 ，对url执行utf-8编码的 urldecode就可以了， 在网上又找到一个简单的函数
<%
Function UrlEncode_GBToUtf8(ByVal str)
    Dim B                    ‘‘单个字符
    Dim ub                  ‘‘中文字的Unicode码(2字节)
    Dim High8b, Low8b       ‘‘Unicode码的高低位字节
    Dim UtfB1, UtfB2, UtfB3 ‘‘Utf-8码的三个字节
    Dim i, s
    For i = 1 To Len(str)
        B=Mid(str, i, 1)
        ub = AscW(B)
        If (ub>=48 And ub<=57) Or (ub>=65 And ub<=90) Or (ub>=97 And ub<=122) Or ub=42 Or ub=45 Or ub=46 Or ub=64 Or ub=95 Then
            ‘‘48 to 57代表0~9;65 to 90代表A~Z;97 to 122代表a~z
            ‘‘42代表*;46代表.;64代表@;45代表-;95代表_
            s=s & B
        ElseIf ub=32 Then ‘‘空格转成+
            s=s & "+"
        ElseIf ub<128 Then    ‘‘低于128的Ascii转成1个字节
            s=s & "%" & Right("00" & Hex(ub),2)
        Else
            High8b = (ub And &HFF00) / &H100 ‘‘Unicode码高位
            Low8b = ub And &HFF ‘‘Unicode码低位
            UtfB1 = (High8b And &HF0) / &H10 Or &HE0 ‘‘取Unicode高位字节的二进制的前4位 + 11100000
            UtfB2 = ((High8b And &HF) * &H4 + (Low8b And &HC0) / &H40) Or &H80 ‘‘取Unicode高位字节的后4位及低位字节的前2位 +10000000
            UtfB3 = (Low8b And &H3F) Or &H80 ‘‘取Unicode低位字节的二进制后6位 + 10000000
            s = s & "%" & Hex(UtfB1) & "%" & Hex(UtfB2) & "%" & Hex(UtfB3)
        End If
    Next
    UrlEncode_GBToUtf8 = s
End Function

‘‘“汉”－AscW("汉")=27721(十进制)    01101100 01001001(二进制)     6C49(十六进制)
‘‘将Gb2312码转成Utf-8码（十六进制表示）的方法为，先用AscW将Gb2312转为Unicode码(2字节),再‘‘将Unicode码的二进制中的位按utf-8(3字节）模板规则填充 x 位：

‘‘URL解码，Gb2312页面提交到Utf-8页面
Function UrlDecode_GBToUtf8(ByVal str)
    Dim B,ub    ‘‘中文字的Unicode码(2字节)
    Dim UtfB    ‘‘Utf-8单个字节
    Dim UtfB1, UtfB2, UtfB3 ‘‘Utf-8码的三个字节
    Dim i, n, s
    n=0
    ub=0
    For i = 1 To Len(str)
        B=Mid(str, i, 1)
        Select Case B
            Case "+"
                s=s & " "
            Case "%"
                ub=Mid(str, i + 1, 2)
                UtfB = CInt("&H" & ub)
                If UtfB<128 Then
                    i=i+2
                    s=s & ChrW(UtfB)
                Else
                    UtfB1=(UtfB And &H0F) * &H1000    ‘‘取第1个Utf-8字节的二进制后4位
                    UtfB2=(CInt("&H" & Mid(str, i + 4, 2)) And &H3F) * &H40        ‘‘取第2个Utf-8字节的二进制后6位
                    UtfB3=CInt("&H" & Mid(str, i + 7, 2)) And &H3F        ‘‘取第3个Utf-8字节的二进制后6位
                    s=s & ChrW(UtfB1 Or UtfB2 Or UtfB3)
                    i=i+8
                End If
            Case Else    ‘‘Ascii码
                s=s & B
        End Select
    Next
    UrlDecode_GBToUtf8 = s
End Function

Private Function UrlEncode_GBToUtf8_V2(szInput)
    Dim wch, uch, szRet
    Dim x
    Dim nAsc, nAsc2, nAsc3
    If szInput = "" Then
        UrlEncode_GBToUtf8_V2= szInput
        Exit Function
    End If
    For x = 1 To Len(szInput)
        wch = Mid(szInput, x, 1)
        nAsc = AscW(wch)
        If nAsc < 0 Then nAsc = nAsc + 65536
        If wch = "+" then
            szRet = szRet & "%2B"
        ElseIf wch = "%" then
            szRet = szRet & "%25"
        ElseIf (nAsc And &HFF80) = 0 Then
            szRet = szRet & wch
        Else
            If (nAsc And &HF000) = 0 Then
                uch = "%" & Hex(((nAsc \ 2 ^ 6)) Or &HC0) & Hex(nAsc And &H3F Or &H80)
                szRet = szRet & uch
            Else
                uch = "%" & Hex((nAsc \ 2 ^ 12) Or &HE0) & "%" & _
                Hex((nAsc \ 2 ^ 6) And &H3F Or &H80) & "%" & _
                Hex(nAsc And &H3F Or &H80)
                szRet = szRet & uch
            End If
        End If
    Next
    UrlEncode_GBToUtf8_V2= szRet
End Function

response.Write UrlDecode_GBToUtf8(request.QueryString)&"<br>"
response.Redirect("bb.asp?"&UTF2GB(request.QueryString))

  • UrlEncode_GBToUtf8 不支持生僻字，比如：鎔。
  • UrlEncode_GBToUtf8_V2 支持生僻字
  • UrlDecode_GBToUtf8 支持生僻字

如果xxx.asp是utf-8的编码， 就不存在以上问题

时间： 2024-10-13 15:34:02

在浏览器上直接输入url 时，中文传参乱码问题的相关文章

web前端页面解决中文传参乱码问题

问题背景:在项目中往往会涉及到前端跳转页面时要传一些参数给下一个页面,如果参数是英文或者数字的时候就很好解决,然而有时候传参会涉及到中文汉字,这个时候再单纯的拼接往往就会导致中文乱码,下面我们就该讨论一下如何解决中文传参乱码的问题. 假设A页面跳转到B页面并且A向B传参,首先在A页面中要调用这个方法:encodeURI("这里是中文参数"); 完整的拼接效果为: window.location.href="B.html?&title="+encodeURI(

url 中文传参 乱码问题（最近使用volley出现问题进行总结）

开发一直用firfox网页,调试什么的都很方便.所以遇到了浏览器之间的兼容问题.url中文传参. 问题:前台用url传值中文,后台用request.getParameter接收参数. 用firfox,chrome等没有问题.用ie会出现接参乱码现象. 上网查了一下,算了,还是把原文帖上来吧.比较容易懂. 让jsp正确解释含有中文的URL以及传递中文参数是一个很有用的特性,也是比较复杂的.我去年的一个小项目中就碰到了在URL中传递中文参数的问题,但是当时由于对Jsp还不是很熟悉,所以没有解决这个问

js URL中文传参乱码

js: var searchVal = encodeURIComponent($.trim($('#js_search_val').val()));//搜索的值 encodeURIComponent() 函数可把字符串作为 URI 组件进行编码. window.location.href = gUrl + '/name/' + searchVal;//跳转 php: urldecode(); 将 URL 编码后字符串还原成未编码的样子

遇到中文传参乱码的情况，究竟应该如何解决？

前端对于url传参的方式,用encodeURIComponent("中文参数"),对url的参数的参数值部分进行编码(有些浏览器会自动对中文进行编码,但是我们加上encodeURIComponent,浏览器是不会重复编码的,因为我们编码后的参数已经不是中文表示了,所以url参数编码的方式,对所有浏览器都适用): 前端对于使用jquery的ajax的data传参的方式,无需编码,jquery会帮我们编码的,所以如果再自行编码,就是编两次了. 后端的web服务器一般都会帮我们做一次解码的,

JAVA web 中文传参乱码解决方案：（最简洁方案）

一般修改Tomcat的默认编码方式即可: 例如:Tomcat的默认编码修改方式: 修改%TOMCAT_HOME%/conf/server.xml,找到这行代码: <Connector port="8080" protocol="HTTP/1.1" redirectPort="8449" connectionTimeout="20000"/>在后面可以追加URIEncoding属性,例如: <Connector

【Java】【41】中文传参乱码问题

前言: 有时候前端传递中文参数到后台会出现乱码,需要解决这一问题 正文: 方法一:前后端同时做处理 前端: var param = "中文"; encodeURI(param); 后端: String param = URLDecoder.decode(param, "utf-8"); 方法二:过滤器 前后端同时处理过于麻烦,所以就想可不可以统一在一个地方处理 1,设置Tomcat编码格式 但是发现只对get方法有效 <Connector URIEncodin

URL地址中的中文乱码问题的解决

引言: 在Restful类的服务设计中,经常会碰到需要在URL地址中使用中文作为的参数的情况,这种情况下,一般都需要正确的设置和编码中文字符信息.乱码问题就此产生了,该如何解决呢?且听本文详细道来. 1.  问题的引出 在Restful的服务设计中,查询某些信息的时候,一般的URL地址设计为: get /basic/service? keyword=历史 , 之类的URL地址. 但是,在实际的开发和使用中,确是有乱码情况的发生,在后台的读取keyword信息为乱码,无法正确读取. 2. 乱码是如

Java中使用Jsoup抓取网页URL时出现中文汉字乱码的问题及解决办法

public static String readHtml(String myurl) { StringBuffer sb = new StringBuffer(""); URL url; try { url = new URL(myurl); BufferedReader br = new BufferedReader(new InputStreamReader(url.openStream(), "gbk")); String s = "";

Ajax中文传参出现乱码

Ajax技术的核心为Javascript,而javascript使用的是UTF-8编码,因此在页面采用GBK或者其他编码,同时没有进行编码转换时,就会出现中文乱码的问题. 以下是分别使用GET和POST方式传值,并且页面采用GBK和UTF-8编码在IE和FF下的不同测试结果和出现乱码时的解决方案. 传值方式 客户端编码 服务器端编码 IE FF 解决方案 GET UTF-8 UTF-8 接收$_GET传递的参数时出现乱码 正常 客户端url=encodeURI(url) GET GBK GBK