在线用户    站点地图 技术论坛 文档中心 站点导航 资源下载 语言参考 教程专题 站点统计 业务项目 使用帮助
您的位置
MSDN参考新加了CSS2参考,全中文,制作精良。245k下载。           新加了sxf_sxf推荐的"动态网页专家指导" 下载!          新加了lsg2002lsg推荐的"ASP.NET高级编程(PDF)" 下载!          新加了DHTML代码预览!!,功能强大哦!欢迎试用          新加了网友lincong为大家提供的SQL Server 2000 程序员指南,有点大,但同时也就说明内容全咯!           新加了网友ibra为大家提供的北大的JAVA课件,很适合初学者入门           新加了一个java的连接缓冲池代码示例           新加了人月神话电子版下载!软件工程巨著哦~~           更新了评分标准,引入了“专家分”概念,相信可以更好的激励大家的学习!详情请看“使用帮助”           新加了由网友GGG提供的“IIS超级管理手册”,值得一看哦!(虽然我没看过 :P )           新加了“英雄榜”,欢迎测试!           “无组件上传·从原理剖析到实践”已经全部完成,源码全部开放,有兴趣的朋友请到文档中心一探究竟。  您的位置  首页>文档中心>ASP>文档A0000733 在同一窗口中打开页面中的链接 在新窗口中打开页面中的链接 将ASPCHINA设为首页 将ASPCHINA加入书签    
 LOGIN HERE
用户:
密码: 忘记密码
记住密码 用户注册 游客进入
相关文章

得到汉字的拼音

得到汉语拼音首字母
发表文章
用字典提取汉语的拼音的首字母

原作者:     提交人:winking     发布时间:04-04-01     文章类型:转贴     浏览量:2073
参考链结:http://    
关键字:拼音
[本文档没有附件]
字体:    视力保护色: 杏仁黄  秋叶褐  胭脂红  芥末绿  天蓝  雪青  灰  银河白(默认色) [A0000733]

<%
function getpychar(char)
tmp=65536+asc(char)
if(tmp>=45217 and tmp<=45252) or left(char,1)="a" or left(char,1)="A" then getpychar= "A"
if(tmp>=45253 and tmp<=45760) or left(char,1)="b" or left(char,1)="B" then getpychar= "B"
if(tmp>=45761 and tmp<=46317) or left(char,1)="c" or left(char,1)="C" then getpychar= "C"
if(tmp>=46318 and tmp<=46825) or left(char,1)="d" or left(char,1)="D" then getpychar= "D"
if(tmp>=46826 and tmp<=47009) or left(char,1)="e" or left(char,1)="E" then getpychar= "E"
if(tmp>=47010 and tmp<=47296) or left(char,1)="f" or left(char,1)="F" then getpychar= "F"
if(tmp>=47297 and tmp<=47613) or left(char,1)="g" or left(char,1)="G" then getpychar= "G"
if(tmp>=47614 and tmp<=48118) or left(char,1)="h" or left(char,1)="H" then getpychar= "H"
if left(char,1)="I" or left(char,1)="i" then getpychar= "I"
if(tmp>=48119 and tmp<=49061) or left(char,1)="j" or left(char,1)="J" then getpychar= "J"
if(tmp>=49062 and tmp<=49323) or left(char,1)="k" or left(char,1)="K" then getpychar= "K"
if(tmp>=49324 and tmp<=49895) or left(char,1)="l" or left(char,1)="L" then getpychar= "L"
if(tmp>=49896 and tmp<=50370) or left(char,1)="m" or left(char,1)="M" then getpychar= "M"
if(tmp>=50371 and tmp<=50613) or left(char,1)="n" or left(char,1)="N" then getpychar= "N"
if(tmp>=50614 and tmp<=50621) or left(char,1)="o" or left(char,1)="O" then getpychar= "O"
if(tmp>=50622 and tmp<=50905) or left(char,1)="p" or left(char,1)="P" then getpychar= "P"
if(tmp>=50906 and tmp<=51386) or left(char,1)="q" or left(char,1)="Q" then getpychar= "Q"
if(tmp>=51387 and tmp<=51445) or left(char,1)="r" or left(char,1)="R" then getpychar= "R"
if(tmp>=51446 and tmp<=52217) or left(char,1)="s" or left(char,1)="S" then getpychar= "S"
if(tmp>=52218 and tmp<=52697) or left(char,1)="t" or left(char,1)="T" then getpychar= "T"
if left(char,1)="u" or left(char,1)="U" then getpychar= "U"
if left(char,1)="V" or left(char,1)="v" then getpychar= "V"
if(tmp>=52698 and tmp<=52979) or left(char,1)="w" or left(char,1)="W" then getpychar= "W"
if(tmp>=52980 and tmp<=53640) or left(char,1)="x" or left(char,1)="X" then getpychar= "X"
if(tmp>=53689 and tmp<=54480) or left(char,1)="y" or left(char,1)="Y" then getpychar= "Y"
if(tmp>=54481 and tmp<=55289) or left(char,1)="z" or left(char,1)="Z" then getpychar= "Z"
end function

function getpy(str)
for i=1 to len(str)
getpy=getpy&getpychar(mid(str,i,1))
next
end function
%>

关于这篇文章的评论 [注意:这里仅仅是给大家提供了一个发表对文章本身看法的地方,如果有疑问,请到论坛提出] 我要提问!
8chinaasp        2004/4/22 8:52:00
简体编码本来不完全依照拼音排序
简体编码本来不完全依照拼音排序,所以这个程序不完全正确。
miles        2004/4/15 11:29:00
好!
java文档有一个对应的。
标题
内容
发言
*您尚未以注册用户身份登录,不能发表评论。这里登录
您的位置
  (c)2000-2020 Yup Studio, all rights reserved.  
164.0625