半角、全角 字符串互转\提取中文或数字

最新推荐文章于 2023-01-06 17:55:22 发布
最新推荐文章于 2023-01-06 17:55:22 发布
阅读量1.7k 收藏
点赞数
分类专栏： SQL 函数 文章标签： function encryption object null go c
 

/*  
半角字符串转全角
*/
if   exists   (select   *   from   dbo.sysobjects   where   id   =   object_id(N '[dbo].[convert_CharSet_BJ2QJ] ')  
and   xtype   in   (N 'FN ',   N 'IF ',   N 'TF '))
drop   function   [dbo].[convert_CharSet_BJ2QJ]
GO

CREATE   FUNCTION   convert_CharSet_BJ2QJ(@AnsiString   nvarchar(2000))         --           输入的字符串，半角  
RETURNS   nvarchar(2000)
WITH   ENCRYPTION
AS
BEGIN
DECLARE   @i                   int
,@ret               nvarchar(2000)

select   @i=1
SET   @ret= ' '
while   @i <=len(@AnsiString)
begin
select   @ret   =   @ret   +   NCHAR(ascii(SUBSTRING(@AnsiString,   @i,   1))+   0xFEE0   )     --   $FEE0    
SET   @i=@i+1
end

return   @ret
end

go

--
/*
select   dbo.convert_CharSet_BJ2QJ(   '12345678.900 ')                                                                                                                                                                                          
--
*/

/*  
全角字符串转半角
*/
if   exists   (select   *   from   dbo.sysobjects   where   id   =   object_id(N '[dbo].[convert_CharSet_QJ2BJ] ')  
and   xtype   in   (N 'FN ',   N 'IF ',   N 'TF '))
drop   function   [dbo].[convert_CharSet_QJ2BJ]
GO

CREATE   FUNCTION   convert_CharSet_QJ2BJ(@WideString   nvarchar(2000))         --           输入的字符串，全角  
RETURNS   nvarchar(2000)
WITH   ENCRYPTION
AS
BEGIN
DECLARE   @i                   int
,@ret               nvarchar(2000)

select   @i=1
SET   @ret= ' '
WHILE     SUBSTRING(@WideString,@i,1) <> ' '        
BEGIN        
SET     @ret=@ret+NCHAR(UNICODE(SUBSTRING(@WideString,@i,1))-
CASE    
WHEN     SUBSTRING(@WideString,@i,1)= '。 '     THEN     12244     ELSE         65248                                      
END     )    
SET     @i=@i+1    
END    

return   @ret
end

go

--
/*
select   dbo.convert_CharSet_QJ2BJ(   '１２３４５６７８．９。００ ')                                                                                                                                                                                          
--
*/


/*  
数字字符串转全角。可以包含中文。
*/
if   exists   (select   *   from   dbo.sysobjects   where   id   =   object_id(N '[dbo].[convert_CharSet_2QJ] ')  
and   xtype   in   (N 'FN ',   N 'IF ',   N 'TF '))
drop   function   [dbo].[convert_CharSet_2QJ]
GO

CREATE   FUNCTION   convert_CharSet_2QJ(@AnsiString   nvarchar(2000))         --           输入的字符串，半角  
RETURNS   nvarchar(2000)
WITH   ENCRYPTION
AS
BEGIN
DECLARE   @i                   int
,@ret               nvarchar(2000)

select   @i=1
SET   @ret= ' '
while   @i <=len(@AnsiString)
begin
if   unicode(SUBSTRING(@AnsiString,   @i,   1)) <256
select   @ret   =   @ret   +   NCHAR(unicode(SUBSTRING(@AnsiString,   @i,   1))+   0xFEE0   )  
else
select   @ret   =   @ret   +   SUBSTRING(@AnsiString,   @i,   1)          
SET   @i=@i+1
end

return   @ret
end

go

--
/*
select   dbo.convert_CharSet_2QJ(   '７我们12345678.900 ')                                                                                                                                                                                          
--
*/

/*  
数字字符串转半角。包含汉字的字符串输出   null.
*/
if   exists   (select   *   from   dbo.sysobjects   where   id   =   object_id(N '[dbo].[convert_CharSet_2BJ] ')  
and   xtype   in   (N 'FN ',   N 'IF ',   N 'TF '))
drop   function   [dbo].[convert_CharSet_2BJ]
GO

