|
Blue Forest http://www.lslnet.com at 8:28 on August 25, 2006
Chinese emergency scheduling Chinese Array Sort () method of classification?
For example :
Abc = new Arrary ( "Shum involved," "Sun is accurate," and "Luo Sun Britain," "Ringleader G")
Document.write (abc.sort () + "" br/> ")
Sun prospective were 3/s, Lee G liter, Shen involved 3/s, Luo Shunshe British liter 4003rd actual results / mother first character
Sun prospective were 3/s, Mr involved 3/s, Luo Shunshe British Melosira Lee 4003rd correct result of political liter / mother first character
I use the "script language=" vbscript ""
GetPYChar function (char)
Tmp=65536+asc (char)
If (tmp>=45217 and tmp<=45252) then getPYChar= "a"
If (tmp>=45253 and tmp<=45760) then getPYChar= "b"
If (tmp>=45761 and tmp<=46317) then getPYChar= "c"
If (tmp>=46318 and tmp<=46825) then getPYChar= "d"
If (tmp>=46826 and tmp<=47009) then getPYChar= "e"
If (tmp>=47010 and tmp<=47296) then getPYChar= "f"
If (tmp>=47297 and tmp<=47613) then getPYChar= "g"
If (tmp>=47614 and tmp<=48118) then getPYChar= "h"
If (tmp>=48119 and tmp<=49061) then getPYChar= "j"
If (tmp>=49062 and tmp<=49323) then getPYChar= "k"
If (tmp>=49324 and tmp<=49895) then getPYChar= "l"
If (tmp>=49896 and tmp<=50370) then getPYChar= "m"
If (tmp>=50371 and tmp<=50613) then getPYChar= "n"
If (tmp>=50614 and tmp<=50621) then getPYChar= "o"
If (tmp>=50622 and tmp<=50905) then getPYChar= "p"
If (tmp>=50906 and tmp<=51386) then getPYChar= "q"
If (tmp>=51387 and tmp<=51445) then getPYChar= "r"
If (tmp>=51446 and tmp<=52217) then getPYChar= "s"
If (tmp>=52218 and tmp<=52697) then getPYChar= "t"
If (tmp>=52698 and tmp<=52979) then getPYChar= "w"
If (tmp>=52980 and tmp<=53688) then getPYChar= "x"
If (tmp>=53689 and tmp<=54480) then getPYChar= "y"
If (tmp>=54481 and tmp<=56289) then getPYChar= "z"
End function
Function getpy (str)
For i = 1 to practically (str)
Getpy= getpy&getPYChar (mid (str, i,1)) & ""
Next
End function
"/script>
Gbk code switch
How to solve this problem?
Mody can provide some code |
???????/ |
|