use master

go
IF EXISTS (SELECT * FROM sysobjects WHERE id = OBJECT_ID(N'[func_CompareDBobjectsReColumns_Temp]') AND xtype in (N'FN', N'IF', N'TF'))
DROP FUNCTION [func_CompareDBobjectsReColumns_Temp]

go
create function [func_CompareDBobjectsReColumns_Temp](@objectID int)
returns varchar(1000)
as
begin
    declare @str varchar(1000)
    set @str = ''
    select @str = @str + ', ' + A.name + ' ' + B.name +
    case when B.name in('int','datetime') then ''
    when B.name in('varchar','nvarchar') then '(' + cast(A.length as varchar) +')'
    else ' ' end
    --zzl
    from syscolumns A, systypes B
    where A.xtype = B.xtype and id = @objectID
   
     if(len(@str)) > 0
     begin
  set @str = ltrim(rtrim(@str))
  set @str = right(@str , len(@str) - 1)
  end
    return ltrim(rtrim(@str))
end
go

declare @sqlStr nvarchar(4000),@dbCurrent nvarchar(20),@dbOK nvarchar(20),@db nvarchar(20)
 
 set @dbOK = 'UBIQTomb_Test0819'
 set @db = 'UBIQTomb'
 
 if not exists(select   1   from   master..sysdatabases   where   name= @dbOK)
 begin
      print   '不存在存在数据库名:'+ @dbOK
      return;
     end
    
 if not exists(select   1   from   master..sysdatabases   where   name= @db)
 begin
      print   '不存在存在数据库名:'+ @db
      return;
     end

select @dbCurrent = db_name()
 
 --不存在的表 
 set @sqlStr = 'select * into #tableOK from '+@dbOK+'..sysobjects where xtype=''U'';'
 set @sqlStr = @sqlStr+ 'select * into #tableCurrent from '+@db+'..sysobjects where xtype=''U'';'
 set @sqlStr = @sqlStr+ 'select +''create table ''+ name +''(''+ '+@dbCurrent+'.dbo.func_CompareDBobjectsReColumns_Temp(id) +'')''  as 表不存在 from #tableOK where name not in(select name from #tableCurrent);'
 
 --不存在的列
 set @sqlStr = @sqlStr + ' select A.name as ColumnName,B.name as DataType, A.length as DataLen, C.name as TableName into #cloumnsOK '
        + ' from '+@dbOK+'..syscolumns A, '+@dbOK+'..systypes B, '+@dbOK+'..sysobjects C'
        + ' where A.xtype = B.xtype and A.id = C.id and C.xtype=''U'' and B.name != ''sysname'' and C.name in(select name from #tableOK) and C.name in(select name from #tableCurrent);'     
 set @sqlStr = @sqlStr + ' select A.name as ColumnName,B.name as DataType, A.length as DataLen, C.name as TableName, A.id as TableID  into #cloumnsCurrent '
        + ' from '+@db+'..syscolumns A, '+@db+'..systypes B, '+@db+'..sysobjects C'
        + ' where A.xtype = B.xtype and A.id = C.id and C.xtype=''U'' and B.name != ''sysname'' and C.name in(select name from #tableOK) and C.name in(select name from #tableCurrent);' 
 set @sqlStr = @sqlStr+ ' select +''alter table ''+ TableName +'' add ''+ ColumnName +'' ''+DataType+'
   +'+ case when DataType in(''int'',''datetime'') then '''' when DataType in(''varchar'',''nvarchar'',''char'',''nchar'') then ''('' + cast(DataLen as varchar) +'')'' else '' '' end as 不存在的列'
   +' from #cloumnsOK where ColumnName not in(select ColumnName from #cloumnsCurrent where #cloumnsCurrent.TableName = #cloumnsOK.TableName);'

--数据类型不正确,或者数据长度不正确
 set @sqlStr = @sqlStr+ ' select +''alter table ''+ TableName +'' alter column ''+ ColumnName +'' ''+DataType+'
   +'+ case when DataType in(''int'',''datetime'') then '''' when DataType in(''varchar'',''nvarchar'',''char'',''nchar'') then ''('' + cast(DataLen as varchar) +'')'' else '' '' end as 数据类型不正确或者数据长度不正确'
   +' from #cloumnsOK where DataType + cast(DataLen as varchar) not in(select DataType + cast(DataLen as varchar) from #cloumnsCurrent where #cloumnsCurrent.TableName = #cloumnsOK.TableName and #cloumnsCurrent.ColumnName = #cloumnsOK.ColumnName)'
   +' and TableName + ColumnName in(select TableName + ColumnName from #cloumnsCurrent)'
 exec sp_executesql @sqlStr
 
 set @sqlStr = 'select B.name +''|''+ A.name as ''缺少自增长列的表'''
    +' from '+@dbOK+'..syscolumns A, '+@dbOK+'..sysobjects B   '
    +' where  A.id = B.id and A.typestat !=0 and A.colstat !=0 and B.xtype = ''U'''
    +' and B.name+A.name not in('
    +' select B.name + A.name '
    +' from '+@db+'..syscolumns A, '+@db+'..sysobjects B   '
    +' where  A.id = B.id and A.typestat !=0 and A.colstat !=0 and B.xtype = ''U'')'
 exec sp_executesql @sqlStr
    
 set @sqlStr = 'select B.name+''|''+A.name as ''缺少主键的表'''
   +' from '+@dbOK+'..syscolumns A, '+@dbOK+'..sysobjects B '
   +' where A.id = B.id and  A.id in(select id from '+@dbOK+'..sysconstraints) and A.colstat = 1 '
   +' and B.name+A.name not in('
   +' select B.name+A.name'
   +' from '+@db+'..syscolumns A, '+@db+'..sysobjects B '
   +' where A.id = B.id and  A.id in(select id from '+@db+'..sysconstraints) and A.colstat = 1 )'
 exec sp_executesql @sqlStr
   
 set @sqlStr = 'select name as ''缺少存储过程'' from  '+@dbOK+'..sysobjects where xtype = ''P'' '
  +' and name not in(select name from '+@db+'..sysobjects where xtype = ''P'')'  
 exec sp_executesql @sqlStr
 
 set @sqlStr = 'select name as ''缺少触发器'' from  '+@dbOK+'..sysobjects where xtype = ''TR'''
  +' and name not in(select name from '+@db+'..sysobjects where xtype = ''TR'')'  
 exec sp_executesql @sqlStr
 
 set @sqlStr = 'select name as ''缺少函数'' from  '+@dbOK+'..sysobjects where xtype = ''FN'''
  +' and name not in(select name from '+@db+'..sysobjects where xtype = ''FN'')'
 exec sp_executesql @sqlStr

