中文字幕免费精品_亚洲视频自拍_亚洲综合国产激情另类一区_色综合咪咪久久

這篇文章主要介紹了ASP緩存技術詳解,本文詳細介紹了ASP緩存技術、ASP緩存的分類、ASP緩存的實現方法和使用方法等,需要的朋友可以參考下

在做ajax中的post時，發現在服務器端取得數據時總是亂碼，網上看了些解決方法也搞不定，我post過去時是xml形式，由于亂碼服務器端xml也解析不了或出錯。于是在post前先把它編碼，到服務器端再解碼，這樣問題解決了，但是要是數據很大時估計會很影響速度。

雖然ASP中的request會自動解碼經過url編碼的字符串，但是Request.BinaryRead(Request.TotalBytes)取得post數據時卻不會解碼，所以要進行解碼。

下面是我找到的一個ASP中server.urlencode函數的解碼函數

代碼如下:

Function URLDecode(enStr)

  dim deStr,strSpecial

  dim c,i,v

    deStr=""

    strSpecial="!""#$%&'()*+,.-_/:;< =>?@[/]^`{|}~%"

    for i=1 to len(enStr)

      c=Mid(enStr,i,1)

      if c="%" then

        v=eval("&h"+Mid(enStr,i+1,2))

        if inStr(strSpecial,chr(v))>0 then

          deStr=deStr&chr(v)

          i=i+2

        else

          v=eval("&h"+ Mid(enStr,i+1,2) + Mid(enStr,i+4,2))

          deStr=deStr & chr(v)

          i=i+5

        end if

      else

        if c="+" then

          deStr=deStr&" "

        else

          deStr=deStr&c

        end if

      end if

    next

    URLDecode=deStr

End function

再附一個編碼函數，這個與server.urlencode不一樣之處是：server.urlencode會將html或xml等標簽，如

也會進行編碼，而下面這個函數不會。我是用下面的進行編碼，再解碼，因為我用post時用xml的。

代碼如下:

private Function URLEncoding(vstrIn)

    strReturn = ""

    For i = 1 To Len(vstrIn)

    ThisChr = Mid(vStrIn,i,1)

    If Abs(Asc(ThisChr)) < &HFF Then

    strReturn = strReturn & ThisChr

    Else

    innerCode = Asc(ThisChr)

    If innerCode < 0 Then

    innerCode = innerCode + &H10000

    End If

    Hight8 = (innerCode And &HFF00)/ &HFF

    Low8 = innerCode And &HFF

    strReturn = strReturn & "%" & Hex(Hight8) & "%" & Hex(Low8)

    End If

    Next

    URLEncoding = strReturn

  End Function

更多信息請查看IT技術專欄