asp 取得中文句子头一个字的大写拼音字母的函数

取得中文句子头一个字的大写拼音字母
<%
'******************************
'函数：getpychar(char)
'参数：char,任意中文字符或句子
'作者：阿里西西
'日期：2007/7/15
'描述：取得中文句子头一个字的大写拼音字母
'示例：getpychar("欢迎访问阿里西西")
'******************************
Function getpychar(char)
 Dim tmp
 tmp=65536+Asc(char) 
 If(tmp>=45217 And tmp<=45252) Then 
 getpychar= "A" 
 ElseIF(tmp>=45253 And tmp<=45760) Then 
 getpychar= "B" 
 ElseIF(tmp>=45761 And tmp<=46317) Then 
 getpychar= "C" 
 ElseIF(tmp>=46318 And tmp<=46825) Then 
 getpychar= "D" 
 ElseIF(tmp>=46826 And tmp<=47009) Then 
 getpychar= "E" 
 ElseIF(tmp>=47010 And tmp<=47296) Then 
 getpychar= "F" 
 ElseIF(tmp>=47297 And tmp<=47613) Then 
 getpychar= "G" 
 ElseIF(tmp>=47614 And tmp<=48118) Then 
 getpychar= "H" 
 ElseIF(tmp>=48119 And tmp<=49061) Then 
 getpychar= "J" 
 ElseIF(tmp>=49062 And tmp<=49323) Then 
 getpychar= "K" 
 ElseIF(tmp>=49324 And tmp<=49895) Then 
 getpychar= "L" 
 ElseIF(tmp>=49896 And tmp<=50370) Then 
 getpychar= "M" 
 ElseIF(tmp>=50371 And tmp<=50613) Then 
 getpychar= "N" 
 ElseIF(tmp>=50614 And tmp<=50621) Then 
 getpychar= "O" 
 ElseIF(tmp>=50622 And tmp<=50905) Then 
 getpychar= "P" 
 ElseIF(tmp>=50906 And tmp<=51386) Then 
 getpychar= "Q" 
 ElseIF(tmp>=51387 And tmp<=51445) Then 
 getpychar= "R" 
 ElseIF(tmp>=51446 And tmp<=52217) Then 
 getpychar= "S" 
 ElseIF(tmp>=52218 And tmp<=52697) Then 
 getpychar= "T" 
 ElseIF(tmp>=52698 And tmp<=52979) Then 
 getpychar= "W" 
 ElseIF(tmp>=52980 And tmp<=53640) Then 
 getpychar= "X" 
 ElseIF(tmp>=53689 And tmp<=54480) Then 
 getpychar= "Y" 
 ElseIF(tmp>=54481 And tmp<=62289) Then 
 getpychar= "Z" 
 Else '如果不是中文，则不处理 
 getpychar=char 
 End If 
End Function
%>

赞 (0)

