浏览模式: 普通 | 列表
5月, 2007 | 1

ASP检索出现的内存溢出

[ 2007-05-16 01:13:12 | 作者: admin ]
将日文字符做编码处理
编码
引用
Function JpEncode(byVal iStr)
if isnull(iStr) or isEmpty(iStr) then
JpEncode=""
Exit function
end if
dim F,i,E
' F=array("ゴ","ガ","ギ","グ","ゲ","ザ","ジ","ズ","ヅ","デ",_
' "ド","ポ","ベ","プ","ビ","パ","ヴ","ボ","ペ","ブ","ピ","バ",_
' "ヂ","ダ","ゾ","ゼ")
E=array("Jn0;","Jn1;","Jn2;","Jn3;","Jn4;","Jn5;","Jn6;","Jn7;","Jn8;","Jn9;","Jn10;","Jn11;","Jn12;","Jn13;","Jn14;","Jn15;","Jn16;","Jn
...

阅读全文…
1