set @sqlStr = 'select name as ''缺少视图'' from  '+@dbOK+'..sysobjects where xtype = ''V'''
  +' and name not in(select name from '+@db+'..sysobjects where xtype = ''V'')'
 exec sp_executesql @sqlStr

go
IF EXISTS (SELECT * FROM sysobjects WHERE id = OBJECT_ID(N'[func_CompareDBobjectsReColumns_Temp]') AND xtype in (N'FN', N'IF', N'TF'))
DROP FUNCTION [func_CompareDBobjectsReColumns_Temp]

DBobjectsCompareScript(数据库对象比较).sql的更多相关文章

  1. 一些求数据库对象的SQL语句

    use [mydb] go --存储过程 SELECT * FROM INFORMATION_SCHEMA.ROUTINES WHERE routine_type='PROCEDURE' AND SP ...

  2. Sql Server系列:数据库对象

    数据库对象是数据库的组成部分,数据表.视图.索引.存储过程以及触发器等都是数据库对象. 数据库的主要对象是数据表,数据表是一系列二维数组的集合,用于存储各种信息. 视图表面上看与表几乎一样,具有一组命 ...

  3. SQL Server修改数据库对象所有者(Owner)浅析

    在SQL Server数据库中如何修改数据库对象(表.视图.存储过程..)的所有者(Owner)呢?一般我们可以使用系统提供的系统存储过程sp_changeobjectowner来修改. 我们先看看s ...

  4. (二)sql入门 管理数据库对象

    在数据库里,有各种各样的对象,除了最常见的表之外,还有诸如视图.索引等数据库对象. 这些对象,在数据库里需要有人来管理,那么谁来管理呢?当然是数据库的使用者了.每个使用者相对于数据库里有一片区域,称为 ...

  5. C#与数据库访问技术总结(六)之Command对象创建SQl语句代码示例

    Command对象创建SQl语句代码示例 说明:前面介绍了 Command 对象的方法和一些属性,回顾一下 Command对象主要用来执行SQL语句.利用Command对象,可以查询数据和修改数据. ...

  6. 查询Sql Server数据库对象结构

    查询Sql Server数据库对象结构 查询数据库 查询架构 查询表 查询列 查询存储过程 查询视图 1.查询某一服务器下所有数据库 select t.[name] as 数据库 from sys.d ...

  7. SQL Server 数据库对象命名参考

    一. 引言 编码规范是一个优秀程序员的必备素质,然而,有很多人非常注重程序中变量.方法.类的命名,却忽视了同样重要的数据库对象命名.这篇文章结合许多技术文章和资料,以及我自己的开发经验,对数据库对象的 ...

  8. SQL Server IF Exists 判断数据库对象是否存在的用法

    1 判断数据库是否存在Sql代码 if exists (select * from sys.databases where name = ’数据库名’)    drop database [数据库名] ...

  9. 基于Python的SQL Server数据库对象同步轻量级实现

    缘由 日常工作中经常遇到类似的问题:把某个服务器上的某些指定的表同步到另外一台服务器.类似需求用SSIS或者其他ETL工作很容易实现,比如用SSIS的话就可以,但会存在相当一部分反复的手工操作.建源的 ...

  10. MySQL优化篇(一),我可以和面试官多聊几句吗?——SQL优化流程与优化数据库对象

    我可以和面试官多聊几句吗?只是想偷点技能过来.MySQL优化篇(基于MySQL8.0测试验证),上部分:优化SQL语句.数据库对象,MyISAM表锁和InnoDB锁问题. MyISAM表锁和InnoD ...