CREATE   FUNCTION   convert_CharSet_2BJ(@WideString   nvarchar(2000))         --           输入的字符串，全角  
RETURNS   nvarchar(2000)
WITH   ENCRYPTION
AS
BEGIN
DECLARE   @i                   int
,@ret               nvarchar(2000)

select   @i=1
SET   @ret= ' '
WHILE     SUBSTRING(@WideString,@i,1) <> ' '        
BEGIN  
if   UNICODE(SUBSTRING(@WideString,@i,1))> 255      
SET     @ret=@ret+NCHAR(UNICODE(SUBSTRING(@WideString,@i,1))-
CASE    
WHEN     SUBSTRING(@WideString,@i,1)= '。 '     THEN     12244     ELSE         65248                                      
END     )  
else
SET     @ret=@ret+(SUBSTRING(@WideString,@i,1))          
SET     @i=@i+1    
END    

return   @ret
end

go

--
/*
select   dbo.convert_CharSet_2BJ(   '156１２３４５６７８．９。００ ')    
--
*/

create function c1toc2(@c3 nvarchar(1000))
returns nvarchar(1000)
as
begin
--declare @c1 nvarchar(30),@c2 nvarchar(30)
--set @c1='～！◎＃￥％……※×（）＿＋；‘：“，。、《》？【】『』'
--set @c2='~!@#$%^&*()_+;'':",./<>?[]{}'
select @c3=stuff(@c3,number,1,substring('~!@#$%^&*()_+;'':"",./<>?[]{}',charindex(substring(@c3,number,1),'～！◎＃￥％…※×（）＿＋；‘：“”，。、《》？【】『』'),1))
from master..spt_values where type='p' and number between 1 and len(@c3) and charindex(substring(@c3,number,1),'～！◎＃￥％…※×（）＿＋；‘：“”，。、《》？【】『』')>0
set @c3=replace(@c3,'^^','^')
return @c3
end
go
declare @c nvarchar(1000)
set @c='你好，今天是周未！（你）吃过没有？他说：“你今天很漂亮……”※《◎【】》、『％＃』这两本书很有意思。'
go
--求将一个字段的多条记录，拼成一条记录

if object_id('tb') is not null
   drop table tb
