中国の文の最初のキャラクターの首都ピンイン文字を入手する
<%
'*******************************
'関数:getPychar(char)
'議論:char、漢字または文
著者:アリクシ
'日付:2007/7/15
'説明:中国の文の最初の性格の首都ピンイン文字を入手する
'例: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"
それ以外は中国人ではない場合、処理されません