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 
 
/*--比較兩個資料庫的表結構差異 --*/ 
 
/*--呼叫示例  
exec p_comparestructure 'DBName1','DBName2' 
--*/ 
ALTER 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 '
 
[email protected]+'..sysobjects where xtype=''PK'' and parent_obj=a.id and name in ( 
    SELECT name FROM '[email protected]+'..sysindexes WHERE indid in( 
    SELECT indid FROM '[email protected]+'..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,'''') 
    FROM '
 
[email protected]+'..syscolumns a 
    left join '[email protected]+'..systypes b on a.xtype=b.xusertype 
    inner join '[email protected]+'..sysobjects d on a.id=d.id  and d.xtype=''U'' and  d.name <>''dtproperties'' 
    left join '[email protected]+'..syscomments e on a.cdefault=e.id  
    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 '
 
[email protected]+'..sysobjects where xtype=''PK'' and parent_obj=a.id and name in ( 
    SELECT name FROM '[email protected]+'..sysindexes WHERE indid in( 
    SELECT indid FROM '[email protected]+'..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,'''') 
    FROM '[email protected]+'..syscolumns a 
    left join '[email protected]+'..systypes b on a.xtype=b.xusertype 
    inner join '[email protected]+'..sysobjects d on a.id=d.id  and d.xtype=''U'' and  d.name <>''dtproperties'' 
    left join '[email protected]+'..syscomments e on a.cdefault=e.id   
    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