列拆分行的问题，加分

[老农民77]

有一个表的结构如下
id name email
1 a [e-mail],[e-mail],[e-mail]
2 b [e-mail],[e-mail]
3 c [e-mail],[e-mail],[e-mail]
现在我想写函数实现如下查询，不要用到临时表或存储过程：

name email
a [e-mail]
a [e-mail]
a [e-mail]
b [e-mail]
b [e-mail]
c [e-mail]
c [e-mail]
c [e-mail]
请大家帮出出点子，谢谢！！！

[水族杰纶]

拆分表:

--> --> (Roy)生成測試數據
 
if not object_id('Tab') is null
    drop table Tab
Go
Create table Tab([Col1] int,[COl2] nvarchar(5))
Insert Tab
select 1,N'a,b,c' union all
select 2,N'd,e' union all
select 3,N'f'
Go

SQL2000用辅助表:
if object_id('Tempdb..#Num') is not null
    drop table #Num
go
select top 100 ID=Identity(int,1,1) into #Num from syscolumns a,syscolumns b
Select 
    a.Col1,COl2=substring(a.Col2,b.ID,charindex(',',a.Col2+',',b.ID)-b.ID) 
from 
    Tab a,#Num b
where
    charindex(',',','+a.Col2,b.ID)=b.ID --也可用 substring(','+a.COl2,b.ID,1)=','


SQL2005用Xml:

select 
    a.COl1,b.Col2
from 
    (select Col1,COl2=convert(xml,'<root><v>'+replace(COl2,',','</v><v>')+'</v></root>') from Tab)a
outer apply
    (select Col2=C.v.value('.','nvarchar(100)') from a.COl2.nodes('/root/v')C(v))b




SQL05用CTE:

;with roy as 
(select Col1,COl2=cast(left(Col2,charindex(',',Col2+',')-1) as nvarchar(100)),Split=cast(stuff(COl2+',',1,charindex(',',Col2+','),'') as nvarchar(100)) from Tab
union all
select Col1,COl2=cast(left(Split,charindex(',',Split)-1) as nvarchar(100)),Split= cast(stuff(Split,1,charindex(',',Split),'') as nvarchar(100)) from Roy where split>''
)
select COl1,COl2 from roy order by COl1 option (MAXRECURSION 0)

生成结果:
/*
Col1        COl2
----------- -----
1           a
1           b

[老农民77]

[Quote=引用 1 楼 wufeng4552 的回复:]
SQL code拆分表:

--> --> (Roy)生成測試數據

if not object_id('Tab') is null
drop table Tab
Go
Create table Tab([Col1] int,[COl2] nvarchar(5))
Insert Tab
select 1,N'a,b,c' union all
select 2,N'd,e' union all
select 3,N'f'
Go

SQL2000用辅助表:
if object_id('Tempdb..#Num') is not null
drop table #Num
go
select top 100 ID=Identity(int,1,1) into #Num from syscolumns a,sysco…
[/Quote]

谢谢，我不想用临时表和存储过程，我只希望通过函数来解决，呵呵！

[ks_reny]

create function getstr(@str varchar(30))
returns @t table(s varchar(20))
as 
begin
  insert @t
  select substring(@str, number, charindex(',', @str + ',', number) - number)  
  from master..spt_values
  where type='p' 
    and substring(',' + @str, number,1) = ','
  return 
end


select * from dbo.getstr('11,21,23')
-----------------------
11
21
23

[老农民77]

[Quote=引用 3 楼 ks_reny 的回复:]
SQL codecreate function getstr(@str varchar(30))
returns @t table(s varchar(20))
as
begin
insert @t
select substring(@str, number, charindex(',', @str + ',', number) - number)
from master..spt_values
where type='p'
and substring(',' + @str, number,1) = ','
return
end


select * from dbo.getstr('11,21,23')
-----------------------
11
21
23
[/Quote]
谢谢，不是我想要的结果

[htl258_Tony]

if object_id('[tb]') is not null drop table [tb] 
 go 
create table [tb]([id] int,[name] varchar(20),[email] varchar(100))
insert [tb] select 1,'a','[e-mail],[e-mail],[e-mail]'
union all select 2,'b','[e-mail],[e-mail]'
union all select 3,'c','[e-mail],[e-mail],[e-mail]'
go
if object_id('getstr') is not null drop function getstr 
 go 
create function getstr()
returns table
as 
  return(
  select b.id,b.name,email=substring(b.[email], a.number, charindex(',', b.[email] + ',', a.number) - a.number)  
  from master..spt_values a,tb b 
  where type='p' 
    and substring(',' + b.[email], a.number,1) = ','
  )
go
--调用:
select * from getstr()
/*
id          name                 email
----------- -------------------- ----------------------------------------------------------------------------------------------------
1           a                    [e-mail]
1           a                    [e-mail]
1           a                    [e-mail]
2           b                    [e-mail]
2           b                    [e-mail]
3           c                    [e-mail]
3           c                    [e-mail]
3           c                    [e-mail]

(8 行受影响)
*/

