登 录
收集一些非常好用常用的用户函数。分享给大家参考。 view sourceprint?<br /> --可将字符串转换为全角或半角的 </p> <p>CREATE FUNCTION [dbo].[f_Convert] </p> <p>( </p> <p> @str NVARCHAR(4000)=N'' , --要转换的字符串 </p> <p> @flag BIT=0 --转换标志,0转换成半角,1转换成全角 </p> <p>) </p> <p>RETURNS NVARCHAR(4000) </p> <p>AS </p> <p>BEGIN </p> <p> DECLARE @pat NVARCHAR(8) , </p> <p> @step INT , </p> <p> @i INT , </p> <p> @spc INT </p> <p> IF @flag = 0 </p> <p> SELECT @pat = N'%[！-～]%', @step = -65248, </p> <p> @str = REPLACE(@str, N' ', N' ') </p> <p> ELSE </p> <p> SELECT @pat = N'%[!-~]%', @step = 65248, </p> <p> @str = REPLACE(@str, N' ', N' ') </p> <p> SET @i = PATINDEX(@pat COLLATE LATIN1_GENERAL_BIN, @str) </p> <p> WHILE @i > 0 </p> <p> SELECT @str = REPLACE(@str, SUBSTRING(@str, @i, 1), </p> <p> NCHAR(UNICODE(SUBSTRING(@str, @i, 1)) + @step)), </p> <p> @i = PATINDEX(@pat COLLATE LATIN1_GENERAL_BIN, @str) </p> <p> RETURN(@str) </p> <p>END </p> <p>GO </p> <p>--获取每个汉字首个拼音 </p> <p>CREATE FUNCTION [dbo].[f_GetPy] ( @str NVARCHAR(4000)=N'' ) </p> <p>RETURNS NVARCHAR(4000) </p> <p>AS </p> <p>BEGIN </p> <p> DECLARE @strlen INT , </p> <p> @re NVARCHAR(4000) </p> <p> DECLARE @t TABLE </p> <p>( </p> <p> chr NCHAR(1) COLLATE Chinese_PRC_CI_AS , </p> <p> letter NCHAR(1) </p> <p>) </p> <p> INSERT INTO @t ( chr, letter ) </p> <p> SELECT '吖', 'A' </p> <p> UNION ALL </p> <p> SELECT '八', 'B' </p> <p> UNION ALL </p> <p> SELECT '嚓', 'C' </p> <p> UNION ALL </p> <p> SELECT '咑', 'D' </p> <p> UNION ALL </p> <p> SELECT '妸', 'E' </p> <p> UNION ALL </p> <p> SELECT '发', 'F' </p> <p> UNION ALL </p> <p> SELECT '旮', 'G' </p> <p> UNION ALL </p> <p> SELECT '铪', 'H' </p> <p> UNION ALL </p> <p> SELECT '丌', 'J' </p> <p> UNION ALL </p> <p> SELECT '咔', 'K' </p> <p> UNION ALL </p> <p> SELECT '垃', 'L' </p> <p> UNION ALL </p> <p> SELECT '嘸', 'M' </p> <p> UNION ALL </p> <p> SELECT '拏', 'N' </p> <p> UNION ALL </p> <p> SELECT '噢', 'O' </p> <p> UNION ALL </p> <p> SELECT '妑', 'P' </p> <p> UNION ALL </p> <p> SELECT '七', 'Q' </p> <p> UNION ALL </p> <p> SELECT '呥', 'R' </p> <p> UNION ALL </p> <p> SELECT '仨', 'S' </p> <p> UNION ALL </p> <p> SELECT '他', 'T' </p> <p> UNION ALL </p> <p> SELECT '屲', 'W' </p> <p> UNION ALL </p> <p> SELECT '夕', 'X' </p> <p> UNION ALL </p> <p> SELECT '丫', 'Y' </p> <p> UNION ALL </p> <p> SELECT '帀', 'Z' </p> <p> SELECT @strlen = LEN(@str), @re = '' </p> <p> WHILE @strlen > 0 </p> <p> BEGIN </p> <p> SELECT TOP 1 </p> <p> @re = letter + @re, @strlen = @strlen - 1 </p> <p> FROM @t a </p> <p> WHERE chr <= SUBSTRING(@str, @strlen, 1) </p> <p> ORDER BY chr DESC </p> <p> IF @@rowcount = 0 </p> <p> SELECT @re = SUBSTRING(@str, @strlen, 1) + @re, </p> <p> @strlen = @strlen - 1 </p> <p> END </p> <p> RETURN(@re) </p> <p>END </p> <p>GO </p> <p>--获取表所有字段 </p> <p>CREATE FUNCTION F_GetTbField </p> <p>( </p> <p> @Tbname NVARCHAR(100) = '' , </p> <p> @Flag BIT = 0 --0，默认取所有字段，1，除去增量字段 </p> <p>) </p> <p>RETURNS VARCHAR(MAX) </p> <p>AS </p> <p>BEGIN </p> <p> DECLARE @FieldName VARCHAR(MAX) </p> <p> SELECT @FieldName = ISNULL(@FieldName + ',', '') + NAME </p> <p> FROM sys.columns </p> <p> WHERE object_id = OBJECT_ID(@Tbname, 'U') AND is_identity = CASE @Flag </p> <p> WHEN 0 </p> <p> THEN is_identity </p> <p> ELSE 0 </p> <p> END </p> <p> --RETURN('insert into '+@Tbname+'('+@FieldName+')') </p> <p> RETURN(@FieldName) </p> <p>END </p> <p>GO<br /> 以上均在SQL 2008测试通过。今天就写到这，有遇到好用的将继续更新。<br />
抱歉!评论已关闭.