首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 计算机考试 > 等级考试 > 考试试题 >

如何为SQLServer表数据生成insert脚本(2)

2009-03-17 
使用SQL Server数据库自带的“生成SQL脚本”工具,可以生成创建表、视图、存储过程等的SQL脚本。

    go
  drop proc proc_insert
  go
  create proc proc_insert (@tablename varchar(256))
  as
  begin
  set nocount on
  declare @sqlstr varchar(4000)
  declare @sqlstr1 varchar(4000)
  declare @sqlstr2 varchar(4000)
  select @sqlstr=select insert +@tablename
  select @sqlstr1=
  select @sqlstr2= (
  select @sqlstr1= values ( +
  select @sqlstr1=@sqlstr1+col++,+ ,@sqlstr2=@sqlstr2+name +, from (select case
  -- when a.xtype =173 then case when +a.name+ is null then null else +convert(varchar(+convert(varchar(4),a.length*2+2)+),+a.name +)+ end
  when a.xtype =104 then case when +a.name+ is null then null else +convert(varchar(1),+a.name +)+ end
  when a.xtype =175 then case when +a.name+ is null then null else +++replace(+a.name+,,) + ++ end
  when a.xtype =61 then case when +a.name+ is null then null else +++convert(varchar(23),+a.name +,121)+ ++ end
  when a.xtype =106 then case when +a.name+ is null then null else +convert(varchar(+convert(varchar(4),a.xprec+2)+),+a.name +)+ end
  when a.xtype =62 then case when +a.name+ is null then null else +convert(varchar(23),+a.name +,2)+ end
  when a.xtype =56 then case when +a.name+ is null then null else +convert(varchar(11),+a.name +)+ end
  when a.xtype =60 then case when +a.name+ is null then null else +convert(varchar(22),+a.name +)+ end
  when a.xtype =239 then case when +a.name+ is null then null else +++replace(+a.name+,,) + ++ end
  when a.xtype =108 then case when +a.name+ is null then null else +convert(varchar(+convert(varchar(4),a.xprec+2)+),+a.name +)+ end
  when a.xtype =231 then case when +a.name+ is null then null else +++replace(+a.name+,,) + ++ end
  when a.xtype =59 then case when +a.name+ is null then null else +convert(varchar(23),+a.name +,2)+ end
  when a.xtype =58 then case when +a.name+ is null then null else +++convert(varchar(23),+a.name +,121)+ ++ end
  when a.xtype =52 then case when +a.name+ is null then null else +convert(varchar(12),+a.name +)+ end
  when a.xtype =122 then case when +a.name+ is null then null else +convert(varchar(22),+a.name +)+ end
  when a.xtype =48 then case when +a.name+ is null then null else +convert(varchar(6),+a.name +)+ end
  -- when a.xtype =165 then case when +a.name+ is null then null else +convert(varchar(+convert(varchar(4),a.length*2+2)+),+a.name +)+ end
  when a.xtype =167 then case when +a.name+ is null then null else +++replace(+a.name+,,) + ++ end
  else null
  end as col,a.colid,a.name
  from syscolumns a where a.id = object_id(@tablename) and a.xtype <>189 and a.xtype <>34 and a.xtype <>35 and a.xtype <>36
  )t order by colid
  select @sqlstr=@sqlstr+left(@sqlstr2,len(@sqlstr2)-1)+) +left(@sqlstr1,len(@sqlstr1)-3)+) from +@tablename
  -- print @sqlstr
  exec( @sqlstr)
  set nocount off
  end
  go
  小干部的:
  create proc spgeninsertsql
  @tablename as varchar(100)
  as
  --declare @tablename varchar(100)
  --set @tablename = orders
  --set @tablename = eeducation
  declare xcursor cursor for
  select name,xusertype
  from syscolumns
  where (id = object_id(@tablename))
  declare @f1 varchar(100)
  declare @f2 integer
  declare @sql varchar(8000)
  set @sql =select insert into + @tablename + values(
  open xcursor
  fetch xcursor into @f1,@f2
  while @@fetch_status = 0
  begin
  set @sql =@sql +
  + case when @f2 in (35,58,99,167,175,231,239,61) then + case when + @f1 + is null then else end + else + end
  + replace(isnull(cast( + @f1 + as varchar),null),,)
  + case when @f2 in (35,58,99,167,175,231,239,61) then + case when + @f1 + is null then else end + else + end
  + char(13) + ,
  fetch next from xcursor into @f1,@f2
  end
  close xcursor
  deallocate xcursor
  set @sql = left(@sql,len(@sql) - 5) + + ) from + @tablename
  print @sql
  exec (@sql)
  小干部的:
  create proc spgeninsertsql
  @tablename as varchar(100)
  as
  --declare @tablename varchar(100)
  --set @tablename = orders
  --set @tablename = eeducation
  declare xcursor cursor for
  select name,xusertype
  from syscolumns
  where (id = object_id(@tablename))
  declare @f1 varchar(100)
  declare @f2 integer
  declare @sql varchar(8000)
  set @sql =select insert into + @tablename + values(
  open xcursor
  fetch xcursor into @f1,@f2
  while @@fetch_status = 0
  begin
  set @sql =@sql +
  + case when @f2 in (35,58,99,167,175,231,239,61) then + case when + @f1 + is null then else end + else + end
  + replace(isnull(cast( + @f1 + as varchar),null),,)
  + case when @f2 in (35,58,99,167,175,231,239,61) then + case when + @f1 + is null then else end + else + end
  + char(13) + ,
  fetch next from xcursor into @f1,@f2
  end
  close xcursor
  deallocate xcursor
  set @sql = left(@sql,len(@sql) - 5) + + ) from + @tablename
  print @sql
  exec (@sql)
  小干部的:
  create proc spgeninsertsql
  @tablename as varchar(100)
  as
  --declare @tablename varchar(100)
  --set @tablename = orders
  --set @tablename = eeducation
  declare xcursor cursor for
  select name,xusertype
  from syscolumns
  where (id = object_id(@tablename))
  declare @f1 varchar(100)
  declare @f2 integer
  declare @sql varchar(8000)
  set @sql =select insert into + @tablename + values(
  open xcursor
  fetch xcursor into @f1,@f2
  while @@fetch_status = 0
  begin
  set @sql =@sql +
  + case when @f2 in (35,58,99,167,175,231,239,61) then + case when + @f1 + is null then else end + else + end
  + replace(isnull(cast( + @f1 + as varchar),null),,)
  + case when @f2 in (35,58,99,167,175,231,239,61) then + case when + @f1 + is null then else end + else + end
  + char(13) + ,
  fetch next from xcursor into @f1,@f2
  end
  close xcursor
  deallocate xcursor
  set @sql = left(@sql,len(@sql) - 5) + + ) from + @tablename
  print @sql
  exec (@sql)

 

3COME考试频道为您精心整理,希望对您有所帮助,更多信息在http://www.reader8.com/exam/

热点排行