我要做个电子邮件发送统计
表的数据如下:
Mail_From | Mail_To
----------------------------------------------------
liming |[email protected];[email protected];[email protected]
liming |[email protected]
liming |[email protected]
liming |[email protected];[email protected]
liming |[email protected]
liming |[email protected];[email protected]我想统计出来的结果是这样
Mail_To |Num
-------------------------------
[email protected] |4
[email protected] |3
[email protected] |2
[email protected] |1也就是统计liming都给哪些人发了邮件,按次数排倒序,最麻烦的是收件人是用";"分割开的,搞了好久没有搞出来,大家谁有什么好办法?谢谢大家100分不够再加!
表的数据如下:
Mail_From | Mail_To
----------------------------------------------------
liming |[email protected];[email protected];[email protected]
liming |[email protected]
liming |[email protected]
liming |[email protected];[email protected]
liming |[email protected]
liming |[email protected];[email protected]我想统计出来的结果是这样
Mail_To |Num
-------------------------------
[email protected] |4
[email protected] |3
[email protected] |2
[email protected] |1也就是统计liming都给哪些人发了邮件,按次数排倒序,最麻烦的是收件人是用";"分割开的,搞了好久没有搞出来,大家谁有什么好办法?谢谢大家100分不够再加!
-- Author :SQL77(只为思齐老)
-- Date :2010-03-09 15:17:54
-- Version:
-- Microsoft SQL Server 2000 - 8.00.194 (Intel X86)
-- Aug 6 2000 00:57:48
-- Copyright (c) 1988-2000 Microsoft Corporation
-- Desktop Engine on Windows NT 5.1 (Build 2600: Service Pack 3)
--
----------------------------------------------------------------
--> 测试数据:#TB
if object_id('tempdb.dbo.#TB') is not null drop table #TB
go
create table #TB([Mail_From] varchar(6),[Mail_To] varchar(40))
insert #TB
select 'liming','[email protected];[email protected];[email protected]' union all
select 'liming','[email protected]' union all
select 'liming','[email protected]' union all
select 'liming','[email protected];[email protected]' union all
select 'liming','[email protected]' union all
select 'liming','[email protected];[email protected]'
--------------开始查询--------------------------
SELECT Mail_From, Mail_TO,COUNT(1) C FROM
(
select Mail_From,
SUBSTRING( Mail_To,NUMBER,CHARINDEX(';',Mail_To+';',NUMBER)-NUMBER)Mail_To
FROM #TB,MASTER..SPT_VALUES
WHERE TYPE='P' AND SUBSTRING(';'+Mail_To,NUMBER,1)=';'
)T GROUP BY
Mail_From, Mail_TO ORDER BY 3 DESC
----------------结果----------------------------(所影响的行数为 6 行)Mail_From Mail_TO C
--------- ---------------------------------------- -----------
liming [email protected] 4
liming [email protected] 3
liming [email protected] 2
liming [email protected] 1(所影响的行数为 4 行)
/*
*/
if object_id('[tb]') is not null drop table [tb]
create table [tb]([Mail_From] varchar(6),[Mail_To] varchar(40))
go
insert [tb]
select 'liming','[email protected];[email protected];[email protected]' union all
select 'liming','[email protected]' union all
select 'liming','[email protected]' union all
select 'liming','[email protected];[email protected]' union all
select 'liming','[email protected]' union all
select 'liming','[email protected];[email protected]'select Mail_To=substring(t.Mail_To,r.number,charindex(';',t.Mail_To+';',r.number)-r.number),
count(1) as Num
from tb t,master..spt_values r
where r.number<=len(t.Mail_To) and r.type='p'
and substring(';'+t.Mail_To,r.number,1)=';'
group by substring(t.Mail_To,r.number,charindex(';',t.Mail_To+';',r.number)-r.number)Mail_To Num
---------------------------------------- -----------
[email protected] 3
[email protected] 1
[email protected] 2
[email protected] 4(所影响的行数为 4 行)
拆分表:--> --> (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)=','
--2000不使用辅助表
Select
a.Col1,COl2=substring(a.Col2,b.number,charindex(',',a.Col2+',',b.number)-b.number)
from
Tab a join master..spt_values b
ON B.type='p' AND B.number BETWEEN 1 AND LEN(A.col2)
where
substring(','+a.COl2,b.number,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
1 c
2 d
2 e
3 f
*/
go
insert [tb]
select 'liming','[email protected];[email protected];[email protected]' union all
select 'liming','[email protected]' union all
select 'liming','[email protected]' union all
select 'liming','[email protected];[email protected]' union all
select 'liming','[email protected]' union all
select 'liming','[email protected];[email protected]'
SELECT
DISTINCT A.Mail_From,B.MAIL
FROM
(SELECT Mail_From,CONVERT(XML,'<root><row>'+REPLACE(Mail_To,';','</row><row>')+'</row></root>') AS Mail_To FROM tb)a
OUTER APPLY
(SELECT T.C.value('.','nvarchar(100)') AS MAIL FROM a.Mail_To.nodes('/root/row') T(C))bMail_From MAIL
--------- ---------------------------
liming [email protected]
liming [email protected]
liming [email protected]
liming [email protected](4 行受影响)。
非常感谢大家
看了半天,好几个地方没有看懂~~~ TYPE='P' 是什么含义呢,还有NUMBER这个字段在master..spt_values是什么含义呢,我以前没有用过master..spt_values 这个表,我没明白按照“;”拆分的思路是怎么回事,感觉SUBSTRING( Mail_To,NUMBER,CHARINDEX(';',Mail_To+';',NUMBER)-NUMBER)中的NUMBER是关键~~~~
master..spt_values是系统表 其实你可以直接去GOOGLE查一下 这里只是为了构造一个数字而已
/*
标题:数据拆分1
作者:爱新觉罗.毓华(十八年风雨,守得冰山雪莲花开)
时间:2008-11-20
地点:广东深圳
描述有表tb, 如下:
id value
----------- -----------
1 aa,bb
2 aaa,bbb,ccc
欲按id,分拆value列, 分拆后结果如下:
id value
----------- --------
1 aa
1 bb
2 aaa
2 bbb
2 ccc
*/--1. 旧的解决方法(sql server 2000)
SELECT TOP 8000 id = IDENTITY(int, 1, 1) INTO # FROM syscolumns a, syscolumns b SELECT A.id, value = SUBSTRING(A.[value], B.id, CHARINDEX(',', A.[value] + ',', B.id) - B.id)
FROM tb A, # B
WHERE SUBSTRING(',' + A.[value], B.id, 1) = ','DROP TABLE #--2. 新的解决方法(sql server 2005)
create table tb(id int,value varchar(30))
insert into tb values(1,'aa,bb')
insert into tb values(2,'aaa,bbb,ccc')
go
SELECT A.id, B.value
FROM(
SELECT id, [value] = CONVERT(xml,'<root><v>' + REPLACE([value], ',', '</v><v>') + '</v></root>') FROM tb
)A
OUTER APPLY(
SELECT value = N.v.value('.', 'varchar(100)') FROM A.[value].nodes('/root/v') N(v)
)BDROP TABLE tb/*
id value
----------- ------------------------------
1 aa
1 bb
2 aaa
2 bbb
2 ccc(5 行受影响)
*/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
1 c
2 d
2 e
3 f
*/
type='P'主要是为了去除重复NUMBER,你可以去掉type=‘P’查询看看,number有很多重复的
比如表如下:
Mail_From | Mail_To |Mail_cc | Mail_Bcc |
---------------------------------------------------|-----------|----------|
liming |[email protected];[email protected];[email protected]|[email protected];[email protected]| ..... |
liming |[email protected] |[email protected] | ..... |
liming |[email protected] |[email protected] | ..... |
liming |[email protected];[email protected] |[email protected] | ..... |
liming |[email protected] |[email protected] | ..... |
liming |[email protected];[email protected] |[email protected] | ..... |另外大家能推荐推荐能学这些类似的SQL Server的书么,谢谢大家!!!
我改成了这样,出来了,但是速度有些慢了。SELECT Mail_From, Mail_TO,COUNT(1) C FROM
(
select Mail_From,
SUBSTRING( Mail_To,NUMBER,CHARINDEX(';',Mail_To+';',NUMBER)-NUMBER) Mail_To
FROM sWF_Mail,MASTER..SPT_VALUES
WHERE TYPE='P' AND SUBSTRING(';'+Mail_To,NUMBER,1)=';'union allselect Mail_From,
SUBSTRING( Mail_cc,NUMBER,CHARINDEX(';',Mail_cc+';',NUMBER)-NUMBER) Mail_To
FROM sWF_Mail,MASTER..SPT_VALUES
WHERE TYPE='P' AND SUBSTRING(';'+Mail_cc,NUMBER,1)=';'union allselect Mail_From,
SUBSTRING( Mail_Bcc,NUMBER,CHARINDEX(';',Mail_Bcc+';',NUMBER)-NUMBER) Mail_To
FROM sWF_Mail,MASTER..SPT_VALUES
WHERE TYPE='P' AND SUBSTRING(';'+Mail_Bcc,NUMBER,1)=';'
)T GROUP BY
Mail_From, Mail_TO ORDER BY c DESC
谢谢#2的测试数据 我用函数试一下--合并表里的Mail_To、Mail_cc、Mail_bcc三列里的邮件地址字符串 @id 为指定用户名 如 liming
CREATE FUNCTION dbo.F_MateRow(@id varchar(20))
returns varchar(8000)
AS
BEGIN
declare @str varchar(8000)
select @str=isnull(@str+';','')+Mail_To from TB where Mail_From=@id
select @str=isnull(@str+';','')+Mail_cc from TB where Mail_From=@id
select @str=isnull(@str+';','')+Mail_bcc from TB where Mail_From=@id
return @str
END
--分割字符串
CREATE FUNCTION dbo.fun_get_SplitStr(@SourceSql varchar(8000),@StrSeprate varchar(100))
returns @temp table(F1 varchar(100))
AS
BEGIN
declare @ch as varchar(100)
set @SourceSql =@SourceSql+@StrSeprate
while(@SourceSql<>'')
BEGIN
set @ch=left(@SourceSql,charindex(@StrSeprate,@SourceSql,1)-1)
insert @temp values(@ch)
set @SourceSql=stuff(@SourceSql,1,charindex(@StrSeprate,@SourceSql,1),'')
END
return
END---查询
declare @str varchar(8000)
select @str=dbo.F_MateRow('liming')
select F1 as MailAdress,count(1) as Tot from dbo.fun_get_SplitStr(@str,';') group by F1/*结果
MailAdress Tot
---------------------------
[email protected] 5
[email protected] 7
[email protected] 6
[email protected] 10*/