转:生成sql server2000对象创建脚本的存储过程

最新推荐文章于 2022-04-14 08:00:00 发布
最新推荐文章于 2022-04-14 08:00:00 发布
阅读量1.5k 收藏 1
点赞数
分类专栏： SQL Server 文章标签： 脚本 sql server 存储 object sqlserver null

转: http://blog.csdn.net/beiqiao/archive/2004/11/02/164028.aspx

 

通过读取sysobjects 等系统表的纪录，生成表、视图等数据库对象脚本的存储过程。

已知问题：
存储过程长度有限制，不能超过8000个字节，因为用来存储sql脚本的变量为varchar型，最大就是8000。

 -- ----------------------------------------------------------------------------------------------------------------------------------------------

if   exists  ( select   *   from  dbo.sysobjects  where  id  =   object_id (N ' [dbo].[sp_create_check] ' )  and   OBJECTPROPERTY (id, N ' IsProcedure ' )  =   1 )
 drop   procedure   [ dbo ] . [ sp_create_check ]
GO

if   exists  ( select   *   from  dbo.sysobjects  where  id  =   object_id (N ' [dbo].[sp_create_fk] ' )  and   OBJECTPROPERTY (id, N ' IsProcedure ' )  =   1 )
 drop   procedure   [ dbo ] . [ sp_create_fk ]
GO

if   exists  ( select   *   from  dbo.sysobjects  where  id  =   object_id (N ' [dbo].[sp_create_index] ' )  and   OBJECTPROPERTY (id, N ' IsProcedure ' )  =   1 )
 drop   procedure   [ dbo ] . [ sp_create_index ]
GO

if   exists  ( select   *   from  dbo.sysobjects  where  id  =   object_id (N ' [dbo].[sp_create_pk_uq] ' )  and   OBJECTPROPERTY (id, N ' IsProcedure ' )  =   1 )
 drop   procedure   [ dbo ] . [ sp_create_pk_uq ]
GO

if   exists  ( select   *   from  dbo.sysobjects  where  id  =   object_id (N ' [dbo].[sp_create_proc] ' )  and   OBJECTPROPERTY (id, N ' IsProcedure ' )  =   1 )
 drop   procedure   [ dbo ] . [ sp_create_proc ]
GO

if   exists  ( select   *   from  dbo.sysobjects  where  id  =   object_id (N ' [dbo].[sp_create_table] ' )  and   OBJECTPROPERTY (id, N ' IsProcedure ' )  =   1 )
 drop   procedure   [ dbo ] . [ sp_create_table ]
GO

SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  OFF  
 GO


/*
 生成当前数据库所有CHECK约束的脚本
 适用于 Sql Server 2000
 beiqiao（qbboxcn@hotmail.com） 2004/02/29
*/
CREATE   PROCEDURE  sp_create_check  AS
select   ' ALTER TABLE  '   +  d.name  +   '  WITH NOCHECK ADD CONSTRAINT  '    +  a.name 
  +   case   when  b.status  in  ( 133141 , 2069 )  then   '  default  '   else   '  check  '   end  
  +  c. text   
  +   case   when  b.status  in  ( 133141 , 2069 )  then   '  for  '   +   col_name (b.id,b.colid)  else   ''   end

from  sysobjects a , sysconstraints b, syscomments c ,sysobjects d
 where   b.constid  =  a.id  and  b.constid  =  c.id  and  b.id  =  d.id  and  d.name  <>   ' dtproperties '

GO
SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  ON  
 GO

SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  OFF  
 GO


