Geçirdim iyi bir miktar zaman geliyor çözüm için bu sorun, bu yüzden ruhu this post, Ben gönderme burada, bu yana olabileceğini düşünüyorum yararlı Diğerleri.

Eğer daha iyi bir senaryo, ya da eklemek istediğin bir şey varsa, lütfen mesaj bırakın.

Edit: Evet Beyler, Management Studio nasıl yapılacağını biliyorum ama başka bir uygulama içinde bunu yapmak mümkün olmak istedim.

Tüm tablolar için çalıştırmak ve SQL 2005 veri yeni tip destek yukarıdaki sürüm değiştirdim. Ayrıca, birincil anahtar adları korur. Sadece SQL 2005 üzerinde çalışır (cross kullanarak uygulanır).

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 'ntext' then ''
            when 'xml' then ''
            when 'decimal' then '('   cast(numeric_precision 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')

Güncelleme:XML veri türü ekledi kullanma

Güncelleme 2:1) Sabit durumda aynı ada sahip birden çok tablo var ama farklı şemalar, 2) birden çok tablo aynı adı taşıyan PK kısıtlaması yaşıyor