网上找到的SQL库比较语句

以下是第一篇：

 

/*--比较两个数据库的表结构差异--*//*--调用示例exec p_comparestructure 'xzkh_model','xzkh_new'--*/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]GOcreate proc p_comparestructure@dbname1 varchar(250), --要比较的数据库名1@dbname2 varchar(250) --要比较的数据库名2ascreate table #tb1(表名1 varchar(250),字段名 varchar(250),序号 int,标识 bit,主键 bit,类型 varchar(250),占用字节数 int,长度 int,小数位数 int,允许空 bit,默认值 varchar(500),字段说明 varchar(500))create table #tb2(表名2 varchar(250),字段名 varchar(250),序号 int,标识 bit,主键 bit,类型 varchar(250),占用字节数 int,长度 int,小数位数 int,允许空 bit,默认值 varchar(500),字段说明 varchar(500))--得到数据库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 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 aleft join '+@dbname1+'..systypes b on a.xtype=b.xusertypeinner 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.idleft 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 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 aleft join '+@dbname2+'..systypes b on a.xtype=b.xusertypeinner 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.idleft 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 afull 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 

 

以下是第二篇：

 

SET QUOTED_IDENTIFIER ON GOSET ANSI_NULLS ON GOcreate PROCEDURE r_pro_xx@oldserver varchar(50),@olddb varchar(50),@olduser varchar(15),@oldpw varchar(20),@newserver varchar(50),@newdb varchar(50),@newuser varchar(15),@newpw varchar(20),@comtype char(2)as/*比较两数据库的结构;参数如下:exec r_pro_xx@oldserver='ma',--老的数据库的连接信息@olddb ='olddb',@olduser='sa',@oldpw='a',@newserver ='ma',--新的@newdb='newdb',@newuser='sa',@newpw ='a',@comtype ='p'--‘p’是比较的存储过程，‘u’是比较的表注意:现在仅对表和存储过程进行比较,而且存储过程的比较还有缺陷,缺陷如下:如果两表中的同一存储过程,仅仅是空格或开始位置不一样,它也认为是不一样的..如何处理?嘿嘿.如果哪位有兴趣,帮改改哈.改完后联系我.玉儿 QQ:49550145*/declare @sql varchar(8000)declare @old varchar(8000),@new varchar(8000)declare @i int, @j int ,@k int ,@leno int ,@lenn int set @sql=''create table #t_pro(name sysname null,bz varchar(50) null,old varchar(20),new varchar(20),lx varchar(10) null)if @comtype ='p' or @comtype='tr' or @comtype='pk' begin create table #t_oldpro(name varchar(50) null,colid smallint not null ,text nvarchar(4000) null ) create table #t_newpro(name varchar(50) null,colid smallint not null ,text nvarchar(4000) null )--存储过程 set @sql='insert into #t_oldpro select * from OPENROWSET(''SQLOLEDB'','''+@oldserver+''';'''+@olduser+''';'''+@oldpw+''', '' select name, b.colid,b.text from '+@olddb+'.dbo.sysobjects as a ,'+@olddb+'.dbo.syscomments as b where A.category<>''''2'''' and a.xtype=''''p'''' and A.id=b.id '') ' exec(@sql) set @sql='insert into #t_newpro select * from OPENROWSET(''SQLOLEDB'','''+@newserver+''';'''+@newuser+''';'''+@newpw+''', '' select name, b.colid,b.text from '+@newdb+'.dbo.sysobjects as a ,'+@newdb+'.dbo.syscomments as b where A.category<>''''2'''' and a.xtype=''''p'''' and A.id=b.id '') ' exec(@sql) set @sql='insert into #t_pro(name,bz,lx) select distinct name,''增加'',''存储过程'' from #t_newpro where name not in (select distinct name from #t_oldpro) ' exec(@sql) delete from #t_newpro where name in ( select name from #t_pro where bz='增加') set @sql='insert into #t_pro(name,bz,lx) select distinct name,''减少'',''存储过程'' from #t_oldpro where name not in (select distinct name from #t_newpro ) ' exec(@sql) delete from #t_oldpro where name in ( select name from #t_pro where bz='减少')--去掉增加减少的。只保留两个都有的。 -- for i=1 to -- oobj.colid=nobj.colid and oobj.text<>nobj.text set @sql='insert into #t_pro(name,bz,lx) select distinct nobj.name,''改动'',''存储过程'' from #t_oldpro oobj,#t_newpro nobj where oobj.name=nobj.name and oobj.colid=nobj.colid and oobj.text<>nobj.text' exec (@sql)--触发器 p存储过程，,tr触发器,pk主键约束,f,u表,d索引 v ,s 系统表, drop table #t_oldpro drop table #t_newpro endif @comtype ='u' begin create table #t_oldtab(tab sysname not null,name varchar(50) null,colid smallint not null ,domain int not null,type tinyint null,length smallint not null, prec smallint null,scale int null,isnullable int null) create table #t_newtab(tab sysname not null,name varchar(50) null,colid smallint not null ,domain int not null,type tinyint null,length smallint not null, prec smallint null,scale int null,isnullable int null) set @sql='insert into #t_oldtab select * from OPENROWSET(''SQLOLEDB'','''+@oldserver+''';'''+@olduser+''';'''+@oldpw+''', '' select a.name, b.name,b.colid,b.domain,b.type,b.length,b.prec,b.scale,b.isnullable from '+@olddb+'.dbo.sysobjects as a ,'+@olddb+'.dbo.syscolumns as b where a.xtype=''''u'''' and A.id=b.id '') ' exec(@sql) set @sql='insert into #t_newtab select * from OPENROWSET(''SQLOLEDB'','''+@newserver+''';'''+@newuser+''';'''+@newpw+''', '' select a.name ,b.name,b.colid,b.domain,b.type,b.length,b.prec,b.scale,b.isnullable from '+@newdb+'.dbo.sysobjects as a ,'+@newdb+'.dbo.syscolumns as b where a.xtype=''''u'''' and A.id=b.id '') ' exec(@sql) insert into #t_pro(name,bz,lx) select distinct tab,'减少表'+tab,'表' from #t_oldtab where tab not in (select distinct tab from #t_newtab) insert into #t_pro(name,bz,lx) select distinct tab,'增加表'+tab,'表' from #t_newtab where tab not in (select distinct tab from #t_oldtab ) delete from #t_oldtab where tab in (select name from #t_pro where bz like '减少表%' ) delete from #t_newtab where tab in (select name from #t_pro where bz like '增加表%' ) insert into #t_pro(name,bz,lx) select new.name,new.tab+'增加列','表' from #t_newtab NEW where NEW.tab+NEW.name not in (select tab+name from #t_oldtab ) insert into #t_pro(name,bz,lx) select old.name,old.tab+'减少列','表' from #t_oldtab old where old.tab+old.name not in (select tab+name from #t_newtab ) insert into #t_pro(name,bz,old,new,lx) select distinct nobj.name,'是否主键'+oobj.tab,cast(oobj.domain as char(10)),cast(nobj.domain as char(10)),'表' from #t_oldtab oobj,#t_newtab nobj where oobj.tab=nobj.tab and oobj.name=nobj.name and oobj.domain<>nobj.domain union select distinct nobj.name,'数据类型'+oobj.tab,cast(oobj.type as char(10)),cast(nobj.type as char(10)),'表' from #t_oldtab oobj,#t_newtab nobj where oobj.tab=nobj.tab and oobj.name=nobj.name and oobj.type<>nobj.type union select distinct nobj.name,'长度'+oobj.tab,cast(oobj.length as char(10)),cast(nobj.length as char(10)),'表' from #t_oldtab oobj,#t_newtab nobj where oobj.tab=nobj.tab and oobj.name=nobj.name and oobj.length<>nobj.length union select distinct nobj.name,'精度'+oobj.tab,cast(oobj.prec as char(10)),cast(nobj.prec as char(10)),'表' from #t_oldtab oobj,#t_newtab nobj where oobj.tab=nobj.tab and oobj.name=nobj.name and oobj.prec<>nobj.prec union select distinct nobj.name,'小数点位数'+oobj.tab,cast(oobj.scale as char(10)),cast(nobj.scale as char(10)),'表' from #t_oldtab oobj,#t_newtab nobj where oobj.tab=nobj.tab and oobj.name=nobj.name and oobj.scale<>nobj.scale union select distinct nobj.name,'是否为空'+oobj.tab,cast(oobj.isnullable as char(10)),cast(nobj.isnullable as char(10)),'表' from #t_oldtab oobj,#t_newtab nobj where oobj.tab=nobj.tab and oobj.name=nobj.name and oobj.isnullable<>nobj.isnullable drop table #t_oldtab drop table #t_newtab end select * from #t_pro drop table #t_proGOSET QUOTED_IDENTIFIER OFF GOSET ANSI_NULLS ON GO