/*
 生成当前数据库所有FK约束的脚本
 适用于 Sql Server 2000
 beiqiao（qbboxcn@hotmail.com） 2004/02/29
*/
CREATE   PROCEDURE  sp_create_fk  AS
select
  '  alter table  '   +  t_obj.name  +
  '  add constraint  '   +  c_obj.name  +  
  '  foreign key ( '   +  
  col_name (t_obj.id, fkey1)  +
  --  处理复合外键
  case   when  fkey2 <> 0   then   ' , '   +   col_name (t_obj.id, fkey2)  else   ''   end   +
  case   when  fkey3 <> 0   then   ' , '   +   col_name (t_obj.id, fkey3)  else   ''   end   +
  case   when  fkey4 <> 0   then   ' , '   +   col_name (t_obj.id, fkey4)  else   ''   end   +
  case   when  fkey5 <> 0   then   ' , '   +   col_name (t_obj.id, fkey5)  else   ''   end   +
  case   when  fkey6 <> 0   then   ' , '   +   col_name (t_obj.id, fkey6)  else   ''   end   +
  case   when  fkey7 <> 0   then   ' , '   +   col_name (t_obj.id, fkey7)  else   ''   end   +
  case   when  fkey8 <> 0   then   ' , '   +   col_name (t_obj.id, fkey8)  else   ''   end   +
  case   when  fkey9 <> 0   then   ' , '   +   col_name (t_obj.id, fkey9)  else   ''   end   +
  case   when  fkey10 <> 0   then   ' , '   +   col_name (t_obj.id, fkey10)  else   ''   end   +
  case   when  fkey11 <> 0   then   ' , '   +   col_name (t_obj.id, fkey11)  else   ''   end   +
  case   when  fkey12 <> 0   then   ' , '   +   col_name (t_obj.id, fkey12)  else   ''   end   +
  case   when  fkey13 <> 0   then   ' , '   +   col_name (t_obj.id, fkey13)  else   ''   end   +
  case   when  fkey14 <> 0   then   ' , '   +   col_name (t_obj.id, fkey14)  else   ''   end   +
  case   when  fkey15 <> 0   then   ' , '   +   col_name (t_obj.id, fkey15)  else   ''   end   +
  case   when  fkey16 <> 0   then   ' , '   +   col_name (t_obj.id, fkey16)  else   ''   end   +
   ' )  '    +
  '  references  '   +  r_obj.name  +   ' ( '   +  
  index_col ( object_name (rkeyid), rkeyindid,  1  )  +
  --  处理复合外键
  case   when   index_col ( object_name (rkeyid), rkeyindid,  2  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  2  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  3  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  3  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  4  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  4  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  5  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  5  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  6  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  6  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  7  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  7  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  8  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  8  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  9  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  9  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  10  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  10  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  11  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  11  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  12  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  12  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  13  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  13  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  14  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  14  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  15  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  15  )  else   ''   end   +
  case   when   index_col ( object_name (rkeyid), rkeyindid,  16  ) is   not   null   then   ' , '   +   index_col ( object_name (rkeyid), rkeyindid,  16  )  else   ''   end   +
  ' ) '
from
 sysobjects c_obj
 ,sysobjects t_obj
 ,sysobjects r_obj
 ,syscolumns col
 ,sysreferences  ref
 where
 c_obj.xtype  in  ( ' F ' )
  and  t_obj.id  =  c_obj.parent_obj
  and  t_obj.id  =  col.id
  and  col.colid    in  
 (ref.fkey1,ref.fkey2,ref.fkey3,ref.fkey4,ref.fkey5,ref.fkey6,
 ref.fkey7,ref.fkey8,ref.fkey9,ref.fkey10,ref.fkey11,ref.fkey12,
 ref.fkey13,ref.fkey14,ref.fkey15,ref.fkey16)
  and  c_obj.id  =  ref.constid
  and  r_obj.id  =  ref.rkeyid

 GO
SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  ON  
 GO

SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  OFF  
 GO


/*
 生成当前数据库所有索引的脚本
 适用于 Sql Server 2000
 beiqiao（qbboxcn@hotmail.com） 2004/02/29
*/
CREATE   PROCEDURE  sp_create_index  AS
declare   @tableName   nvarchar ( 128 )
 declare   @indexName   nvarchar ( 128 )
 declare   @status   int
declare   @OrigFillFactor   int
declare   @columnName   nvarchar ( 128 )
 declare   @indid   smallint
