utf-8编码下怎么得到中文gb2312的urlencode编码

[pengteling]

找了很多转码函数，gb2312页面下得到中文utf-8的urlencode是找到了

但反之在utf-8页面通过函数转换得到中文字符串的gb2312码对应的urlencode 一直没找到，高手帮忙

比如“中国人”在gb2312下的urlencode编码 %D6%D0%B9%FA%C8%CB （A）
在utf-8下的urlencode编码 %E4%B8%AD%E5%9B%BD%E4%BA%BA （B）

现在我在gb2312页面通过一个转换函数可以直接从A转换到B， 但在utf-8编码的页面怎么直接从B得到A ，谢谢了，困扰很久

当然不能用下面这种办法

<%codepage=65001%>
<%
session.codepage=936
response.write server.urlencode("中文")
session.codepage=65001

[CCCDNNN555]

之前遇过ftp乱码问题，换用默认default方式解决了。可以换种编码方式

[lzp4881]

http://hi.baidu.com/lz0830/item/574856efc9a549265b2d6416

[hookee]

找个支持 ByteArray 的组件就可以了。 Chilkat.Charset https://www.chilkatsoft.com/download/CharsetActiveX-9.4.0-win32.msi 以下测试过可以。

<%
s = "%E4%B8%AD%E5%9B%BD%E4%BA%BA"
Set obj = CreateObject("Chilkat.Charset")
a = obj.UrlDecode(s)
Set obj = Nothing

Set stream = CreateObject("ADODB.Stream")
With stream
    .Mode = 3
    .Type = 1
    .Open
    .Write a
    .Position = 0
    .Type = 2
    .Charset = "utf-8"
    s = .ReadText()
    .Close
End With
Set stream = Nothing
Response.Write s
%>