1. --SQL 判斷字段值是否有中文 
2. create function fun_getCN(@str nvarchar(4000))   
3. returns nvarchar(4000)   
4.  as  
5.  begin  
6.  declare @word nchar(1),@CN nvarchar(4000)   
7.  set @CN=''  
8.  while len(@str)>0   
9.  begin  
10.  set @word=left(@str,1)   
11.  if unicode(@word) between 19968 and 19968+20901  
12.    set @CN=@CN+@word 
13.  set @str=right(@str,len(@str)-1)   
14.  end  
15.  return @CN   
16.  end  
17. select dbo.fun_getCN('ASDKG論壇KDL') 
18. --論壇 
19. select dbo.fun_getCN('ASDKG論壇KDL') 
20. --論壇 
21. select dbo.fun_getCN('ASDKDL') 
22. --空 
23.   
24. ------------------------------------- 
25. --提取數字 
26. IF OBJECT_ID('DBO.GET_NUMBER2') IS NOT NULL 
27. DROP FUNCTION DBO.GET_NUMBER2 
28. GO 
29. CREATE FUNCTION DBO.GET_NUMBER2(@S VARCHAR(100)) 
30. RETURNS VARCHAR(100) 
31. AS 
32. BEGIN 
33. WHILE PATINDEX('%[^0-9]%',@S) > 0 
34. BEGIN 
35. set @s=stuff(@s,patindex('%[^0-9]%',@s),1,'') 
36. END 
37. RETURN @S 
38. END 
39. GO 
40. --測試 
41. PRINT DBO.GET_NUMBER('呵呵ABC123ABC') 
42. GO 
43. --123 
44.   
45. -------------------------------------------------------------------- 
46. --提取英文 
47. IF OBJECT_ID('DBO.GET_STR') IS NOT NULL 
48. DROP FUNCTION DBO.GET_STR 
49. GO 
50. CREATE FUNCTION DBO.GET_STR(@S VARCHAR(100)) 
51. RETURNS VARCHAR(100) 
52. AS 
53. BEGIN 
54. WHILE PATINDEX('%[^a-z]%',@S) > 0 
55. BEGIN 
56. set @s=stuff(@s,patindex('%[^a-z]%',@s),1,'') 
57. END 
58. RETURN @S 
59. END 
60. GO 
61. --測試 
62. PRINT DBO.GET_STR('呵呵ABC123ABC') 
63. GO 
64.   
65. -------------------------------------------------------------------- 
66. --提取中文 
67. IF OBJECT_ID('DBO.CHINA_STR') IS NOT NULL 
68. DROP FUNCTION DBO.CHINA_STR 
69. GO 
70. CREATE FUNCTION DBO.CHINA_STR(@S NVARCHAR(100)) 
71. RETURNS VARCHAR(100) 
72. AS 
73. BEGIN 
74. WHILE PATINDEX('%[^吖-座]%',@S) > 0 
75. SET @S = STUFF(@S,PATINDEX('%[^吖-座]%',@S),1,N'') 
76. RETURN @S 
77. END 
78. GO 
79. PRINT DBO.CHINA_STR('呵呵ABC123ABC') 
80. GO 
81.   
82. -------------------------------------------------------------------- 
83. --過濾重復字符 
84. IF OBJECT_ID('DBO.DISTINCT_STR') IS NOT NULL 
85. DROP FUNCTION DBO.DISTINCT_STR 
86. GO 
87. CREATE FUNCTION DBO.DISTINCT_STR(@S NVARCHAR(100),@SPLIT VARCHAR(50)) 
88. RETURNS VARCHAR(100) 
89. AS 
90. BEGIN 
91. IF @S IS NULL RETURN(NULL) 
92. DECLARE @NEW VARCHAR(50),@INDEX INT,@TEMP VARCHAR(50) 
93. IF LEFT(@S,1)<>@SPLIT 
94. SET @S = @SPLIT+@S 
95. IF RIGHT(@S,1)<>@SPLIT 
96. SET @S = @S+@SPLIT 
97. WHILE CHARINDEX(@SPLIT,@S)>0 AND LEN(@S)<>1 
98. BEGIN 
99. SET @INDEX = CHARINDEX(@SPLIT,@S) 
100. SET @TEMP = LEFT(@S,CHARINDEX(@SPLIT,@S,@INDEX+LEN(@SPLIT))) 
101. IF @NEW IS NULL 
102. SET @NEW = ISNULL(@NEW,'')+@TEMP 
103. ELSE 
104. SET @NEW = ISNULL(@NEW,'')+REPLACE(@TEMP,@SPLIT,'')+@SPLIT 
105. WHILE CHARINDEX(@TEMP,@S)>0 
106. BEGIN 
107. SET @S=STUFF(@S,CHARINDEX(@TEMP,@S)+LEN(@SPLIT),CHARINDEX(@SPLIT,@S,CHARINDEX(@TEMP,@S)+LEN(@SPLIT))-CHARINDEX(@TEMP,@S),'') 
108. END 
109. END 
110. RETURN RIGHT(LEFT(@NEW,LEN(@NEW)-1),LEN(LEFT(@NEW,LEN(@NEW)-1))-1) 
111. END 
112. GO 
113. PRINT DBO.DISTINCT_STR('A,A,B,C,C,B,C,',',') 
114. --A,B,C 
115. GO 
116.   
117. -------------------------------------------------------------------- 
118. --過濾重復字符2 
119. IF OBJECT_ID('DBO.DISTINCT_STR2') IS NOT NULL 
120. DROP FUNCTION DBO.DISTINCT_STR2 
121. GO 
122. CREATE FUNCTION DBO.DISTINCT_STR2(@S varchar(8000)) 
123. RETURNS VARCHAR(100) 
124. AS 
125. BEGIN 
126. IF @S IS NULL RETURN(NULL) 
127. DECLARE @NEW VARCHAR(50),@INDEX INT,@TEMP VARCHAR(50) 
128. WHILE LEN(@S)>0 
129. BEGIN 
130. SET @NEW=ISNULL(@NEW,'')+LEFT(@S,1) 
131. SET @S=REPLACE(@S,LEFT(@S,1),'') 
132. END 
133. RETURN @NEW 
134. END 
135. GO 
136. SELECT DBO.DISTINCT_STR2('AABCCD') 
137. --ABCD 
138. GO 
139.   
140. -------------------------------------------------------------------- 
141. IF OBJECT_ID('DBO.SPLIT_STR') IS NOT NULL 
142. DROP FUNCTION DBO.SPLIT_STR 
143. GO 
144. CREATE FUNCTION DBO.SPLIT_STR( 
145. @S varchar(8000),   --包含多個數據項的字符串 
146. @INDEX int,       --要獲取的數據項的位置 
147. @SPLIT varchar(10)   --數據分隔符 
148. ) 
149. RETURNS VARCHAR(100) 
150. AS 
151. BEGIN 
152. IF @S IS NULL RETURN(NULL) 
153. DECLARE @SPLITLEN int 
154. SELECT @SPLITLEN=LEN(@SPLIT+'A')-2 
155. WHILE @INDEX>1 AND CHARINDEX(@SPLIT,@S+@SPLIT)>0 
156. SELECT @INDEX=@INDEX-1,@S=STUFF(@S,1,CHARINDEX(@SPLIT,@S+@SPLIT)+@SPLITLEN,'') 
157. RETURN(ISNULL(LEFT(@S,CHARINDEX(@SPLIT,@S+@SPLIT)-1),'')) 
158. END 
159. GO 
160. PRINT DBO.SPLIT_STR('AA|BB|CC',2,'|') 
161. -- 
162. GO