declare   @clusteredString   nvarchar ( 16 )
 declare   @uniqueString   nvarchar ( 16 )
 declare   @fillfactorString   nvarchar ( 1024 )
 declare   @sql   nvarchar ( 1024 )

 select   @fillfactorString   =   ''
select   @sql   =   ''

create   table  #tmpTable (sql  nvarchar ( 4000 ))

 DECLARE  myCursor   CURSOR   FOR  
 select  b.name  as  tableName, a.name  as  indexName, a.status, a.OrigFillFactor,  index_col (b.name, indid,  1  )  as  columnName ,a.indid
 from  sysindexes a, sysobjects b
 where  a.id  =  b.id  and  b.xtype  =   ' U '   and  indid  >   0   and  indid  <   255  
 and  (a.status  &   8388608 )   =   0   -- 去掉不需要的记录
and  (a.status  &   2048 )  =   0   -- 去掉primary key

OPEN  myCursor

 FETCH   NEXT   FROM  myCursor  into   @tableName , @indexName , @status , @OrigFillFactor , @columnName , @indid

WHILE   @@FETCH_STATUS   =   0
BEGIN

  if  ( @status   &   16 ) <> 0  
   select   @clusteredString   =   '  clustered  '
  else
   select   @clusteredString   =   '  nonclustered  '

  if  ( @status   &   2 ) <> 0  
   select   @uniqueString   =   '  UNIQUE  '
  else
   select   @uniqueString   =   '   '
 
  if   @OrigFillFactor   <> 0  
   select   @fillfactorString   =   ' ,FILLFACTOR= '   +   ltrim ( rtrim ( str ( @OrigFillFactor )))
  else
   select   @fillfactorString   = ''

  if  ( @status   & 1 ) <> 0  
   select   @fillfactorString   =    @fillfactorString   +   ' ,IGNORE_DUP_KEY '

  if  ( @status   & 256 ) <> 0  
   select   @fillfactorString   =    @fillfactorString   +   ' ,PAD_INDEX '

  if  ( @status   & 16777216 ) <> 0  
   select   @fillfactorString   =    @fillfactorString   +   ' ,STATISTICS_NORECOMPUTE '
 
  if    len ( @fillfactorString )  <>   0
   select   @fillfactorString   =   '  with  '   +   substring (  @fillfactorString ,  2 ,  len ( @fillfactorString ) - 1  )

  if  ( @status   &   4096 ) <> 0
   select   @sql   =   ' ALTER TABLE  '   +   @tableName   +   '  WITH NOCHECK ADD CONSTRAINT  '  
   +   @indexName   +   @clusteredString   +   @uniqueString   +   ' ( '
   +   index_col ( @tableName ,  @indid ,  1  ) 
   +   case   when   index_col ( @tableName ,  @indid ,  2  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  2  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  3  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  3  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  4  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  4  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  5  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  5  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  6  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  6  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  7  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  7  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  8  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  8  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  9  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  9  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  10  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  10  )  else   ''   end  
   +   ' ) '
   +   @fillfactorString
  else
   select   @sql   =   ' create  '   +   @clusteredString   +   @uniqueString   +   '  INDEX  '   +   @indexName   +   '  ON  '   +   @tableName   +   ' ( '
   +   index_col ( @tableName ,  @indid ,  1  ) 
   +   case   when   index_col ( @tableName ,  @indid ,  2  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  2  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  3  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  3  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  4  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  4  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  5  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  5  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  6  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  6  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  7  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  7  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  8  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  8  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  9  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  9  )  else   ''   end  
   +   case   when   index_col ( @tableName ,  @indid ,  10  ) is   not   null   then   ' , '   +   index_col ( @tableName ,  @indid ,  10  )  else   ''   end  
   +   ' ) '   
   +   @fillfactorString
  insert   into  #tmpTable (sql) values ( @sql )

  FETCH   NEXT   FROM  myCursor  into   @tableName , @indexName , @status , @OrigFillFactor , @columnName , @indid