go
create table tb
(
 编码 varchar(10),
 名称 varchar(10)
)
go
insert into tb
select '01','AAA' union all
select '01','BBB' union all
select '01','CCC' union all
select '02','DDD' union all
select '02','eee' union all
select '03','fff'
go
select 编码,名称=stuff((select '/'+名称 from tb where 编码=a.编码 for xml path('')),1,1,'') from tb a group by 编码
go
/*
---

 

--提取汉字
IF OBJECT_ID('dbo.fn_china_word') IS NOT NULL
DROP FUNCTION dbo.fn_china_word
GO
CREATE FUNCTION dbo.fn_china_word(@S NVARCHAR(100))
RETURNS VARCHAR(100)
AS
BEGIN
WHILE PATINDEX('%[^吖-座]%',@S) > 0---去掉 ^ 就是取非汉字
SET @S = STUFF(@S,PATINDEX('%[^吖-座]%',@S),1,N'')
RETURN @S
END
GO
select dbo.fn_china_word('s上地dfa北京市56中国的首都010sKSD海淀区*&^')
GO

--提取数字
IF OBJECT_ID('dbo.fn_get_number') IS NOT NULL
DROP FUNCTION dbo.fn_get_number
GO
CREATE FUNCTION dbo.fn_get_number(@S VARCHAR(100))
RETURNS VARCHAR(100)
AS
BEGIN
WHILE PATINDEX('%[^0-9]%',@S) > 0
BEGIN
set @s=stuff(@s,patindex('%[^0-9]%',@s),1,'')
END
RETURN @S
END
GO
select dbo.fn_get_number('sdfa北京市56中国的首都010sKSD海淀区*&^')
GO
--提取英文
IF OBJECT_ID('dbo.fn_get_eword') IS NOT NULL
DROP FUNCTION dbo.fn_get_eword
GO
CREATE FUNCTION dbo.get_eword(@S VARCHAR(100))
RETURNS VARCHAR(100)
AS
BEGIN
WHILE PATINDEX('%[^a-z]%',@S) > 0
BEGIN
set @s=stuff(@s,patindex('%[^a-z]%',@s),1,'')
END
RETURN @S
END
GO
select dbo.fn_get_eword('sdfa北京市56中国的首都010sKSD海淀区*&^')
GO

 

--获取拼音首字母函数
create function fn_GetPy_Each_First(@str nvarchar(4000))
returns nvarchar(4000)
as
begin
declare @strlen int,@re nvarchar(4000)
declare @t table(chr nchar(1) collate Chinese_PRC_CI_AS,letter nchar(1))
insert into @t(chr,letter)
  select '吖','A' union all select '八','B' union all
  select '嚓','C' union all select '咑','D' union all
  select '妸','E' union all select '发','F' union all
  select '旮','G' union all select '铪','H' union all
  select '丌','J' union all select '咔','K' union all
  select '垃','L' union all select '嘸','M' union all
  select '拏','N' union all select '噢','O' union all
  select '妑','P' union all select '七','Q' union all
  select '呥','R' union all select '仨','S' union all
  select '他','T' union all select '屲','W' union all
  select '夕','X' union all select '丫','Y' union all
  select '帀','Z'
  select @strlen=len(@str),@re=''
  while @strlen>0
  begin
    select top 1 @re=letter+@re,@strlen=@strlen-1
      from @t a where chr<=substring(@str,@strlen,1)
      order by chr desc
    if @@rowcount=0
      select @re=substring(@str,@strlen,1)+@re,@strlen=@strlen-1
  end
  return(@re)
end
go
select dbo.fn_GetPy_Each_First('大家都是中国人')
go
---获取汉字串中第一个汉字的首字母
create  function fn_Getchinese_firstletter
(
  @str nvarchar(1)
)
returns nvarchar(1)
as
begin
  declare @word nchar(1),@PY nvarchar(4000)
  set @PY=''

    set @word=left(@str,1)
    --如果非汉字字符，返回原字符
    set @PY=@PY+(case when unicode(@word) between 19968 and 19968+20901
                    then ( 
                    select top 1 PY 
                    from 
                    ( 
                    select 'A' as PY,N'驁' as word
                    union all select 'B',N'簿'
                    union all select 'C',N'錯'
                    union all select 'D',N'鵽'
                    union all select 'E',N'樲'
                    union all select 'F',N'鰒'
                    union all select 'G',N'腂'
                    union all select 'H',N'夻'
                    union all select 'J',N'攈'
                    union all select 'K',N'穒'
                    union all select 'L',N'鱳'
                    union all select 'M',N'旀'
                    union all select 'N',N'桛'
                    union all select 'O',N'漚'
                    union all select 'P',N'曝'
                    union all select 'Q',N'囕'
                    union all select 'R',N'鶸'
                    union all select 'S',N'蜶'
                    union all select 'T',N'籜'
                    union all select 'W',N'鶩'
                    union all select 'X',N'鑂'
                    union all select 'Y',N'韻'
                    union all select 'Z',N'咗'
                    ) T 
                    where word>=@word collate Chinese_PRC_CS_AS_KS_WS 
                    order by PY ASC
                          ) 
                    else @word 
                end)
    set @str=right(@str,len(@str)-1)

  return @PY
end

go
select dbo.fn_Getchinese_firstletter('大家都是中国人')
go


--过滤重复字符
IF OBJECT_ID('dbo.fn_distinct_str') IS NOT NULL
DROP FUNCTION dbo.fn_distinct_str
GO
CREATE FUNCTION dbo.fn_distinct_str(@S NVARCHAR(100),@SPLIT VARCHAR(50))
RETURNS VARCHAR(100)
AS
BEGIN
IF @S IS NULL RETURN(NULL)
DECLARE @NEW VARCHAR(50),@INDEX INT,@TEMP VARCHAR(50)
IF LEFT(@S,1)<>@SPLIT
SET @S = @SPLIT+@S
IF RIGHT(@S,1)<>@SPLIT
SET @S = @S+@SPLIT
WHILE CHARINDEX(@SPLIT,@S)>0 AND LEN(@S)<>1
BEGIN
SET @INDEX = CHARINDEX(@SPLIT,@S)
SET @TEMP = LEFT(@S,CHARINDEX(@SPLIT,@S,@INDEX+LEN(@SPLIT)))
IF @NEW IS NULL
SET @NEW = ISNULL(@NEW,'')+@TEMP
ELSE
SET @NEW = ISNULL(@NEW,'')+REPLACE(@TEMP,@SPLIT,'')+@SPLIT
WHILE CHARINDEX(@TEMP,@S)>0
BEGIN
SET @S=STUFF(@S,CHARINDEX(@TEMP,@S)+LEN(@SPLIT),CHARINDEX(@SPLIT,@S,CHARINDEX(@TEMP,@S)+LEN(@SPLIT))-CHARINDEX(@TEMP,@S),'')
END
END
RETURN RIGHT(LEFT(@NEW,LEN(@NEW)-1),LEN(LEFT(@NEW,LEN(@NEW)-1))-1)
END
GO
select dbo.fn_distinct_str('A,A,B,C,C,B,C,k,e,df,',',')
--A,B,C
GO
--过滤重复字符2
IF OBJECT_ID('dbo.fn_distinct_str2') IS NOT NULL
DROP FUNCTION dbo.fn_distinct_str2
GO
CREATE FUNCTION dbo.fn_distinct_str2(@S varchar(8000))
RETURNS VARCHAR(100)
AS
BEGIN
IF @S IS NULL RETURN(NULL)
DECLARE @NEW VARCHAR(50),@INDEX INT,@TEMP VARCHAR(50)
WHILE LEN(@S)>0
BEGIN
SET @NEW=ISNULL(@NEW,'')+LEFT(@S,1)
SET @S=REPLACE(@S,LEFT(@S,1),'')
END
RETURN @NEW
END
GO
SELECT dbo.fn_distinct_str2('AABCCD')
--ABCD
GO

 

 

Felixzhaowenzhong
关注
专栏目录
将英汉对照文件中的中文部分的半角引号替换成全角引号
howard2005的专栏
12-14 961
在本实验中，我们旨在探索如何将英汉对照文本中的中文部分的半角引号替换成全角引号，并重新生成英汉对照文件。首先，我们需要创建一个项目来完成此任务。在这个项目中，我们将分别提取英文和中文内容，然后对中文内容进行处理，将其中的半角引号替换为全角引号。最后，我们将利用已处理的英文和中文文件生成新的英汉对照文本。
PB中全角与半角互转函数
12-27
用PB语言编写的全角与半角互转函数，请大家下载进行修改与上传、学习
全角/半角转换
路在何方
11-14 852
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[f_convert]') and xtype in (N'FN', N'IF', N'TF')) drop function [dbo].[f_convert] GO
截取字符串时的全半角问题
abao88111的博客
01-24 350
前两天在开发中遇到了截取字符串的问题，使用C#中的SubString时，不论汉字还是字母，全角还是半角，都当做一个字符处理，无法适应页中显示的要求，于是自己写了个StringSub，截取时全角字符计为两个长度，而半角字符计为一个，未经严格测试，代码如下： /// <summary> /// 对指定字符串取指定长度，考虑了全角半角的问题...
把字符串中的全角数字替换成半角数字 ０１２３４５６７８９ 转换成 0123456789
M_Jack的博客
12-22 2094
public static String filterNumberString(String str) { if(StringUtils.isEmpty(str)) { return null; } for (int i = 0; i str = str.replace((char) ('０' + i), (char) ('0' + i)); } return str; }
字符串处理： 对文本进行半角全角转换
最新发布
CallMeYunzi的博客
01-06 355
【代码】字符串处理： 对文本进行半角全角转换。
Oracle全角数字转换半角数字
12-15
而`lengthb()`函数则返回字符串占用的字节数，对于全角数字和半角数字，它能准确反映出两者在存储上的区别。 Oracle提供了`to_single_byte()`函数来将全角字符转换为等效的单字节（半角）字符。例如，`to_single_...
PHP指定截取字符串中的中英文或数字字符的实例分享
10-22
本文将详细介绍如何在PHP中指定截取字符串中的中英文或数字字符，并分享过滤字符串中空格的实例。 首先，处理字符串时需要明白中英文字符编码上的差异。在UTF-8编码中，英文字符通常占用1个字节，而中文字符则占用3...
oracle直截取汉字,ORACLE_从字符串中提取汉字（不包括全角符及日文韩文等字符） | 学步园...
weixin_36448083的博客
04-11 2483
转载自：http://blog.csdn.net/atgc/article/details/2036799感谢网友ATGC ，这个问题研究了一天，终于搞定！！从表里提取汉字, 需要考虑字符集, 不同的字符集汉字的编码有所不同这里以GB2312为例, 写一函数准确地从表里提取简体汉字.假设数据库字符集编码是GB2312, 环境变量(注册表或其它)的字符集也是GB2312编码并且保存到表里的汉字也都是...
php截取字符串之截取utf8或gbk编码的中英文字符串示例
12-18
在提供的示例代码中，`$a = “s＠@你好”`，`strlen_weibo($a,’utf-8′)`的结果是8，这表示字母's'计为1，全角'＠'计为2，半角'@'计为1，两个中文字符计为4，完全符合微博的字数限制规则。 此外，为了增强代码的...
sql 数字转换汉字fuction
05-02
---数字转换汉字----RR--------------------- ALTER FUNCTION numToChinese(@str varchar(20)) RETURNS VARCHAR(20) AS BEGIN declare @i int, @n_str varchar(1),@data varchar(20)
把字符串中的汉字去掉，然后判断全角和半角
成功需要努力
12-19 1169
/** * 把字符串中的汉字去掉，然后判断全角和半角 * @param param * @return true 为半角 false 为全角 */ public boolean isAllHalf(String param2) { String param=param2.replaceAll("[\u4e00-\u9fa5]", "");//删除汉子 再进行比较
PowerBuilder 全角与半角的互相转换
一路狂奔
02-26 1827
 /* * Script Name: Script - Full2Half(string in_str,integer iflag) * Description: 用于全角,半角互相转换的函数 * Arguments: string strInfo //需要转换的字符串 int iFlag // 1-全角-》半角 2-半角》全角 * Retu
elasticsearch 分词器 变换全角和半角以及数字串模糊匹配
sslfk的博客
12-07 1748
分词器 变换全角和半角以及数字串模糊匹配
连玉君 Markdown 笔记
Stata连享会
09-21 4783
连玉君 Markdown 笔记 连玉君 Markdown 笔记 Markdown 基础 标题 列表 无序列表 有序列表 列表的缩进和混排 记事列表 文字效果和分隔线 链接 文本链接 插入图片 脚注 尾注 参考文献 缩写名词 专有名词 索引条目 文字高亮和代码块 特殊字符 转义符 脚注 尚未完成 表格还没有搞明白 Markdown 进阶功能 数学公式 书签锚链接 目录
Python基本数据类型-字符串的操作
敲木鱼的猫de博客
03-24 171
# 统计某个字符出现的次数-count() str1 = "Darren is man" print(str1.count("r")) print(str1.count("r", 0, 3)) # 将首字母改为大写-capitalize() str2 = "eee" print(str2.capitalize()) # 将所有字母改为小写-casefold() str3 = "R3R5R" ...
把字符串按半角字符算半个字符，全角字符算一个字符来截取
老猫
01-15 2801
公司的网站首页会显示新闻，要求把新闻的标题按半角字符算半个字符，全角字符算一个字符来截短。想了两种方法，不过觉得效率好像一般。但苦于找不到更好的方法。如果有朋友有更好的方法请指教第一种是用正则表达式：    /**////         /// 将标题按全角字符当一个Unicode字符，半角字符当半个Unicode字符处理来截短        ///         ///   
ElasticSearch自定义分析器-集成结巴分词插件
weixin_30731305的博客
02-07 566
关于结巴分词 ElasticSearch 插件： https://github.com/huaban/elasticsearch-analysis-jieba 该插件由huaban开发。支持Elastic Search 版本<=2.3.5。 结巴分词分析器 结巴分词插件提供3个分析器：jieba_index、jieba_search和jieba_other。 jieba_ind...
Java实现：进制转换与字符串互转的算法集合
包括进制转换、CRC校验、字母排序、字符串解析与拆分、时间格式化、日期转化、文本倒序、彩票算法、中文乱码处理、字符编码转换（Big5与Unicode）、获取服务器时间、特殊符号全角与半角替换、数组操作、从资源文件...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值