网站首页 - 招生考试 - 复习资料 - 男生 - 女生 - 文学 - 创业 - 毕业论文 - 人才就业 - 家教 - 性教育 - 招聘会- 留学 - 校园 - 大学生论坛 - 高校 - 范文
自考群:11172260
考研群:32269935
专接本:17855970
  河北大学生网 >> 电脑学院 >> 服务器技术 >> SQL Server >> 正文
河北考试论坛

将表数据生成SQL脚本的存储过程

http://www.hbdxs.com 2006-8-18 13:33:02 来源:网络收集 点击

  将表数据生成SQL脚本的存储过程:
  
  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 你的表名
服务器应用:用typsoft ftp建FTP站点2(图)…
SOHO族安全建议之保证上传服务器安全一
SOHO族安全建议之保证上传服务器安全二
怎样配置具有SSL保护的FTP服务器

  精彩推荐           [图话校园] [男生宿舍] [女生宿舍] [青春隐私] [帅哥靓妹]

高校代写论文成风 如何遏制研究生有

大二女生曝光激情照 称是美好回忆(…

劣质人造处女膜可致终身不育

教育部发布2008年第1号留学预警 慎

青春·校园

大二女生曝光激情照 称是美好回忆(图)…

为什么校园都是晃动的大腿 湖大男生抗议…

美女,你的裙子可以往下拽点吗?

校花干得土得掉渣的事
热门新闻
 “90后”富家女网上显摆私生活 零花钱成捆秀
 准大学生狂玩还是充电
 "全国校园新趋势" 美国大学流行男女同寝室
 高校代写论文成风 如何遏制研究生有偿论文现象?
 不属劳动法保护对象 大学生暑期打工遇维权真空
 2008省直事业单位招聘考试时间顺延至10月19日
 买一份盖好章的社会实践报告
 大学生假期求职应提防黑职介 职介需具备三证
 富翁校园征婚:炫富还是寻爱?
 宽容看待女大学生热衷嫁“豪门”
性教育
 不知和未来室友怎样相处 准大学生上网求良方
 性教育课小女生不敢提问的尴尬说明了什么?
 广州大学生性观念抽样调查出炉 近半不介意贞操
 早期性行为和缺乏性教育危及肯尼亚青少年
 成人漫画取材青春期性话题 读者青睐家长担忧
 高校开性健康课受学生欢迎 1小时名额即报满
 劣质人造处女膜可致终身不育
 为什么我觉得自己在公司是可有可无的?
 浙大“婚前守贞”培训全记录
 女大学生性教育读本疯传,校方在哪
关于本站 | 服务声明 | SITEMAP | 联系方式 | 广告服务 | 网站地图 | 友情链接 |
本站所刊资料部分为网上收集,如果确实侵犯了您的版权,请通知我们。
版权所有:河北大学生网 邮件:
备案编号:冀ICP备06003390
命运 天使 日不落 丁香花 拉拉爱 手机之家 自由飞翔 非主流音乐 做你的爱人 感动天感到地 最后一次的温柔 遇上你是我的缘 断点 下辈子不做女人 会有天使替我爱你
放生 彩虹 校园网 舍不得 不值得 你的承诺 老人与海 等爱的玫瑰 会呼吸的痛 玫瑰花的葬礼 怎么会狠心伤害我 听着情歌流眼泪 流行音乐 有没有人告诉你 歌曲 葬爱
白狐 光荣 摇啊摇 换换爱 坏女人 为你写诗 好听的歌 爱死了昨天 外滩十八号 北极星的眼泪 爱上你是我的错 不要在我寂寞的时候说爱我 迅雷影视 单身情歌 新不了情
红日 火花 有缘人 女人花 青花瓷 边做边爱 电子杂志 依然在一起 一定要爱你 对不起我爱你 我爱你你却爱着他 做我老婆好不好 左眼皮跳跳 大海 123木头人 天使的翅膀
承诺 左边 爱转角 大悲咒 小乌龟 擦肩而过 河北大学 爱在离别时 范跑跑之歌 我是真的爱你 找个好人就嫁了吧 爱情里没有谁对谁错 MP3 音乐在线 爱上你是一个错 星星