end
CLOSE  myCursor
 DEALLOCATE  myCursor

 select   *   from  #tmpTable

 drop   table  #tmpTable
 GO
SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  ON  
 GO

SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  OFF  
 GO


/*
 生成当前数据库所有PK和UQ约束的脚本
 适用于 Sql Server 2000
 beiqiao（qbboxcn@hotmail.com） 2004/02/29
*/
CREATE   PROCEDURE  sp_create_pk_uq  AS
declare   @oldTableName   nvarchar ( 128 )
 declare   @sqlString   nvarchar ( 1024 )
 declare   @columnList   nvarchar ( 1024 )

 declare   @constraintName   nvarchar ( 128 )
 declare   @oldConstraintName   nvarchar ( 128 )
 declare   @tableName   nvarchar ( 1024 )
 declare   @columnName   nvarchar ( 1024 )
 declare   @indexId   smallint
declare   @objType   char ( 2 )

 declare   @oldIndexId   smallint
declare   @oldObjType   char ( 2 )
 declare   @clusteredString   nvarchar ( 16 )
 declare   @objTypeString   nvarchar ( 16 )

 select   @oldIndexId   =   1
select   @oldObjType   =   ' PK '
select   @oldConstraintName   =   ''
select   @oldTableName   =   ''
select   @sqlString   =   ''
select   @columnList   = ''
select   @clusteredString   =   '  CLUSTERED  '
select   @objTypeString   =   '  PRIMARY KEY   '

create   table  #tmpTable (sql  nvarchar ( 4000 ))

 DECLARE  myCursor   CURSOR   FOR  
 select
 i.name      as  constraintName
 ,t_obj.name     as  tableName
 ,col.name     as  columnName
 ,i.indid     as  indexId
 ,c_obj.xtype     as  objType
 from
 sysobjects  c_obj
 ,sysobjects  t_obj
 ,syscolumns  col
 ,master.dbo.spt_values  v
 ,sysindexes  i
 where
 c_obj.xtype  in  ( ' UQ '  , ' PK ' )
  and  t_obj.id  =  c_obj.parent_obj
  and  t_obj.xtype   =   ' U '
  and  t_obj.id  =  col.id
  and  col.name  =   index_col (t_obj.name,i.indid,v. number )
  and  t_obj.id  =  i.id
  and  c_obj.name   =  i.name
  and  v. number    >   0  
   and  v. number    <=  i.keycnt 
   and  v.type   =   ' P '
  and  t_obj.status  > 0  
 order   by  tablename

 OPEN  myCursor

 FETCH   NEXT   FROM  myCursor  into   @constraintName ,  @tableName ,  @columnName ,  @indexId ,  @objType

WHILE   @@FETCH_STATUS   =   0
BEGIN

  if   @constraintName   <>   @oldConstraintName   and   @oldConstraintName   <>   ''
  begin
   -- 删除最后一个逗号
   select   @columnList   =   substring (  @columnList ,  1 ,  len ( @columnList ) - 1  )
  
   if   @oldIndexId   >   1
    select   @clusteredString   =   '  NONCLUSTERED  '
   else
    select   @clusteredString   =   '  CLUSTERED  '  
  
   if   @oldObjType   =   ' UQ '
    select   @objTypeString   =   '  UNIQUE  '
   else  
    select   @objTypeString   =   '  PRIMARY KEY  '   

   select   @sqlString   =   ' alter table  '   +   @oldTableName   +   '  WITH NOCHECK ADD CONSTRAINT  '   +
    @oldConstraintName   +   @objTypeString   +   @clusteredString   +   '  ( '   +   @columnList   + ' ) '
  
   -- 下一个columnlist开始
   select   @columnList   = ''

   insert   into  #tmpTable (sql) values ( @sqlString )
  end
 
  select   @oldTableName   =   @tableName
  select   @oldConstraintName   =   @constraintName
  select   @oldIndexId   =   @indexId
  select   @oldObjType   =   @objType

  select   @columnList   =   @columnList   +   @columnName   +   ' ,  '

     FETCH   NEXT   FROM  myCursor  into   @constraintName ,  @tableName ,  @columnName ,  @indexId ,  @objType
