SQL Server生成insert语句存储过程

有时候在SQL Server里面做数据导出感觉不太方便,特别是只导出部分数据的时候,写了一个存储过程来导出数据,支持where条件。

CREATE PROCEDURE   [dbo].[OutputData]        
  @tablename   sysname,     
@where varchar(2000)  
  AS  
declare   @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'  

GO


本文作者:云顶宝藏

本文链接:https://qdxxwl.cn/post/16.html

版权声明:本篇文章于2020-05-06,由云顶宝藏发表,转载请注明出处:知点星。如有疑问,请联系我们

Unity3d粒子特效资源02

发表评论

取消
扫码支持