相关推荐

  • c# 中文转拼音without CJK

    Xamarin写Android程序时,通常要使用按中文首字母分组显示(如通讯录) . 于是需要被迫包含CJK,不过包含后包肯定是会变大的,于是....自己写了一个硬枚举的中文转拼音的类. 原理是这样的: public class PinYinUtils { private static readonly Dictionary<string, string> PinYinDict = new Dictionary<string, string> { {"猿", &

  • JS获取中文拼音首字母并通过拼音首字母快速查找页面内对应中文内容的方法【附demo源码】

    JS获取中文拼音首字母并通过拼音首字母快速查找页面内对应中文内容的方法【附demo源码】

    本文实例讲述了JS获取中文拼音首字母并通过拼音首字母快速查找页面内对应中文内容的方法.分享给大家供大家参考,具体如下: 实现效果: 图一: 图二: 此例中输入的中文字符串"万万保重",有三个字是多音字,所以alert对话框中显示的是多种读音的组合: 如何实现? 如何实现通过拼音首字母快速查找页面内的中文内容呢? 过程原理是这样的:例如要对一些人名进行快速查找,当页面加载完成后,对所有人名建立一个索引,生成拼音首字母与姓名的对应关系:然后监听键盘事件,当用户按下键盘时,根据键值得到按下的

  • mysql的中文数据按拼音排序的2个方法

    客服那边需要我对一些酒店进行中文拼音排序,以前没有接触过,在php群里问了一些大牛..得到了2种答案,都可以.哈哈·~ 以下既是msyql 例子,表结构是utf-8的 方法一. 复制代码 代码如下: SELECT `hotel_name` FROM `hotel_base` ORDER BY convert( `hotel_name` USING gbk ) COLLATE gbk_chinese_ci 方法二. 复制代码 代码如下: SELECT `hotel_id` , `hotel_nam

  • MySQL中文汉字转拼音的自定义函数和使用实例(首字的首字母)

    fristPinyin : 此函数是将一个中文字符串的第一个汉字转成拼音字母 (例如:"中国人"->Z) 复制代码 代码如下: CREATE FUNCTION `fristPinyin`(P_NAME VARCHAR(255)) RETURNS varchar(255) CHARSET utf8BEGIN    DECLARE V_RETURN VARCHAR(255);    SET V_RETURN = ELT(INTERVAL(CONV(HEX(left(CONVERT(P

  • Mysql中文汉字转拼音的实现（每个汉字转换全拼）

    一.创建拼音对照表 复制代码 代码如下: -- 创建汉字拼音对照临时表CREATE TABLE IF NOT EXISTS `t_base_pinyin` (  `pin_yin_` varchar(255) CHARACTER SET gbk NOT NULL,  `code_` int(11) NOT NULL,  PRIMARY KEY (`code_`)) ENGINE=InnoDB DEFAULT CHARSET=latin1; 二.插入对照数据 复制代码 代码如下: -- 插入数据I

  • 简单的php中文转拼音的实现代码

    不多说,代码送上: 复制代码 代码如下: <?phpfunction Pinyin($_String, $_Code='gb2312'){$_DataKey = "a|ai|an|ang|ao|ba|bai|ban|bang|bao|bei|ben|beng|bi|bian|biao|bie|bin|bing|bo|bu|ca|cai|can|cang|cao|ce|ceng|cha"."|chai|chan|chang|chao|che|chen|cheng|chi|

  • JavaScript 中文转拼音实现代码 有些bug

    1.问题背景: 在做项目时候遇到一个小小的显示客户部门名称(拼音)的业务,就是在部门名称下有相应的拼音,而在现有的数据库中没有相应字段,并且部门数量比较多,添加起来比较费时,就想能否在js中实现,在页面中处理. 2.原理描述 程序原理很简单,网上可以找到汉字拼音的数据字典,但是由于大家都知道GB2312编码里面汉字是按拼音排序的,只要知道各个拼音为首的汉字代码,就可以计算所有汉字的拼音代码了. 本文通过自定义用于存放汉字拼音与ascii码对应的数据字典,再通过将需要转换的汉字转为ascii码(两

  • js 获取中文拼音,Select自动匹配字母获取值的代码

    复制代码 代码如下: <script type="text/javascript"> var key2code = {65:"a",66:"b",67:"c",68:"d",69:"e",70:"f",71:"g",72:"h",73:"i",74:"j", 75:"

  • 基于jquery的使ListNav兼容中文首字拼音排序的实现代码

    基于jquery的使ListNav兼容中文首字拼音排序的实现代码

    效果图如下所示: 复制代码 代码如下: <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <title>中

  • Wordpress 相册插件 NextGEN-Gallery 添加目录将中文转为拼音的解决办法

    NextGEN Gallery是Wordpress中著名的相册插件,遗憾的是不支持中文等unicode字符,本文将介绍如何将目录转换为拼音(添加图集时). 以NextGEN 1.6.2为例: "新增图集/图片"的路径是:admin.php?page=nggallery-add-gallery,我们在nextgen-gallery/admin/admin.php中查找"nggallery-add-gallery", 复制代码 代码如下: switch ($_GET['

随机推荐