END

select   @columnList   =   substring (  @columnList ,  1 ,  len ( @columnList ) - 1  )
 
 -- 插入最后一条记录
if   @oldIndexId   >   1
  select   @clusteredString   =   '  NONCLUSTERED  '
else
  select   @clusteredString   =   '  CLUSTERED  '  

 if   @oldObjType   =   ' UQ '
  select   @objTypeString   =   '  UNIQUE  '
else  
  select   @objTypeString   =   '  PRIMARY KEY  '   

 select   @sqlString   =   ' alter table  '   +   @oldTableName   +   '  WITH NOCHECK ADD CONSTRAINT  '   +
   @oldConstraintName   +   @objTypeString   +   @clusteredString   +   '  ( '   +   @columnList   + ' ) '
insert   into  #tmpTable (sql) values ( @sqlString )

 CLOSE  myCursor
 DEALLOCATE  myCursor

 select   *   from  #tmpTable
 drop   table  #tmpTable
 GO
SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  ON  
 GO

SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  OFF  
 GO


/*
 生成当前数据库所有存储过程，视图，函数，触发器的脚本
 适用于 Sql Server 2000
 beiqiao（qbboxcn@hotmail.com） 2004/02/29
*/
CREATE   PROCEDURE  sp_create_proc  AS
select  b. text   as  sql  from  sysobjects a,syscomments b  where  a.xtype  in  ( ' TR ' , ' TF ' , ' V ' , ' P ' )  and  a.id  =  b.id  and  a.status  > 0

GO
SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  ON  
 GO

SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  OFF  
 GO


/*
 生成当前数据库所有表的创建脚本
 适用于 Sql Server 2000
 beiqiao（qbboxcn@hotmail.com） 2004/02/29
*/
CREATE   PROCEDURE  sp_create_table  AS
declare   @count   int
declare   @tableName   nvarchar ( 128 ) 
 declare   @columnName   nvarchar ( 128 )
 declare   @columnLength   smallint  
 declare   @isnullable   int  
 declare   @typeName   nvarchar ( 128 )
 declare   @autoval   nvarchar ( 128 )

 declare   @oldTableName   nvarchar ( 128 )
 declare   @sqlString   nvarchar ( 1024 )
 declare   @columnList   nvarchar ( 1024 )

 declare   @identityString   nvarchar ( 128 )

 select   @oldTableName   =   ''
select   @columnList   = ''

create   table  #tmpTable (sql  nvarchar ( 4000 ))

 DECLARE  myCursor   CURSOR   FOR  
 SELECT  a.name  as  tableName, b.name  as  columnName, b.Length  as  columnLength, b.isnullable, c.name  as  typeName, b.autoval 
 from  sysobjects a, syscolumns b, systypes c  
 where  a.xtype  = ' U '    and  a.status  > 0   and  a.id  =  b.id  and  b.xtype  =  c.xtype  -- a.status >0 是为了过滤表dtproperties

OPEN  myCursor

 FETCH   NEXT   FROM  myCursor  into   @tableName , @columnName , @columnLength , @isnullable , @typeName , @autoval

