关闭

列转行

839人阅读 评论(0) 收藏 举报

最近做毕业设计,遇到一个问题要进行行列转换,由于本人水平有限,网上的代码也很难看懂,所以就到这里来求一句代码望哪位大哥大姐能帮帮忙,小弟不胜感激!

原来的数据:
材料费用   人工费用   机械费用  其他费用
  150        260         330       400


要转换成:
费用类型   数目
材料费用   150
人工费用   260
机械费用   330
其他费用   400

 

Select
N'材料费用' As 费用类型 ,
材料费用 As 数目
From TableName
Union All
Select
N'人工费用' As 费用类型 ,
人工费用 As 数目
From TableName
Union All
Select
N'机械费用' As 费用类型 ,
机械费用 As 数目
From TableName
Union All
Select
N'其他费用' As 费用类型 ,
其他费用 As 数目
From TableName

 

--如果不知列名,用動態語句
Declare @S Nvarchar(4000)
Set @S=''
Select @S=@S+'Select N'''+Name+N''' As 费用类型 ,'+Name+N' As 数目 From TEST Union All '
From SysColumns Where ID=OBJECT_ID('TEST') Order By ColID
Select @S=Left(@S,Len(@S)-10)
EXEC(@S)

--建立測試環境
Create Table TEST(
材料费用 Int,
人工费用 Int,
机械费用   Int,
其他费用 Int)
Insert TEST Select   150,        260        , 330       ,400
GO
--測試

--已知列名
Select
N'材料费用' As 费用类型 ,
材料费用 As 数目
From TEST
Union All
Select
N'人工费用' As 费用类型 ,
人工费用 As 数目
From TEST
Union All
Select
N'机械费用' As 费用类型 ,
机械费用 As 数目
From TEST
Union All
Select
N'其他费用' As 费用类型 ,
其他费用 As 数目
From TEST

--如果不知列名,用動態語句
Declare @S Nvarchar(4000)
Set @S=''
Select @S=@S+'Select N'''+Name+N''' As 费用类型 ,'+Name+N' As 数目 From TEST Union All '
From SysColumns Where ID=OBJECT_ID('TEST') Order By ColID
Select @S=Left(@S,Len(@S)-10)
EXEC(@S)
GO
--刪除測試環境
Drop Table TEST
GO
--結果
/*
费用类型 数目
材料费用 150
人工费用 260
机械费用 330
其他费用 400
*/

 

--来个动态的
create table tb(材料费用 int,人工费用 int,机械费用 int,其他费用 int)
insert into tb select 150,260,330,400
go

declare @sql varchar(8000)
set @sql=''
select @sql=@sql+' union all select ,'''+name+''' as 费用类型,'+name+' as 数目 from tb ' from syscolumns where id=object_id('tb') order by colid
set @sql=replace(@sql,'union all select ,','union all select ')
set @sql=stuff(@sql,1,11,'')
exec(@sql)

drop table tb

 

--上面的写的有点问题,太繁琐了.修改下
create table tb(材料费用 int,人工费用 int,机械费用 int,其他费用 int)
insert into tb select 150,260,330,400
go

declare @sql varchar(8000)
set @sql=''
select @sql=@sql+' union all select '''+name+''' as 费用类型,'+name+' as 数目 from tb ' from syscolumns where id=object_id('tb') order by colid
set @sql=stuff(@sql,1,11,'')
exec(@sql)

drop table tb

 

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:262409次
    • 积分:2989
    • 等级:
    • 排名:第12119名
    • 原创:62篇
    • 转载:53篇
    • 译文:0篇
    • 评论:50条
    最新评论