把SQL SERVER里表里的数据导出成为insert into 脚本

 

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=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   列不出现在语句,以后改进。  
来源:http://www.cnblogs.com/cheatlove/archive/2007/08/23/867427.html
posted @ 2007-08-25 19:26  fisherman  阅读(323)  评论(0)    收藏  举报