[htl258_Tony]

id列如果不显示:

if object_id('[tb]') is not null drop table [tb] 
 go 
create table [tb]([id] int,[name] varchar(20),[email] varchar(100))
insert [tb] select 1,'a','[e-mail],[e-mail],[e-mail]'
union all select 2,'b','[e-mail],[e-mail]'
union all select 3,'c','[e-mail],[e-mail],[e-mail]'
go
if object_id('getstr') is not null drop function getstr 
 go 
create function getstr()
returns table
as 
  return(
  select b.name,email=substring(b.[email], a.number, charindex(',', b.[email] + ',', a.number) - a.number)  
  from master..spt_values a,tb b 
  where type='p' 
    and substring(',' + b.[email], a.number,1) = ','
  )
go
--调用:
select * from getstr()
/*
name                 email
-------------------- ------------------------
a                    [e-mail]
a                    [e-mail]
a                    [e-mail]
b                    [e-mail]
b                    [e-mail]
c                    [e-mail]
c                    [e-mail]
c                    [e-mail]

(8 行受影响)
*/

[老农民77]

[Quote=引用 6 楼 htl258 的回复:]
id列如果不显示:

SQL codeif object_id('[tb]') is not null drop table [tb]
go
create table [tb]([id] int,[name] varchar(20),[email] varchar(100))
insert [tb] select 1,'a','[e-mail],[e-mail],[e-mail]'
union all select 2,'b','[e-mail],[e-mail]'
union all select 3,'c','[e-mail],[e-mail],[e-mail]'
go
if object_id('getstr') is not null drop function getstr
go
create fu…
[/Quote]

怎么都是表值函数了，呵呵！
我是需要传递变量的

[SQL77]

SELECT NAME,SUBSTRING(EMAIL,0,CHARINDEX(',',EMAIL+',')-1) EMAIL FROM TB 
UNION ALL
SELECT NAME,
SUBSTRING(STUFF(EMAIL,0,CHARINDEX(',',EMAIL+','),''),0,CHARINDEX(',',STUFF(EMAIL,0,CHARINDEX(',',EMAIL+','),'')-1)AS EMAIL FROM TB 
...

不知道这样行不??后面的太长了!难写

[SQL77]

if object_id('[tb]') is not null drop table [tb] 
 go 
create table [tb]([id] int,[name] varchar(20),[email] varchar(100))
insert [tb] select 1,'a','[e-mail],[e-mail],[e-mail]'
union all select 2,'b','[e-mail],[e-mail]'
union all select 3,'c','[e-mail],[e-mail],[e-mail]'

SELECT NAME,SUBSTRING(EMAIL,0,CHARINDEX(',',EMAIL+',')-1) EMAIL FROM TB 
UNION ALL
SELECT NAME,SUBSTRING(STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),''),1,CHARINDEX(',',STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),'')+',')-1) FROM TB
UNION ALL
SELECT NAME,
SUBSTRING(STUFF(STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),''),1,CHARINDEX(',',STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),'')+','),''),1,CHARINDEX(',',STUFF(STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),''),1,CHARINDEX(',',STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),'')+','),'')+',')-1) 
FROM TB 
WHERE SUBSTRING(STUFF(STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),''),1,CHARINDEX(',',STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),'')+','),''),1,CHARINDEX(',',STUFF(STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),''),1,CHARINDEX(',',STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),'')+','),'')+',')-1)<>''
ORDER BY  NAME

NAME EMAIL
-------------------- ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
a [e-mail]
a [e-mail]
a [e-mail]
b [e-mail]
b [e-mail]
c [e-mail]
c [e-mail]
c [e-mail]

（所影响的行数为 8 行）

[SQL77]

有点小错误

SELECT NAME,SUBSTRING(EMAIL,1,CHARINDEX(',',EMAIL+',')-1) EMAIL FROM TB 
UNION ALL
SELECT NAME,SUBSTRING(STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),''),1,CHARINDEX(',',STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),'')+',')-1) FROM TB
UNION ALL
SELECT NAME,
SUBSTRING(STUFF(STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),''),1,CHARINDEX(',',STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),'')+','),''),1,CHARINDEX(',',STUFF(STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),''),1,CHARINDEX(',',STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),'')+','),'')+',')-1) 
FROM TB 
WHERE SUBSTRING(STUFF(STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),''),1,CHARINDEX(',',STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),'')+','),''),1,CHARINDEX(',',STUFF(STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),''),1,CHARINDEX(',',STUFF(EMAIL,1,CHARINDEX(',',EMAIL+','),'')+','),'')+',')-1)<>''
ORDER BY  NAME