SQL Server 开发之 复制表数据的SQL脚本生成器(带参数导出)

来源:互联网 发布:linux 同步时区 编辑:程序博客网 时间:2024/05/03 02:30
CREATE PROCEDURE   dbo.OutputData        @tablename   sysname,   @where varchar(2000)  ASdeclare   @column   varchar(8000)     declare   @columndata   varchar(8000)     declare   @sql   varchar(8000)     declare   @xtype   tinyint     declare   @name   sysname     declare   @objectId   int     declare   @objectname   sysname     declare   @ident   int         set   nocount   on     set   @objectId=object_id(@tablename)         if   @objectId   is   null   --   判斷對象是否存在       begin       print   'The   object   not   exists'       return       end       set     @objectname=object_name(@objectId)         if     @objectname   is   null   or   charindex(@objectname,@tablename)=0   --此判断不严密     begin     print   'object   not   in   current   database'     return     end         if   OBJECTPROPERTY(@objectId,'IsTable')   <>   1   --   判斷對象是否是table       begin       print   'The   object   is   not   table'       return       end           select   @ident=status&0x80     from   syscolumns   where   id=@objectid   and   status&0x80=0x80         if   @ident   is   not   null     print   'SET   IDENTITY_INSERT   '+@TableName+'   ON'         declare   syscolumns_cursor   cursor       for   select   c.name,c.xtype   from   syscolumns   c     where   c.id=@objectid     order   by   c.colid     open   syscolumns_cursor     set   @column=''     set   @columndata=''     fetch   next   from   syscolumns_cursor   into   @name,@xtype     while   @@fetch_status   <>-1     begin     if   @@fetch_status<>-2     begin     if   @xtype   not   in(189,34,35,99,98)   --timestamp不需处理,image,text,ntext,sql_variant   暂时不处理     begin     set   @column=@column+case   when   len(@column)=0   then''   else   ','end+@name     set   @columndata=@columndata+case   when   len(@columndata)=0   then   ''   else   ','','','end     +case   when   @xtype   in(167,175)   then   '''''''''+'+@name+'+'''''''''   --varchar,char     when   @xtype   in(231,239)   then   '''N''''''+'+@name+'+'''''''''   --nvarchar,nchar     when   @xtype=61   then   '''''''''+convert(char(23),'+@name+',121)+'''''''''   --datetime     when   @xtype=58   then   '''''''''+convert(char(16),'+@name+',120)+'''''''''   --smalldatetime     when   @xtype=36   then   '''''''''+convert(char(36),'+@name+')+'''''''''   --uniqueidentifier     else   @name   end     end     end         fetch   next   from   syscolumns_cursor   into   @name,@xtype     end     close   syscolumns_cursor     deallocate   syscolumns_cursor         set   @sql='set nocount on select ''insert into '+@tablename+'('+@column+')   values(''as   ''--'','+@columndata+','');''   from   '+@tablename  + ' ' + @where       print   '--'+@sql     exec(@sql)         if   @ident   is   not   null     print   'SET   IDENTITY_INSERT   '+@TableName+'   OFF'
调用时,exec outputdata '表名','条件'
原创粉丝点击