下载的文件中有中文就乱码

[漠叔]

<%
s = "中文"

With Response 
    .Charset    = "GB2312"
    .ContentType= "application/octec-stream"
    .AddHeader "Accept-Ranges", "bytes"
    .AddHeader "Content-Length", LenB(s)
    .AddHeader "Content-Type", "application/octec-stream"
    .AddHeader "DownloadOptions", "noopen"
    .AddHeader "Content-Disposition","attachment; filename=test.txt"
    .BinaryWrite s
End With

%>

下载的文件text.txt中是乱码,如果"中文"是英文字母和数字就正常

[toury]

google: byte2str()
用这个函数处理你的s

[漠叔]

请问楼上byte2str函数的具体代码是?