ASP使用ajax來傳遞中文參數的編碼處理

来源:https://www.cnblogs.com/xusx2014/archive/2019/11/27/11940441.html

背景 asp的第一版是0.9測試版,自從1996年ASP1.0誕生,迄今20餘載。雖然asp在Windows2000 IIS服務5.0所附帶的ASP 3.0發佈後好像再沒有更新過了,但是由於其入手簡單,天然的asp+access零配置,在零幾年火的就像現在的微信小程式。雖然時過境遷,其至今在國內還有 ...


背景

asp的第一版是0.9測試版,自從1996年ASP1.0誕生,迄今20餘載。雖然asp在Windows2000 IIS服務5.0所附帶的ASP 3.0發佈後好像再沒有更新過了,但是由於其入手簡單,天然的asp+access零配置,在零幾年火的就像現在的微信小程式。雖然時過境遷,其至今在國內還有小規模的用戶市場。

據工信部發佈消息,截止到2018年底,中國中小企業的數量已經超過了3000萬家,個體工商戶數量超過7000萬戶。中小企業信息化普遍面臨資金短缺、信息人才不足等問題,為了降低成本,故而企業網站一般外包給其他小規模的網路公司製作、維護,網路公司一般是套站、仿站。操作系統一般使用Windows,web程式搭建上,一般使用php+MySQL或者asp+access的“黃金”組合。

實踐

這不,筆者最近又用上了asp+access,不過不是企業站的,而是一個小型的教學管理系統。

開發過程中碰到一個問題,asp頁面前後端都是用的gb2312編碼,前端使用ajax來傳遞中文參數,後端進行編碼處理後,以免存入access為亂碼。

註:建議前後端都是用utf-8編碼,就沒下麵這麼麻煩了。

前端代碼:

$.post("result.asp?act=update",{
  val: escape(val)
},function(result){
  result = JSON.parse(result);
});

後端代碼:

Dim val
val = Trim(vbsUnEscape(request.form("val")))

ECMAScript v3 已從標準中刪除了 escape() 函數和 unescape() 函數,並反對使用它們,因此應該使用 decodeURI() 和 decodeURIComponent() 取而代之。

… All of the language features and behaviours specified in this annex have one or more undesirable characteristics and in the absence of legacy usage would be removed from this specification. …
… Programmers should not use or assume the existence of these features and behaviours when writing new ECMAScript code. …

https://www-archive.mozilla.org/js/language/E262-3.pdf
https://developer.mozilla.org/en-US/docs/Web/JavaScript/Reference/Global_Objects/escape
Function vbsUnEscape(str)
    Dim i,s,c
    s=""
    For i=1 to Len(str)
        c=Mid(str,i,1)
        If Mid(str,i,2)="%u" and i<=Len(str)-5 Then
            If IsNumeric("&H" & Mid(str,i+2,4)) Then
                s=s & CHRW(CInt("&H" & Mid(str,i+2,4)))
                i=i+5
            Else
                s=s & c
            End If
        ElseIf c="%" and i<=Len(str)-2 Then
            If IsNumeric("&H" & Mid(str,i+1,2)) Then
                s=s & CHRW(CInt("&H" & Mid(str,i+1,2)))
                i=i+2
            Else
                s=s & c
            End If
        Else
            s=s & c
        End If
    Next
    vbsUnEscape=s
End Function

另附上一般這裡用不上的vbsEscape:

'escape時不變的7個符號: *(42) +(43) -(45) .(46) /(47) @(64) _(95)
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

如果,在前端使用的是encodeURI/encodeURIComponent,而不是escape,那麼,後端還可以像下麵這樣寫:

<%
Function strDecode(str)
    Dim objScript
    Set objScript = Server.CreateObject("ScriptControl")
    objScript.Language = "JavaScript"
    strDecode = objScript.Eval("decodeURIComponent(""" & str & """.replace(/\+/g,"" ""))")
    Set objScript = NOTHING
End Function
%>

上面的vbsUnEscape函數也可以這麼寫!

原文:https://xushanxiang.com/2019/11/asp-ajax-escape.html


您的分享是我們最大的動力!

更多相關文章
  • 由於項目中難免會碰到需要實時刷新,無論是獲取簡訊碼,還是在支付完成後輪詢獲取當前最新支付狀態,這時就需要用到定時器。但是,定時器如果不及時合理地清除,會造成業務邏輯混亂甚至應用卡死的情況,這個時就需要清除定時器。某個頁面中啟動定時器後,一定要在頁面關閉時將定時器清除掉。即在頁面卸載(關閉)的生命周期 ...
  • 什麼是‘路由’,路由相當於一個映射,一個url地址對應一個組件,當url地址A變為url地址B,那麼對應地址A的組件就會改變為對應地址B的組件。應用於spa,即:單頁應用,url地址改變,它不會跳轉頁面,只會用url對應的模塊取代上一個url對應的模塊,始終都在一個頁面操作。取代了傳統的多頁應用。值 ...
  • 練習1:求一個數字的階乘 function getJieCheng(num) { var result = 1; for (var i = 1; i <= num; i++) { result *= i; } return result; } console.log(getJieCheng(6)); ...
  • 淺談Vue下的components模板在我們越來越深入Vue時,我們會發現我們對HTML代碼的工程量會越來越少,今天我們來談談Vue下的 components模板的 初步使用方法與 應用 我們先來簡單的寫一段components代碼(局部方法創造模板) <div id="app"> <haha></ ...
  • 1.多了兩個新方法 (1)startWith:判斷一個字元串是否以某個欄位開頭 let str='asdfgh'; console.log(str.startsWith('a'));//true 應用: let str='http://it.kaikeba.com';if(str.startsWit ...
  • <script> document.write("<s"+"cript type='text/javascript' src='../utils/getUrl.js?112"+Math.random()+"'></scr"+"ipt>"); </script> 刷新頁面,重新載入js,清除緩存拒絕3 ...
  • 功能描述: 1.滑鼠經過 左右側箭頭顯示,滑鼠離開 箭頭隱藏 2.動態添加底部小圓圈並綁定單擊事件,並且讓小圓圈的點擊事件和左右箭頭點擊事件同步 3.拷貝第一張圖片添加到ul最後可以實現動態添加圖片 4.給箭頭綁定單擊事件,並且使圖片可以無縫輪播 5.實現自動輪播(動畫函數) 具體實現代碼: 1.鼠 ...
  • 一、背景 前段時間,寫的一篇關於博客園主題皮膚分享的文章,一經發出便受到了極大的熱捧,後來很多網友留言說,想要讓我分享現在的模板,畢竟現在這個模板已經比之前分享的那個多經歷了N多個版本的改進和優化。那本文我就來分享我博客園中的所有的特性,以供大家直接開箱即用。廢話不多說,直接開搞~ 二、最新版CSS ...
一周排行
  • 微信公眾號: "Dotnet9" ,網站: "Dotnet9" ,問題或建議: "請網站留言" , 如果對您有所幫助: "歡迎贊賞" 。 .NET CORE(C ) WPF 抽屜式菜單 閱讀導航 1. 本文背景 2. 代碼實現 3. 本文參考 4. 源碼 1. 本文背景 使用簡單動畫實現抽屜式菜單 ...
  • 在上面abp(net core)+easyui+efcore實現倉儲管理系統——ABP WebAPI與EasyUI結合增刪改查之八(三十四) 文章的學習之後。我們通過前面的八篇文章已經學習了通過WebAPI介面與控制器去實現新增、刪除與修改功能。接下來,我們要在控制器中實現查詢功能。 ...
  • 1.選中項目-->屬性-->生成-->選中 XML文檔文件(xml路徑和該項目相同) 2.選擇生成序列化程式集:自動/開 ...
  • 本筆記摘抄自:https://www.cnblogs.com/PatrickLiu/p/7640873.html,記錄一下學習過程以備後續查用。 一、引言 從今天開始我們開始講結構型設計模式,結構型設計模式有如下幾種:適配器模式、橋接模式、裝飾模式、組合模式、外觀模式、享元模式、代理模式。 創建型設 ...
  • C 中 ConfigureAwait 相關答疑FAQ 在前段時間經常看到園子里有一些文章討論到 ConfigureAwait,剛好今天在微軟官方博客看到了 "Stephen Toub" 前不久的一篇答疑 ConfigureAwait 的一篇文章,想翻譯過來。 原文地址:https://devblog ...
  • 想要實現二維數組中根據某個欄位排序,一般可以通過數組迴圈對比的方式實現。這裡介紹一種更簡單的方法,直接通過PHP函數實現。array_multisort() :可以用來一次對多個數組進行排序,或者根據某一維或多維對多維數組進行排序。詳細介紹可參考PHP手冊:https://www.php.net/m ...
  • 常用的軟體: 播放器: cloundMusic(網易雲音樂) https://music.163.com/#/download PotPlayer(一款強大的視頻播放器) https://daumpotplayer.com/download/ ACDsee(ACDsee圖片編輯器免費版) https ...
  • 發現問題 在一次偶然中,在爬取某個網站時,老方法,打開調試工具查看請求方式,請求攔截,是否是非同步載入,不亦樂乎,當我以為這個網站非常簡單的時候,發現二級網頁的地址和源碼不對應 Ajax非同步載入?源碼也是這樣的 而且這些鏈接直... ...
  • 準備年後要跳槽,所以最近一直再看面試題,並且把收集到的面試題整理了以下發到博客上,希望對大家有所幫助。 首先是集合類的面試題 1. HashMap 排序題,上機題。 已知一個 HashMap<Integer,User>集合, User 有 name(String)和 age(int)屬性。請寫一個方 ...
  • JVM體繫結構圖 Native Interface(本地介面) Java本地介面(Java Native Interface (JNI))允許運行在Java虛擬機(Java Virtual Machine (JVM))上的代碼調用本地程式和類庫,或者被它們調用,這些程式和類庫可以是其它語言編寫的,比 ...
x