2012-09-06 89 views
2

我正在編寫代碼來爲服務器上的所有數據庫上的所有表腳本CREATE TABLE語句。下面的代碼適用於特定數據庫。想要關於如何修改它的一些想法,所以它可以爲所有表格腳本表格模式。使用tsql的腳本表架構

select 'create table [' + so.name + '] (' + o.list + ')' + CASE WHEN tc.Constraint_Name IS NULL THEN '' ELSE 'ALTER TABLE ' + so.Name + ' ADD CONSTRAINT ' + tc.Constraint_Name + ' PRIMARY KEY ' + ' (' + LEFT(j.List, Len(j.List)-1) + ')' END 
from sysobjects so 
cross apply 
    (SELECT 
     ' ['+column_name+'] ' + 
     data_type + case data_type 
       when 'sql_variant' then '' 
       when 'text' then '' 
       when 'decimal' then '(' + cast(numeric_precision_radix as varchar) + ', ' + cast(numeric_scale as varchar) + ')' 
       else coalesce('('+case when character_maximum_length = -1 then 'MAX' else cast(character_maximum_length as varchar) end +')','') end + ' ' + 
     case when exists ( 
     select id from syscolumns 
     where object_name(id)=so.name 
     and name=column_name 
     and columnproperty(id,name,'IsIdentity') = 1 
     ) then 
     'IDENTITY(' + 
     cast(ident_seed(so.name) as varchar) + ',' + 
     cast(ident_incr(so.name) as varchar) + ')' 
     else '' 
     end + ' ' + 
     (case when IS_NULLABLE = 'No' then 'NOT ' else '' end) + 'NULL ' + 
      case when information_schema.columns.COLUMN_DEFAULT IS NOT NULL THEN 'DEFAULT '+ information_schema.columns.COLUMN_DEFAULT ELSE '' END + ', ' 

    from information_schema.columns where table_name = so.name 
    order by ordinal_position 
    FOR XML PATH('')) o (list) 
left join 
    information_schema.table_constraints tc 
on tc.Table_name    = so.Name 
AND tc.Constraint_Type = 'PRIMARY KEY' 
cross apply 
    (select '[' + Column_Name + '], ' 
    FROM  information_schema.key_column_usage kcu 
    WHERE  kcu.Constraint_Name  = tc.Constraint_Name 
    ORDER BY 
     ORDINAL_POSITION 
    FOR XML PATH('')) j (list) 
where xtype = 'U' 
AND name  NOT IN ('dtproperties') 
+0

你知道這一點,更是內置到SQL Server Management Studio中的權利? –

+1

我這樣做,但需要一個TSQL解決方案來編寫它 – sharadov

+0

我有相同的需求,非常感謝爲此付出努力。 :) – ctrlplusb

回答

2

因爲你似乎在TSQL確定,一個快速和骯髒的解決辦法是使用(無證)sp_foreachdb存儲過程。這將爲您提供sql實例上每個數據庫的名稱,因此您只需依次使用每個數據庫並運行您發佈的TSQL(在轉義所有單個qoutes後)。

繼承人縮短的例子:

EXECUTE sp_msforeachdb 'USE [?] 
select ''create table ['' + so.name + ''] '' 
from sysobjects so 
-- the rest of your escaped TSQL goes here... 
-- then finish with a closing quote: 
' 
+0

謝謝,幫助。 – sharadov