萬盛學電腦網

 萬盛學電腦網 >> 數據庫 >> mysql教程 >> sql 二進制文件的導入導出

sql 二進制文件的導入導出

   /*--bcp-二進制文件的導入導出

  支持image,text,ntext字段的導入/導出

  image適合於二進制文件;text,ntext適合於文本數據文件

  注意:導入時,將覆蓋滿足條件的所有行

  導出時,將把所有滿足條件的行也出到指定文件中

  此存儲過程僅用bcp實現

  鄒建 2003.08-----------------*/

  /*--調用示例

  --數據導出

  exec p_binaryIO 'zj','','','acc_演示數據..tb','img','c:zj1.dat'

  --數據導出

  exec p_binaryIO 'zj','','','acc_演示數據..tb','img','c:zj1.dat','',0

  --*/

  if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_binaryIO]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)

  drop procedure [dbo].[p_binaryIO]

  GO

  Create proc p_binaryIO

  @servename varchar (30),--服務器名稱

  @username varchar (30), --用戶名

  @password varchar (30), --密碼

  @tbname varchar (500), --數據庫..表名

  @fdname varchar (30), --字段名

  @fname varchar (1000), --目錄+文件名,處理過程中要使用/覆蓋:@filename+.bak

  @tj varchar (1000)='', --處理條件.對於數據導入,如果條件中包含@fdname,請指定表名前綴

  @isout bit=1 --1導出((默認),0導入

  AS

  declare @fname_in varchar(1000) --bcp處理應答文件名

  ,@fsize varchar(20) --要處理的文件的大小

  ,@m_tbname varchar(50) --臨時表名

  ,@sql varchar(8000)

  --則取得導入文件的大小

  if @isout=1

  set @fsize='0'

  else

  begin

  create table #tb(可選名 varchar(20),大小 int

  ,創建日期 varchar(10),創建時間 varchar(20)

  ,上次寫操作日期 varchar(10),上次寫操作時間 varchar(20)

  ,上次訪問日期 varchar(10),上次訪問時間 varchar(20),特性 int)

  insert into #tb

  exec master..xp_getfiledetails @fname

  select @fsize=大小 from #tb

  drop table #tb

  if @fsize is null

  begin

  print '文件未找到'

  return

  end

  end

  --生成數據處理應答文件

  set @m_tbname='[##temp'+cast(newid() as varchar(40))+']'

  set @sql='select * into '+@m_tbname+' from(

  select null as 類型

  union all select 0 as 前綴

  union all select '+@fsize+' as 長度

  union all select null as 結束

  union all select null as 格式

  ) a'

  exec(@sql)

  select @fname_in=@fname+'_temp'

  ,@sql='bcp "'+@m_tbname+'" out "'+@fname_in

  +'" /S"'+@servename

  +case when isnull(@username,'')='' then ''

  else '" /U"'+@username end

  +'" /P"'+isnull(@password,'')+'" /c'

  exec master..xp_cmdshell @sql

  --刪除臨時表

  set @sql='drop table '+@m_tbname

  exec(@sql)

  if @isout=1

  begin

  set @sql='bcp "select top 1 '+@fdname+' from '

  +@tbname+case isnull(@tj,'') when '' then ''

  else ' where '+@tj end

  +'" queryout "'+@fname

  +'" /S"'+@servename

  +case when isnull(@username,'')='' then ''

  else '" /U"'+@username end

  +'" /P"'+isnull(@password,'')

  +'" /i"'+@fname_in+'"'

  exec master..xp_cmdshell @sql

  end

  else

  begin

  --為數據導入准備臨時表

  set @sql='select top 0 '+@fdname+' into '

  +@m_tbname+' from ' +@tbname

  exec(@sql)

  --將數據導入到臨時表

  set @sql='bcp "'+@m_tbname+'" in "'+@fname

  +'" /S"'+@servename

  +case when isnull(@username,'')='' then ''

  else '" /U"'+@username end

  +'" /P"'+isnull(@password,'')

  +'" /i"'+@fname_in+'"'

  exec master..xp_cmdshell @sql

  --將數據導入到正式表中

  set @sql='update '+@tbname

  +' set '+@fdname+'=b.'+@fdname

  +' from '+@tbname+' a,'

  +@m_tbname+' b'

  +case isnull(@tj,'') when '' then ''

  else ' where '+@tj end

  exec(@sql)

  --刪除數據處理臨時表

  set @sql='drop table '+@m_tbname

  end

  --刪除數據處理應答文件

  set @sql='del '+@fname_in

  exec master..xp_cmdshell @sql

  go

copyright © 萬盛學電腦網 all rights reserved