婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > Asp中使用JQuery的AJAX提交中文亂碼解決方法

Asp中使用JQuery的AJAX提交中文亂碼解決方法

熱門標簽:地圖標注中心多少錢注冊 不封卡外呼系統一般多少錢 鄭州語音電銷機器人官網 北京大興區地圖標注 濰坊呼叫中心外呼系統供應商 微信地圖標注有什么用 電銷機器人一個多少錢 重慶外呼電銷系統費用 地圖標注不完整被罰款

客戶端頁:client.html

復制代碼 代碼如下:

script>
    //jquery的post
    $.post
    (
        'server.asp',
        {
            Act:'DoSubmit',
            UserName:escape('腳本之家'),//進行編碼
           WebSite:'www.jb51.net'
        },
        function(data)
        {
            alert(unescape(data));//對返回數據進行解碼
        }
    );   
/script>

服務器端頁:server.asp

復制代碼 代碼如下:

%
Response.Charset="gb2312"
Dim UserName,WebSite
If Request.Form("Act")="DoSubmit" Then
UserName=Request.Form("UserName")
WebSite =Request.Form("WebSite")
 
'在服務器端解碼
UserName=VbsUnEscape(UserName)//解碼
 
'處理數據
'---省略數據處理部分
 
'數據處理后輸出,先用VbsEscape()編碼
Response.Write VbsEscape(UserName)
End If
%>
 
 
%
'與javascript中的escape()等效
Function VbsEscape(str)
    dim i,s,c,a
    s=""
    For i=1 to Len(str)
        c=Mid(str,i,1)
        a=ASCW(c)
        If (a>=48 and a =57) or (a>=65 and a =90) or (a>=97 and a =122) Then
            s = s c
        ElseIf InStr("@*_+-./",c)>0 Then
            s = s c
        ElseIf a>0 and alt;16 Then
            s = s "%0" Hex(a)
        ElseIf a>=16 and alt;256 Then
            s = s "%" Hex(a)
        Else
            s = s "%u" Hex(a)
        End If
    Next
    VbsEscape=s
End Function
'與javascript中的unescape()等效
Function VbsUnEscape(str)
                Dim x
    x=InStr(str,"%")
    Do While x>0
        VbsUnEscape=VbsUnEscapeMid(str,1,x-1)
        If LCase(Mid(str,x+1,1))="u" Then
            VbsUnEscape=VbsUnEscapeChrW(CLng("H"Mid(str,x+2,4)))
            str=Mid(str,x+6)
        Else
            VbsUnEscape=VbsUnEscapeChr(CLng("H"Mid(str,x+1,2)))
            str=Mid(str,x+3)
        End If
        x=InStr(str,"%")
    Loop
    VbsUnEscape=VbsUnEscapestr
End Function
%>

在javascript 中escape() 函數可對字符串進行編碼,這樣就可以在所有的計算機上讀取該字符串。

可以使用 unescape() 對 escape() 編碼的字符串進行解碼。

其實Asp中這兩個函數也是起作用的,居然很多asp網站上沒有進行介紹。

要不然只能像上面那樣寫函數進行解碼編碼了。復雜且性能不好。

上面的服務器端頁:server.asp可以寫成:

Asp中的unescape() 與 escape() 函數

復制代碼 代碼如下:

%
Response.Charset="gb2312"
Dim UserName,WebSite
If Request.Form("Act")="DoSubmit" Then
UserName=Request.Form("UserName")
WebSite =Request.Form("WebSite")
 
'在服務器端解碼
UserName=UnEscape(UserName)//解碼
 
'處理數據
'---省略數據處理部分
 
'數據處理后輸出,先用VbsEscape()編碼
Response.Write Escape(UserName)
End If
%>

這樣就簡單多了。

您可能感興趣的文章:
  • JQuery中Ajax的Post提交在IE下中文亂碼的解決方法
  • jquery.ajax的url中傳遞中文亂碼問題的解決方法
  • jquery的ajax()函數傳值中文亂碼解決方法介紹
  • JQuery ajax 返回json時出現中文亂碼該如何解決
  • 如何解決JQuery ajaxSubmit提交中文亂碼
  • JQuery AJAX 中文亂碼問題解決
  • JQuery AJAX提交中文亂碼的解決方案
  • jQuery ajax方法傳遞中文時出現中文亂碼的解決方法

標簽:唐山 汕頭 攀枝花 佛山 撫州 揭陽 海南 鶴崗

巨人網絡通訊聲明:本文標題《Asp中使用JQuery的AJAX提交中文亂碼解決方法》,本文關鍵詞  Asp,中,使用,JQuery,的,AJAX,;如發現本文內容存在版權問題,煩請提供相關信息告之我們,我們將及時溝通與處理。本站內容系統采集于網絡,涉及言論、版權與本站無關。
  • 相關文章
  • 下面列出與本文章《Asp中使用JQuery的AJAX提交中文亂碼解決方法》相關的同類信息!
  • 本頁收集關于Asp中使用JQuery的AJAX提交中文亂碼解決方法的相關信息資訊供網民參考!
  • 推薦文章
    主站蜘蛛池模板: 灵川县| 海盐县| 琼中| 丹凤县| 黑水县| 安仁县| 浦江县| 威远县| 大余县| 石林| 昌宁县| 大洼县| 米脂县| 南丰县| 中超| 晋江市| 黄平县| 肥西县| 莒南县| 聂荣县| 漠河县| 巨鹿县| 深泽县| 阿瓦提县| 尖扎县| 桐梓县| 涟水县| 台东市| 六盘水市| 长乐市| 商南县| 肇东市| 兴义市| 海盐县| 内乡县| 周宁县| 呼和浩特市| 东至县| 丰宁| 奇台县| 临猗县|