Chinese character is converted into pinyin

xiaoxiao2021-03-06  67

For example, if you want to achieve search "L", you can search for "Liu's" "Li's" "Lin"

<%

'test

Response.Write CheckstringFirst ("Liu's") 'Printing L

Function checkstringfirst (char) "[45217, 65184] is Chinese characters, [65584, 65593]

Char = MID (char, 1, 1)

Firstchar = 65536 ASC (char)

If firstchar> = 65584 and firstchar <= 65593 THEN 'Judging whether it is a number

getPychar = "NUM"

END IF

If firstchaar <45217 or firstchar> 65184 or firstchar <65584 or firstchar> 65593 THEN 'Judging whether it is a special character!

getPychar = "Ohter"

END IF

IF firstchar> 45217 and first <65184 THEN

IF (firstchar> = 45217 and firstchar <= 45252) Then getpychar = "a"

IF (firstchar> = 45253 and firstchar <= 45760) Then getpychar = "b"

IF (firstchar> = 45761 and firstchar <= 46317) Then getpychar = "c"

IF (firstchar> = 46318 and firstchar <= 46825) Then getpychar = "d"

IF (firstchar> = 46826 and firstcharac <= 47009) Then getpychar = "e"

IF (firstchar> = 47010 and firstchar <= 47296) Then getpychar = "f"

IF (firstchar> = 47297 and firstchar <= 47613) Then getpychar = "g"

IF (firstchar> = 47614 and firstchar <= 48118) Then getpychar = "h"

IF (firstchar> = 48119 and firstchar <= 49061) Then getpychar = "j"

IF (firstchar> = 49062 and firstchar <= 49323) Then getpychar = "k"

IF (firstchar> = 49324 and firstchar <= 49895) Then getpychar = "l"

IF (firstchar> = 49896 and firstchar <= 50370) Then getpychar = "m"

IF (firstchar> = 50371 and firstchar <= 50613) Then getpychar = "n" if (firstchar> = 50614 and firstchar <= 50621) Then getpychar = "o"

IF (firstchar> = 50622 and firstchar <= 50905) THEN getpychar = "p"

IF (firstchar> = 50906 and firstchar <= 51386) Then getpychar = "q"

IF (firstchar> = 51387 and firstchar <= 51445) Then getpychar = "r"

IF (firstchar> = 51446 and firstchar <= 52217) Then getpychar = "s"

IF (firstchar> = 52218 and firstchar <= 52697) Then getpychar = "t"

IF (firstchar> = 52698 and firstchar <= 52979) Then getpychar = "w"

IF (firstchar> = 52980 and firstchar <= 53688) Then getpychar = "x"

IF (firstchar> = 53689 and firstchar <= 54480) Then getpychar = "y"

IF (firstchar> = 54481 and firstchar <= 65184) Then getpychar = "z"

END IF

Char = getpychar

END FUNCTION

%>

转载请注明原文地址:https://www.9cbs.com/read-111105.html

New Post(0)