如何在SQL Server中使用SQL查询生成表的创建脚本

时间:2010-11-18 10:14:19

标签: sql-server-2005

我想在我的实时数据库中生成已创建表的创建表脚本。

我知道我们可以使用右键单击表生成脚本,然后单击'script table as'菜单并生成脚本。因为我的实时数据库用户界面运行速度很慢。

我想使用SQL查询执行相同的过程。有什么办法吗?

3 个答案:

答案 0 :(得分:3)

如果您正在寻找TSQL解决方案,那就非常详细,正如this example所示。

较短的替代方案是使用SMO libraryexample

(我最初回答了这个here,但是SQL Server-only devs可能没有将问题标题与此问题联系起来)

答案 1 :(得分:3)

对于使用索引,触发器和约束生成CREATE TABLE语句的更完整(-ish)解决方案,请尝试由Lowell Izaguirre制作的stored procedure

自2004年开始测试和开发,最后一次更新是在2013年。

我还做了一些改进,包括索引选项(PAD_INDEXFILLFACTORIGNORE_DUP_KEY):

以下是更改,无法容纳所有代码,因此您可以在http://pastebin.com/LXpBeuN1找到完整的修改版本。


更新

我与Lowell谈过,随着索引选项和其他改进的新变化,新版本即将上线。

答案 2 :(得分:2)

使用此查询:

DROP FUNCTION [dbo].[Get_Table_Script]
Go

Create Function Get_Table_Script
(
    @vsTableName varchar(50)
)

Returns
    VarChar(Max)
With ENCRYPTION

Begin

Declare @ScriptCommand varchar(Max)

Select @ScriptCommand =
    ' 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 As 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)

        Inner Join information_schema.table_constraints As TC On (
                                                                    ( TC.Table_name = SO.Name )
                                                                    AND 
                                                                    ( TC.Constraint_Type  = 'PRIMARY KEY' )
                                                                    And 
                                                                    ( TC.TABLE_NAME = @vsTableName )
                                                                 )
        Cross Apply
            (
                Select '[' + Column_Name + '], '
                From  information_schema.key_column_usage As kcu
                Where 
                    ( kcu.Constraint_Name = TC.Constraint_Name )
                Order By ORDINAL_POSITION
                FOR XML PATH('')
            ) As j (list)
Where
    ( xtype = 'U' )
    AND 
    ( Name NOT IN ('dtproperties') )

Return @ScriptCommand

End

你可以像这样点击Function

Select [dbo].Get_Table_Script '<Your_Table_Name>'

对于创建触发器,请使用此

SELECT     
DB_NAME() AS DataBaseName,                  
dbo.SysObjects.Name AS TriggerName,
dbo.sysComments.Text AS SqlContent
FROM 
dbo.SysObjects INNER JOIN 
    dbo.sysComments ON 
    dbo.SysObjects.ID = dbo.sysComments.ID
WHERE   
(dbo.SysObjects.xType = 'TR') 
AND 
dbo.SysObjects.Name LIKE '<Trigger_Name>'