SQL Server将单表数据导出成insert脚本形式

骑猪看日落 2022-06-13 14:21 194阅读 0赞

一、新建存储过程

CREATE PROCEDURE dbo.UspOutputData   
@tablename sysname   
AS   
declare @column **varchar**(**1000**)   
declare @columndata **varchar**(**1000**)   
declare @sql **varchar**(**4000**)   
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=rtrim(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 '\+@tablename\+'('\+@column\+') values(''as ''\--'','\+@columndata\+','')'' from '\+@tablename   
  
print '\--'\+@sql   
exec(@sql)   
  
if @ident is not null   
print 'SET IDENTITY\_INSERT '\+@TableName\+' OFF'   
  
GO

二、使用存储过程

exec UspOutputData 你的表名

三、缺点和问题：

得到导出数据的语句，但image,text,ntext,sql\_variant 列不出现在语句。