ASP汉字转ASCII码和汉字内码、区位码，
    例如：北
    使用vb求asc("北")=-20047，这是对16位内码数据进行的一个取反加1操作，如果想得到真正的汉字内码，需要加上65536才可以，即65536-20047=45489，hex(45489)等于b1b1，这里的b1b1就是机器内码，其中高8位减去a0就是区码11，低8位减去a0就是位码11了。
    又例如：京
    使用ASP求asc("京")=-16727，汉字对应的内码：65536-48809，hex(48809)等于bea9，这里的bea9就是机器内码，其中高8位减去a0就是区码1e，低8位减去a0就是位码09了。

    例：输出“中”字的十进制区码和位码。

a="中"
x=asc(a)+65536
y=hex(x)
z1=clng("&H"&left(y,2)) '中的区码
z2=clng("&H"&right(y,2)) '中的位码