请大哥们帮我把这小段代码改成ASP的吧，多谢

Question

function flashdata_decode($s) {
     $r = '';
     $l = strlen($s);
     for($i=0; $i<$l; $i=$i+2) {
     $k1 = ord($s[$i]) - 48;
     $k1 -= $k1 > 9 ? 7 : 0;
     $k2 = ord($s[$i+1]) - 48;
     $k2 -= $k2 > 9 ? 7 : 0;
     $r .= chr($k1 << 4 | $k2);
     }
     return $r;
     }对PHP不熟，搞不来，多谢啊
主要是  $r .= chr($k1 << 4 | $k2); 这行不知道怎么改

Answer 1

PHP strlen 函数
ASP len 函数PHP ord 函数
ASP asc 函数PHP | 运算符
ASP or 运算符PHP << 右移运算符
ASP 无 可用连乘 2 代替。比如 << 4 就是 *2*2PHP $s[$i]
ASP mid(s, i, 1)

Answer 2

非常感谢，上面那些已经翻译过来了，但是 PHP的chr 与 ASP的 chr /chrw 转过来的有些偏字不一样，ASP转过来是 ?  号，怎么办呀