随机推荐

  1. 移动端之Android开发的几种方式的初步体验

    目前越来越多的移动端混合开发方式,下面列举的大多数我都略微的尝试过,就初步的认识写个简单的心得: 开发方式 开发环境 是否需要AndroidSDK 支持跨平台 开发语言&技能 MUI Win+ ...

  2. nodejs进阶(3)—路由处理

    1. url.parse(url)解析 该方法将一个URL字符串转换成对象并返回. url.parse(urlStr, [parseQueryString], [slashesDenoteHost]) ...

  3. javascript动画系列第三篇——碰撞检测

    前面的话 前面分别介绍了拖拽模拟和磁性吸附,当可视区域内存在多个可拖拽元素,就出现碰撞检测的问题,这也是javascript动画的一个经典问题.本篇将详细介绍碰撞检测 原理介绍 碰撞检测的方法有很多, ...

  4. 使用 JavaScriptService 在.NET Core 里实现DES加密算法

    文章<ASP.NET Core love JavaScript>和<跨平台的 NodeJS 组件解决 .NetCore 不支持 System.Drawing图形功能的若干问题> ...

  5. .NetCore MVC中的路由(1)路由配置基础

    .NetCore MVC中的路由(1)路由配置基础 0x00 路由在MVC中起到的作用 前段时间一直忙于别的事情,终于搞定了继续学习.NetCore.这次学习的主题是MVC中的路由.路由是所有MVC框 ...

  6. 戏说HTML5

    如果有非技术人员问你,HTML5是什么,你会怎么回答? 新的HTML规范... 给浏览器提供了牛逼能力,干以前不能干的事...(确切地说应该是给浏览器规定了许多新的接口标准,要求浏览器实现牛逼的功能. ...

  7. ASP.NET Web API 跨域访问(CORS)

    一.客户端用JSONP请求数据 如果你想用JSONP来获得跨域的数据,WebAPI本身是不支持javascript的callback的,它返回的JSON是这样的: {"YourSignatu ...

  8. DDD 领域驱动设计-两个实体的碰撞火花

    上一篇:<DDD 领域驱动设计-领域模型中的用户设计?> 开源地址:https://github.com/yuezhongxin/CNBlogs.Apply.Sample(代码已更新) 在 ...

  9. 破解SQLServer for Linux预览版的3.5GB内存限制 (UBUNTU篇)

    在上一篇中我提到了如何破解RHEL上SQLServer的内存大小限制,但是Ubuntu上还有一道检查 这篇我将会讲解如何在3.5GB以下内存的Ubuntu中安装和运行SQLServer for Lin ...

  10. 在centos7上安装Jenkins

    在centos7上安装Jenkins 安装 添加yum repos,然后安装 sudo wget -O /etc/yum.repos.d/jenkins.repo http://pkg.jenkins ...