WHILE   @@FETCH_STATUS   =   0
BEGIN

  if   @tableName   <>   @oldTableName   and   @oldTableName   <>   ''
  begin
   -- 删除最后一个逗号
   select   @columnList   =   substring (  @columnList ,  1 ,  len ( @columnList ) - 1  )

   select   @sqlString   =   ' create table  '   +   @oldTableName   +   '  ( '   +   @columnList   + ' ) '
  
   -- 下一个columnlist开始
   select   @columnList   = ''

       insert   into  #tmpTable (sql) values ( @sqlString )
  end
 
  select   @oldTableName   =   @tableName

  select   @columnList   =   @columnList   +   @columnName   +   '   '   +   @typeName
 
  -- 添加数据类型的长度声明
  if   @typeName   =   ' varchar '   or   @typeName   =   ' char '   or   @typeName   =   ' nchar '   or   @typeName   = ' nvarchar '
   select   @columnList   =   @columnList   +   ' ( '   +   rtrim ( ltrim ( str ( @columnLength )))  +   ' ) '

  -- 添加IDENTITY限定
  if   @autoval   is   not   null
  begin
   select   @identityString   =   '  IDENTITY( '   +   ltrim ( rtrim ( str ( IDENT_SEED (  @tableName  ))))  +   ' , '   + ltrim ( rtrim ( str ( IDENT_INCR (  @tableName  ))))  + ' ) '
   select   @columnList   =   @columnList   +   @identityString
  end
 
  -- 添加null限定
  if   @isnullable   =   ' 1 '
   select   @columnList   =   @columnList   +   '  null '
  else
   select   @columnList   =   @columnList   +   '  not null '
 
  -- 逗号分割
  select   @columnList   =   @columnList   +   ' ,  '  

     FETCH   NEXT   FROM  myCursor  into   @tableName , @columnName , @columnLength , @isnullable , @typeName , @autoval
END

-- 插入最后一条记录
select   @columnList   =   substring (  @columnList ,  1 ,  len ( @columnList ) - 1  )
 select   @sqlString   =   ' create table  '   +   @oldTableName   +   '  ( '   +   @columnList   + ' ) '
insert   into  #tmpTable (sql) values ( @sqlString )

 CLOSE  myCursor
 DEALLOCATE  myCursor

 select   *   from  #tmpTable
 drop   table  #tmpTable
 GO
SET  QUOTED_IDENTIFIER  OFF  
 GO
SET  ANSI_NULLS  ON  
 GO

