存储过程读取非二进制文件的问题

Question

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/*--bcp 实现二进制文件的导入导出    支持image,text,ntext字段的导入/导出
    image适合于二进制文件,包括:Word文档,Excel文档,图片,音乐等
    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
--*/
Create proc p_binaryIO
@servename varchar (30),--服务器名称
@username varchar (30), --用户名
@password varchar (30),    --密码
@tbname varchar (500),     --数据库..表名
@fdname varchar (30),     --字段名
@fname varchar (1000),    --目录+文件名,处理过程中要使用/覆盖:@filename+_temp
@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
    endend--生成数据处理应答文件
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

Answer 1

/*--bcp 实现二进制文件的导入导出 支持image,text,ntext字段的导入/导出
image适合于二进制文件,包括:Word文档,Excel文档,图片,音乐等
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]
GOCreate proc p_binaryIO
@servename varchar (30),--服务器名称
@username varchar (30), --用户名
@password varchar (30), --密码
@tbname varchar (500),  --数据库..表名
@fdname varchar (30),  --字段名
@fname varchar (1000), --目录+文件名,处理过程中要使用/覆盖:@filename+_temp
@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
endend--生成数据处理应答文件
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 @sqlgo

Answer 2

二进制文件存取示例(T-SQL)--创建保存文件的表
USE tempdbCREATE TABLE dbo.tb(id int IDENTITY,img image)
GO--1. 将文件保存到上面的表中的处理
--定义要保存到数据库中的文件
DECLARE @FileName nvarchar(260)
SET @FileName='c:\boot.ini'--获取要保存的文件的大小
CREATE TABLE #(a nvarchar(20),Size int,c char(8),d char(6),e char(8),f char(6),g char(8),h char(6),i int)
INSERT # EXEC master..xp_getfiledetails @FileName--生成BCP实用工具处理用的格式文件
DECLARE @s nvarchar(4000)
SELECT @s='BCP "SELECT ''8.0'' UNION ALL SELECT ''1'' UNION ALL SELECT ''1 SQLIMAGE 0 '
+RTRIM(Size)+' ''+CHAR(34)+CHAR(34)+'' 2 img ''+CHAR(34)+CHAR(34)'
+'" QUERYOUT c:\bcp.fmt /T /c'
FROM #
EXEC master..xp_cmdshell @s--运用上面生成的格式文件保存文件到数据库中
SET @s='BCP tempdb.dbo.tb IN '+@FileName+' /T /f c:\bcp.fmt'
EXEC master..xp_cmdshell @s
GO
/*===================================================*/--2. 将数据库中保存的文件数据提取出来，保存为磁盘上的文件
DECLARE @s nvarchar(4000)
SELECT @s='BCP "SELECT ''8.0'' UNION ALL SELECT ''1'' UNION ALL SELECT ''1 SQLIMAGE 0 0 ''+CHAR(34)+CHAR(34)+'' 1 img ''+CHAR(34)+CHAR(34)" QUERYOUT c:\bcp.fmt /T /c'
EXEC master..xp_cmdshell @s--运用上面生成的格式文件读取数据库中的数据保存为文件
SET @s='BCP "SELECT TOP 1 img FROM tempdb.dbo.tb " QUERYOUT c:\a.ini /T /f c:\bcp.fmt'
EXEC master..xp_cmdshell @s

Answer 3

高手真多啊、非常感谢现在又出现个问题，提示Error = [Microsoft][SQL Native Client]无法打开 BCP 主数据文件
主要是什么原因造成的呢？ 服务器，帐号密码都正确。用 -T 也是这个结果

Answer 4

还有 找不到存储过程 'master..xp_getfiledetails' ，