加入收藏 | 设为首页 | 会员中心 | 我要投稿 银川站长网 (https://www.0951zz.com/)- 云通信、基础存储、云上网络、机器学习、视觉智能!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

Asp中使用JQuery的AJAX提交中文乱码解决方式

发布时间:2023-06-17 13:34:58 所属栏目:Asp教程 来源:
导读:客户端页:client.html代码如下:<script> //jquery的post $.post ( &#39;server.asp&#39;, { Act:&#39;DoSubmit&#39;, UserName:escape(&#39;错新站长站&#39;),//进行编码

客户端页:client.html

代码如下:

<script>

   //jquery的post

   $.post

   (

       'server.asp',

       {

           Act:'DoSubmit',

           UserName:escape('错新站长站'),//进行编码

          WebSite:'www.Cuoxin.com'

       },

       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 a<16 Then

           s = s & "%0" & Hex(a)

       ElseIf a>=16 and a<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

(编辑:银川站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章