flyskylf
关注
专栏目录
json转换为SQL server建表脚本
09-17
在开发过程中，有时我们需要将JSON数据转化为SQL Server的建表脚本，以便在数据库中创建相应的表结构来存储这些数据。 标题"json转换为SQL server建表脚本"涉及到的主要知识点包括： 1. JSON解析：首先，你需要...
生成sql server2000对象创建脚本的存储过程
11-02 2172
通过读取sysobjects 等系统表的纪录，生成表、视图等数据库对象脚本的存储过程。已知问题：存储过程长度有限制，不能超过8000个字节，因为用来存储sql脚本的变量为varchar型，最大就是8000。-----------------------------------------------------------------------------------------------
SQL CREATE INDEX的用法
guaiguaigirlma的专栏
08-19 4702
索引的命名并没有一个固定的方式。通常会用的方式是在名称前加一个字首，例如 "IDX_" ，来避免与资料库中的其他物件混淆。另外，在索引名之内包括表格名及栏位名也是一个好的方式。
SQLServer之创建存储过程
weixin_34018202的博客
11-01 4075
创建存储过程注意事项 在 SQL Server、 Azure SQL Database、Azure SQL 数据仓库和并行数据库中创建 Transact-SQL 或公共语言运行时 (CLR) 存储过程，存储过程与其他编程语言中的过程类似。 可以在当前数据库中创建永久过程，或者在 tempdb 数据库中创建临时程序。 存储过程可以： 接受输入参数并以输出参数的格式向调用过程或批处理返回多个值。 包含...
SQL2000存储过程的基础教程
天涯 书塾
03-14 2587
存储过程的概念     SQL Server提供了一种方法，它可以将一些固定的操作集中起来由SQL Server数据库服务器来完成，以实现某个任务，这种方法就是存储过程。     存储过程是SQL语句和可选控制流语句的预编译集合，存储在数据库中，可由应用程序通过一个调用执行，而且允许用户声明变量、有条件执行以及其他强大的编程功能。     在SQL Server中存储过程分为两类：即系统提供的存储
Sql Server 中如何将一个数据库生成脚本文件
胖太乙
09-23 1万+
前言 有些人在离职之前，都喜欢把原有自己做的项目做个备份，当然数据库也不例外,不过数据库比较大，而且还都是在联机状态，总不能断开数据库， 然后去拷贝数据库文件吧，这显然是不可能的，下面我就来给大家介绍一种方法， 不需要断开连接， 即可拷贝数据库文件（将数据库生成脚本， 然后执行脚本就又重新生成数据库文件了。） 第一步 数据库右键 -> 任务 -> 生成脚本文件 第二步 选择“选择特定数据库对象” ， 可以全部勾选 第三步 这里需要注意下，高级里面有个选项—要编写脚本的数据库类型，这个选项默
SQLServer导出带数据的脚本
09-18
在 SSMS 中，选择要导出的数据库对象，例如表、视图、存储过程等。可以在对象资源管理器中选择要导出的对象，也可以使用查询编辑器来编写自定义的查询语句。 ### 2. 设置脚本编写选项 在选择对象后，需要设置脚本...
sql server使用临时存储过程实现使用参数添加文件组脚本复用
09-08
在SQL Server中，存储过程是一种预编译的SQL语句集合，可以接受输入参数并返回结果。临时存储过程则是只在当前会话中存在的一种存储过程，它可以在多个批次或查询中重用，但会在会话结束时自动删除。本文将深入探讨...
创建存储过程
weixin_30940783的博客
03-16 335
在MS SQL Server 2000 中，创建一个存储过程有两种方法：一种是使用Transaction-SQL 命令Create Procedure， 另一种是使用图形化管理工具Enterprise Manager。 用Transaction- SQL 创建存储过程是一种较为快速的方法，但对于初学者，使用Enterprise Manager 更易理解，更为简单。当创建存储过程时，需要确定存储过程...
SQL Server 数据库之生成与执行 SQL 脚本
热门推荐
程序员小白的博客
04-14 2万+
生成与执行 SQL 脚本1. 将数据库生成 1. 将数据库生成 使用对象资源管理器能快速创建整个数据的脚本，也能使用默认选项创建单个数据库对象的脚本； 用户能在查询编辑器窗口中对文件或剪贴板创建脚本，脚本以 Unicode 格式创建； 用户也能创建用于创建或删除对象的脚本，有些对象类型具有其他脚本选项，如 ALTER、SELECT、INSERT、UPDATE、DELETE、EXECUTE 操作； ...
vue3+springboot高校学生评教系统[编号：CS_82037](1)源码数据库.zip
09-23
本文介绍了使用SpringBoot作为后端框架，Vue作为前端框架，MyBatis-Plus进行持久层开 。详细描述了系统测试的目的、功能测试案例，包括登录验证和用户管理，以及数据库设计。 前端：vue3 开发工具：IDEA 或者eclipse都支持 编程语言: java 框架：springboot/ssm都支持 jdk版本:jdk1.8以上均可 数据库: mysql 版本不限 数据库工具：Navicat/SQLyog都可以
ASP源码：大家帮网精品装修招标门户网站程序网站源码，网站系统模板源码73.rar
最新发布
09-23
项目工程资源经过严格测试可直接运行成功且功能正常的情况才上传，可轻松copy复刻，拿到资料包后可轻松复现出一样的项目，本人系统开发经验充足（随意编程），有任何使用问题欢迎随时与我联系，我会及时为您解惑，提供帮助 【资源内容】：项目具体内容可查看/点击本页面下方的*资源详情*，包含完整源码+工程文件+说明（若有）等。【若无VIP，此资源可私信获取】 【本人专注IT领域】：有任何使用问题欢迎随时与我联系，我会及时解答，第一时间为您提供帮助 【附带帮助】：若还需要相关开发工具、学习资料等，我会提供帮助，提供资料，鼓励学习进步 【适合场景】：相关项目设计中，皆可应用在项目开发、毕业设计、课程设计、期末/期中/大作业、工程实训、大创等学科竞赛比赛、初期项目立项、学习/练手等方面中 可借鉴此优质项目实现复刻，也可基于此项目来扩展开发出更多功能 #注 1. 本资源仅用于开源学习和技术交流。不可商用等，一切后果由使用者承担 2. 部分字体及插图等来自网络，若是侵权请联系删除，本人不对所涉及的版权问题或内容负法律责任。收取的费用仅用于整理和收集资料耗费时间的酬劳 3. 积分资源不提供使用问题指导/解答
变压器变频器配电柜电路控制原理图CAD施工图纸设备控制图消防泵,喷淋泵电控原理图
09-23
变压器变频器配电柜电路控制原理图CAD施工图纸设备控制图消防泵,喷淋泵电控原理图
【数字信号去噪】基于matlab飞蛾扑火算法MFO-ICEEMDAN信号去躁【含Matlab源码 7598期】.zip
09-23
CSDN海神之光上传的代码均可运行，亲测可用，直接替换数据即可，适合小白； 1、代码压缩包内容 主函数：main.m； 调用函数：其他m文件；无需运行 运行结果效果图； 2、代码运行版本 Matlab 2019b或2023b；若运行有误，根据提示修改；若不会，私信博主； 3、运行操作步骤 步骤一：将所有文件放到Matlab的当前文件夹中； 步骤二：双击打开main.m文件； 步骤三：点击运行，等程序运行完得到结果； 4、仿真咨询 如需其他服务，可私信博主或扫描博客文章底部QQ名片； 4.1 博客或资源的完整代码提供 4.2 期刊或参考文献复现 4.3 Matlab程序定制 4.4 科研合作 功率谱估计： 故障诊断分析： 雷达通信：雷达LFM、MIMO、成像、定位、干扰、检测、信号分析、脉冲压缩 滤波估计：SOC估计 目标定位：WSN定位、滤波跟踪、目标定位 生物电信号：肌电信号EMG、脑电信号EEG、心电信号ECG 通信系统：DOA估计、编码译码、变分模态分解、管道泄漏、滤波器、数字信号处理+传输+分析+去噪（CEEMDAN）、数字信号调制、误码率、信号估计、DTMF、信号检测识别融合、LEACH协议、信号检测、水声通信
电影网站模板系统.rar
09-23
项目工程资源经过严格测试可直接运行成功且功能正常的情况才上传，可轻松copy复刻，拿到资料包后可轻松复现出一样的项目，本人系统开发经验充足（随意编程），有任何使用问题欢迎随时与我联系，我会及时为您解惑，提供帮助 【资源内容】：项目具体内容可查看/点击本页面下方的*资源详情*，包含完整源码+工程文件+说明（若有）等。【若无VIP，此资源可私信获取】 【本人专注IT领域】：有任何使用问题欢迎随时与我联系，我会及时解答，第一时间为您提供帮助 【附带帮助】：若还需要相关开发工具、学习资料等，我会提供帮助，提供资料，鼓励学习进步 【适合场景】：相关项目设计中，皆可应用在项目开发、毕业设计、课程设计、期末/期中/大作业、工程实训、大创等学科竞赛比赛、初期项目立项、学习/练手等方面中 可借鉴此优质项目实现复刻，也可基于此项目来扩展开发出更多功能 #注 1. 本资源仅用于开源学习和技术交流。不可商用等，一切后果由使用者承担 2. 部分字体及插图等来自网络，若是侵权请联系删除，本人不对所涉及的版权问题或内容负法律责任。收取的费用仅用于整理和收集资料耗费时间的酬劳 3. 积分资源不提供使用问题指导/解答
mariadb-11.5.2-winx64.msi
09-23
mariadb-11.5.2-winx64.msi
ASP.NET世界：利用SQL Server 2000构建安全数据存储
在"进入ASP.NET世界-第2部分：使用SQLServer2000创建数据存储层"中，该篇教程详细介绍了如何在ASP.NET解决方案中整合Microsoft SQL Server 2000和Visual Studio .NET 2003技术。首先，通过"简介"部分，回顾了上一...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值