중국 문장의 첫 번째 성격의 수도 Pinyin 편지를 받으세요
<%
'*******************************
'기능 : getpychar (char)
'논쟁 : 숯, 모든 중국어 또는 문장
'저자 : Alixi
'날짜 : 2007/7/15
'설명 : 중국 문장의 첫 번째 성격의 수도 Pinyin 편지 받기
'예 : GetPychar ( "Alixi에 오신 것을 환영합니다")
'*******************************
FunctionGetPychar (char)
Dimtmp
TMP = 65536+ASC (char)
if (tmp> = 45217andtmp <= 45252)
getpychar = "a"
elseif (tmp> = 45253andtmp <= 45760)
getpychar = "B"
elseif (tmp> = 45761andtmp <= 46317)
getpychar = "C"
elseif (tmp> = 46318andtmp <= 46825)
getpychar = "D"
elseif (tmp> = 46826andtmp <= 47009)
getpychar = "e"
elseif (tmp> = 47010andtmp <= 47296)
getpychar = "F"
elseif (tmp> = 47297andtmp <= 47613)
getpychar = "g"
elseif (tmp> = 47614andtmp <= 48118)
getpychar = "h"
elseif (tmp> = 48119andtmp <= 49061)
getpychar = "J"
elseif (tmp> = 49062andtmp <= 49323)
getpychar = "k"
elseif (tmp> = 49324andtmp <= 49895)
getpychar = "L"
elseif (tmp> = 49896andtmp <= 50370)
getpychar = "m"
elseif (tmp> = 50371andtmp <= 50613)
getpychar = "n"
elseif (tmp> = 50614andtmp <= 50621)
getpychar = "o"
elseif (tmp> = 50622andtmp <= 50905)
getpychar = "P"
elseif (tmp> = 50906andtmp <= 51386)
getpychar = "Q"
elseif (tmp> = 51387andtmp <= 51445)
getpychar = "r"
elseif (tmp> = 51446andtmp <= 52217)
getpychar = "s"
elseif (tmp> = 52218andtmp <= 52697)
getpychar = "t"
elseif (tmp> = 52698andtmp <= 52979)
getpychar = "W"
elseif (tmp> = 52980andtmp <= 53640)
getpychar = "x"
elseif (tmp> = 53689andtmp <= 54480)
getpychar = "y"
elseif (tmp> = 54481andtmp <= 62289)
getpychar = "z"
그렇지 않으면 중국어가 아니라면 처리되지 않습니다.