asp字符串比较(编码我认为)

时间:2012-11-18 11:00:00

标签: asp-classic encode

我正在向我的asp页面发送帖子请求, 我使用以这种方式读取文件的参数:

station = request.form("station")
StationFolderPath = currentDir & "iPhoneListener\Locations\" & station
fs.FolderExists(StationFolderPath)

用英文字母没有问题。 但是当我发送希伯来字母时,它找不到文件夹。 我用这个检查了

response.write(right(station,6))

并得到:#1497也许有人知道如何将此&#1497编码为普通字母。

感谢

1 个答案:

答案 0 :(得分:0)

您可以使用here中的HTML解码功能,并将代码中的第一行更改为station = HTMLDecode(request.form(“station”))。

Function HTMLDecode(sText)
    Dim regEx
    Dim matches
    Dim match
    sText = Replace(sText, """, Chr(34))
    sText = Replace(sText, "<"  , Chr(60))
    sText = Replace(sText, ">"  , Chr(62))
    sText = Replace(sText, "&" , Chr(38))
    sText = Replace(sText, " ", Chr(32))


    Set regEx= New RegExp

    With regEx
     .Pattern = "&#(\d+);" 'Match html unicode escapes
     .Global = True
    End With

    Set matches = regEx.Execute(sText)

    'Iterate over matches
    For Each match in matches
        'For each unicode match, replace the whole match, with the ChrW of the digits.

        sText = Replace(sText, match.Value, ChrW(match.SubMatches(0)))
    Next

    HTMLDecode = sText
End Function