*--数据结构比较 比较两个数据库中的视图/存储过程的结构(结构比较,不是功能比较) --邹建 2004.07(引用请保留此信息)--*/ /*--调用示例 --调用 exec p_compdb 'pubs','northwind' --*/ create proc p_compdb @db1 sysname, --第一个库 @db2 sysname --第二个库 as exec(' select 类型=case isnull(a.xtype,b.xtype) when ''V'' then ''视图'' else ''存储过程'' end ,匹配情况=case when a.name is null then ''库 ['+@db1+'] 中无'' when b.name is null then ''库 ['+@db2+'] 中无'' else ''结构不同'' end ,对象名称=isnull(a.name,b.name) from( select a.name,a.xtype,b.colid,b.text from ['+@db1+']..sysobjects a,['+@db1+']..syscomments b where a.id=b.id and a.xtype in(''V'',''P'') and a.status>=0 )a full join( select a.name,a.xtype,b.colid,b.text from ['+@db2+']..sysobjects a,['+@db2+']..syscomments b where a.id=b.id and a.xtype in(''V'',''P'') and a.status>=0 )b on a.name=b.name and a.xtype=b.xtype and a.colid=b.colid where a.name is null or b.name is null or isnull(a.text,'''') <>isnull(b.text,'''') group by a.name,b.name,a.xtype,b.xtype order by 类型,匹配情况,对象名称') go 表结构比较: ------------------------------------------------------------------------------------------- if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_comparestructure]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[p_comparestructure] GO /*--比较两个数据库的表结构差异 可以比较两个数据库的结构差异 --邹建 2003.9(引用请保留此信息)--*/ /*--调用示例 exec p_comparestructure '库1','库2' --*/ create proc p_comparestructure @dbname1 varchar(250),--要比较的数据库名1 @dbname2 varchar(250)--要比较的数据库名2 as create table #tb1(表名1 varchar(250),字段名 varchar(250),序号 int,标识 bit,主键 bit,类型 varchar(250), 占用字节数 int,长度 int,小数位数 int,允许空 bit,默认值 sql_variant,字段说明 sql_variant) create table #tb2(表名2 varchar(250),字段名 varchar(250),序号 int,标识 bit,主键 bit,类型 varchar(250), 占用字节数 int,长度 int,小数位数 int,允许空 bit,默认值 sql_variant,字段说明 sql_variant) --得到数据库1的结构 exec('insert into #tb1 SELECT 表名=d.name,字段名=a.name,序号=a.colid, 标识=case when a.status=0x80 then 1 else 0 end, 主键=case when exists(SELECT 1 FROM '+@dbname1+'..sysobjects where xtype=''PK'' and parent_obj=a.id and name in ( SELECT name FROM '+@dbname1+'..sysindexes WHERE indid in( SELECT indid FROM '+@dbname1+'..sysindexkeys WHERE id = a.id AND colid=a.colid ))) then 1 else 0 end, 类型=b.name,占用字节数=a.length,长度=a.prec,小数位数=a.scale,允许空=a.isnullable, 默认值=isnull(e.text,''''),字段说明=isnull(g.[value],'''') FROM '+@dbname1+'..syscolumns a left join '+@dbname1+'..systypes b on a.xtype=b.xusertype inner join '+@dbname1+'..sysobjects d on a.id=d.id and d.xtype=''U'' and d.name <>''dtproperties'' left join '+@dbname1+'..syscomments e on a.cdefault=e.id left join '+@dbname1+'..sysproperties g on a.id=g.id and a.colid=g.smallid order by a.id,a.colorder') --得到数据库2的结构 exec('insert into #tb2 SELECT 表名=d.name,字段名=a.name,序号=a.colid, 标识=case when a.status=0x80 then 1 else 0 end, 主键=case when exists(SELECT 1 FROM '+@dbname2+'..sysobjects where xtype=''PK'' and parent_obj=a.id and name in ( SELECT name FROM '+@dbname2+'..sysindexes WHERE indid in( SELECT indid FROM '+@dbname2+'..sysindexkeys WHERE id = a.id AND colid=a.colid ))) then 1 else 0 end, 类型=b.name,占用字节数=a.length,长度=a.prec,小数位数=a.scale,允许空=a.isnullable, 默认值=isnull(e.text,''''),字段说明=isnull(g.[value],'''') FROM '+@dbname2+'..syscolumns a left join '+@dbname2+'..systypes b on a.xtype=b.xusertype inner join '+@dbname2+'..sysobjects d on a.id=d.id and d.xtype=''U'' and d.name <>''dtproperties'' left join '+@dbname2+'..syscomments e on a.cdefault=e.id left join '+@dbname2+'..sysproperties g on a.id=g.id and a.colid=g.smallid order by a.id,a.colorder') --and not exists(select 1 from #tb2 where 表名2=a.表名1) select 比较结果=case when a.表名1 is null and b.序号=1 then '库1缺少表:'+b.表名2 when b.表名2 is null and a.序号=1 then '库2缺少表:'+a.表名1 when a.字段名 is null and exists(select 1 from #tb1 where 表名1=b.表名2) then '库1 ['+b.表名2+'] 缺少字段:'+b.字段名 when b.字段名 is null and exists(select 1 from #tb2 where 表名2=a.表名1) then '库2 ['+a.表名1+'] 缺少字段:'+a.字段名 when a.标识 <>b.标识 then '标识不同' when a.主键 <>b.主键 then '主键设置不同' when a.类型 <>b.类型 then '字段类型不同' when a.占用字节数 <>b.占用字节数 then '占用字节数' when a.长度 <>b.长度 then '长度不同' when a.小数位数 <>b.小数位数 then '小数位数不同' when a.允许空 <>b.允许空 then '是否允许空不同' when a.默认值 <>b.默认值 then '默认值不同' when a.字段说明 <>b.字段说明 then '字段说明不同' else '' end, * from #tb1 a full join #tb2 b on a.表名1=b.表名2 and a.字段名=b.字段名 where a.表名1 is null or a.字段名 is null or b.表名2 is null or b.字段名 is null or a.标识 <>b.标识 or a.主键 <>b.主键 or a.类型 <>b.类型 or a.占用字节数 <>b.占用字节数 or a.长度 <>b.长度 or a.小数位数 <>b.小数位数 or a.允许空 <>b.允许空 or a.默认值 <>b.默认值 or a.字段说明 <>b.字段说明 order by isnull(a.表名1,b.表名2),isnull(a.序号,b.序号)--isnull(a.字段名,b.字段名) go
if not exists( select * from dba.dbo.ta where checksum(*)not in (select checksum(*) from dbb.dbo.tb) union all select * from dbb.dbo.tb where checksum(*)not in (select checksum(*) from dba.dbo.ta) ) print N'結構一致'
--> 测试数据:ta create table ta ([daLei] varchar(4),[xiaoLei] varchar(4)) insert ta select '湖北','哈哈' union all select '湖北','黄石' union all select '湖北','孝感' union all select '长沙','湖南' union all select '长','岳阳' --> 测试数据:tb create table tb ([daLei] varchar(4),[xiaoLei] varchar(4)) insert tb select '湖北','呵呵' union all select '湖北','黄石' union all select '湖北','孝感' union all select '长沙','湖南' union all select '长沙','岳阳' --不一致的记录数 select * from ta a where not exists( select 1 from tb b where a.[daLei]=b.[daLei] and a.[xiaoLei]=b.[xiaoLei]) union all select * from tb a where not exists( select 1 from ta b where a.[daLei]=b.[daLei] and a.[xiaoLei]=b.[xiaoLei])
--> 测试数据:ta create table ta ([daLei] varchar(4),[xiaoLei] varchar(4)) insert ta select '湖北','哈哈' union all select '湖北','黄石' union all select '湖北','孝感' union all select '长沙','湖南' union all select '长','岳阳' --> 测试数据:tb create table tb ([daLei] varchar(4),[xiaoLei] varchar(4)) insert tb select '湖北','呵呵' union all select '湖北','黄石' union all select '湖北','孝感' union all select '长沙','湖南' union all select '长沙','岳阳' --不一致的记录数 select * from ta a where not exists( select 1 from tb b where a.[daLei]=b.[daLei] and a.[xiaoLei]=b.[xiaoLei]) union all select * from tb a where not exists( select 1 from ta b where a.[daLei]=b.[daLei] and a.[xiaoLei]=b.[xiaoLei])-- 数据条数是否一致 select *,case when ta_rowcnt = tb_rowcnt then '数据条数一致' else'数据条数不一致'end as 结果 from ( select count(1) as ta_rowcnt,(select count(1) from tb )as tb_rowcnt from ta ) a /* ta_rowcnt tb_rowcnt 结果 ----------- ----------- -------------- 5 5 数据条数一致(1 行受影响)
exec p_compdb 'pubs','northwind'
--*/
create proc p_compdb
@db1 sysname, --第一个库
@db2 sysname --第二个库
as
exec('
select 类型=case isnull(a.xtype,b.xtype) when ''V'' then ''视图'' else ''存储过程'' end
,匹配情况=case
when a.name is null then ''库 ['+@db1+'] 中无''
when b.name is null then ''库 ['+@db2+'] 中无''
else ''结构不同'' end
,对象名称=isnull(a.name,b.name)
from(
select a.name,a.xtype,b.colid,b.text
from ['+@db1+']..sysobjects a,['+@db1+']..syscomments b
where a.id=b.id and a.xtype in(''V'',''P'') and a.status>=0
)a full join(
select a.name,a.xtype,b.colid,b.text
from ['+@db2+']..sysobjects a,['+@db2+']..syscomments b
where a.id=b.id and a.xtype in(''V'',''P'') and a.status>=0
)b on a.name=b.name and a.xtype=b.xtype and a.colid=b.colid
where a.name is null
or b.name is null
or isnull(a.text,'''') <>isnull(b.text,'''')
group by a.name,b.name,a.xtype,b.xtype
order by 类型,匹配情况,对象名称')
go
表结构比较:
-------------------------------------------------------------------------------------------
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_comparestructure]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[p_comparestructure]
GO /*--比较两个数据库的表结构差异 可以比较两个数据库的结构差异 --邹建 2003.9(引用请保留此信息)--*/ /*--调用示例 exec p_comparestructure '库1','库2'
--*/
create proc p_comparestructure
@dbname1 varchar(250),--要比较的数据库名1
@dbname2 varchar(250)--要比较的数据库名2
as
create table #tb1(表名1 varchar(250),字段名 varchar(250),序号 int,标识 bit,主键 bit,类型 varchar(250),
占用字节数 int,长度 int,小数位数 int,允许空 bit,默认值 sql_variant,字段说明 sql_variant) create table #tb2(表名2 varchar(250),字段名 varchar(250),序号 int,标识 bit,主键 bit,类型 varchar(250),
占用字节数 int,长度 int,小数位数 int,允许空 bit,默认值 sql_variant,字段说明 sql_variant) --得到数据库1的结构
exec('insert into #tb1 SELECT
表名=d.name,字段名=a.name,序号=a.colid,
标识=case when a.status=0x80 then 1 else 0 end,
主键=case when exists(SELECT 1 FROM '+@dbname1+'..sysobjects where xtype=''PK'' and parent_obj=a.id and name in (
SELECT name FROM '+@dbname1+'..sysindexes WHERE indid in(
SELECT indid FROM '+@dbname1+'..sysindexkeys WHERE id = a.id AND colid=a.colid
))) then 1 else 0 end,
类型=b.name,占用字节数=a.length,长度=a.prec,小数位数=a.scale,允许空=a.isnullable,
默认值=isnull(e.text,''''),字段说明=isnull(g.[value],'''')
FROM '+@dbname1+'..syscolumns a
left join '+@dbname1+'..systypes b on a.xtype=b.xusertype
inner join '+@dbname1+'..sysobjects d on a.id=d.id and d.xtype=''U'' and d.name <>''dtproperties''
left join '+@dbname1+'..syscomments e on a.cdefault=e.id
left join '+@dbname1+'..sysproperties g on a.id=g.id and a.colid=g.smallid
order by a.id,a.colorder') --得到数据库2的结构
exec('insert into #tb2 SELECT
表名=d.name,字段名=a.name,序号=a.colid,
标识=case when a.status=0x80 then 1 else 0 end,
主键=case when exists(SELECT 1 FROM '+@dbname2+'..sysobjects where xtype=''PK'' and parent_obj=a.id and name in (
SELECT name FROM '+@dbname2+'..sysindexes WHERE indid in(
SELECT indid FROM '+@dbname2+'..sysindexkeys WHERE id = a.id AND colid=a.colid
))) then 1 else 0 end,
类型=b.name,占用字节数=a.length,长度=a.prec,小数位数=a.scale,允许空=a.isnullable,
默认值=isnull(e.text,''''),字段说明=isnull(g.[value],'''')
FROM '+@dbname2+'..syscolumns a
left join '+@dbname2+'..systypes b on a.xtype=b.xusertype
inner join '+@dbname2+'..sysobjects d on a.id=d.id and d.xtype=''U'' and d.name <>''dtproperties''
left join '+@dbname2+'..syscomments e on a.cdefault=e.id
left join '+@dbname2+'..sysproperties g on a.id=g.id and a.colid=g.smallid
order by a.id,a.colorder')
--and not exists(select 1 from #tb2 where 表名2=a.表名1)
select 比较结果=case when a.表名1 is null and b.序号=1 then '库1缺少表:'+b.表名2
when b.表名2 is null and a.序号=1 then '库2缺少表:'+a.表名1
when a.字段名 is null and exists(select 1 from #tb1 where 表名1=b.表名2) then '库1 ['+b.表名2+'] 缺少字段:'+b.字段名
when b.字段名 is null and exists(select 1 from #tb2 where 表名2=a.表名1) then '库2 ['+a.表名1+'] 缺少字段:'+a.字段名
when a.标识 <>b.标识 then '标识不同'
when a.主键 <>b.主键 then '主键设置不同'
when a.类型 <>b.类型 then '字段类型不同'
when a.占用字节数 <>b.占用字节数 then '占用字节数'
when a.长度 <>b.长度 then '长度不同'
when a.小数位数 <>b.小数位数 then '小数位数不同'
when a.允许空 <>b.允许空 then '是否允许空不同'
when a.默认值 <>b.默认值 then '默认值不同'
when a.字段说明 <>b.字段说明 then '字段说明不同'
else '' end,
*
from #tb1 a
full join #tb2 b on a.表名1=b.表名2 and a.字段名=b.字段名
where a.表名1 is null or a.字段名 is null or b.表名2 is null or b.字段名 is null
or a.标识 <>b.标识 or a.主键 <>b.主键 or a.类型 <>b.类型
or a.占用字节数 <>b.占用字节数 or a.长度 <>b.长度 or a.小数位数 <>b.小数位数
or a.允许空 <>b.允许空 or a.默认值 <>b.默认值 or a.字段说明 <>b.字段说明
order by isnull(a.表名1,b.表名2),isnull(a.序号,b.序号)--isnull(a.字段名,b.字段名)
go
select *
from dba.dbo.ta
where checksum(*)not in (select checksum(*) from dbb.dbo.tb)
union all
select *
from dbb.dbo.tb
where checksum(*)not in (select checksum(*) from dba.dbo.ta)
)
print N'結構一致'
create table ta ([daLei] varchar(4),[xiaoLei] varchar(4))
insert ta
select '湖北','哈哈' union all
select '湖北','黄石' union all
select '湖北','孝感' union all
select '长沙','湖南' union all
select '长','岳阳'
--> 测试数据:tb
create table tb ([daLei] varchar(4),[xiaoLei] varchar(4))
insert tb
select '湖北','呵呵' union all
select '湖北','黄石' union all
select '湖北','孝感' union all
select '长沙','湖南' union all
select '长沙','岳阳'
--不一致的记录数
select * from ta a where not exists(
select 1 from tb b where a.[daLei]=b.[daLei] and a.[xiaoLei]=b.[xiaoLei])
union all
select * from tb a where not exists(
select 1 from ta b where a.[daLei]=b.[daLei] and a.[xiaoLei]=b.[xiaoLei])
create table ta ([daLei] varchar(4),[xiaoLei] varchar(4))
insert ta
select '湖北','哈哈' union all
select '湖北','黄石' union all
select '湖北','孝感' union all
select '长沙','湖南' union all
select '长','岳阳'
--> 测试数据:tb
create table tb ([daLei] varchar(4),[xiaoLei] varchar(4))
insert tb
select '湖北','呵呵' union all
select '湖北','黄石' union all
select '湖北','孝感' union all
select '长沙','湖南' union all
select '长沙','岳阳'
--不一致的记录数
select * from ta a where not exists(
select 1 from tb b where a.[daLei]=b.[daLei] and a.[xiaoLei]=b.[xiaoLei])
union all
select * from tb a where not exists(
select 1 from ta b where a.[daLei]=b.[daLei] and a.[xiaoLei]=b.[xiaoLei])-- 数据条数是否一致
select *,case when ta_rowcnt = tb_rowcnt then '数据条数一致' else'数据条数不一致'end as 结果
from
(
select count(1) as ta_rowcnt,(select count(1) from tb )as tb_rowcnt from ta
) a
/*
ta_rowcnt tb_rowcnt 结果
----------- ----------- --------------
5 5 数据条数一致(1 行受影响)