本篇文章给大家分享的是有关如何复制Image字段数据到新表同样的字段内，小编觉得挺实用的，因此分享给大家学习，希望大家阅读完这篇文章后可以有所收获，话不多说，跟着小编一起来看看吧。

10年积累的成都网站建设、成都做网站经验，可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你，你也不认识我。但先网站设计后付款的网站建设流程，更有平房免费网站建设让你可以放心的选择与我们合作。

最近在写一个升级程序，其中要求将一个旧数据库里面的所有的照片都转到新数据库。暂且把旧数据库叫OldDB,新数据库叫NewDB,新数据库里面的字段为【Photo】,旧数据库叫【Picture】 。下面创新互联小编来讲解下如何复制Image字段数据到新表同样的字段内?

如何复制Image字段数据到新表同样的字段内

先读出旧数据库里的数据，然后用insert into插入：

insert into[ table1] values("&rs("Picture")&")

后来发现不行，我以为数据类型搞错了，改了下代码，如下：

insert into[ table1] values(‘"&rs("Picture")&"’)

多加了一对单引号，系统还是提示错误。以下为存储过程:

CENTER>ccid_nobr>

table width="400" border="1" cellspacing="0" cellpadding="2" bordercolorlight = "black" bordercolordark = "#FFFFFF" align="center">

tr>

td bgcolor="e6e6e6" class="code" >

pre>ccid_code>

if exists (select * from dbo.sysobjects

where id = object_id(N'[dbo].[sp_textcopy]')

and OBJECTPROPERTY(id, N'IsProcedure') = 1)

drop procedure [dbo].[sp_textcopy]

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS OFF

GO

CREATE PROCEDURE sp_textcopy (

@srvname varchar (30),

@login varchar (30),

@password varchar (30),

@dbname varchar (30),

@tbname varchar (30),

@colname varchar (30),

@filename varchar (30),

@whereclause varchar (40),

@direction char(1))

AS

DECLARE @exec_str varchar (255)

SELECT @exec_str =

'textcopy /S ' + @srvname +

' /U ' + @login +

' /P ' + @password +

' /D ' + @dbname +

' /T ' + @tbname +

' /C ' + @colname +

' /W "' + @whereclause +

'" /F ' + @filename +

' /' + @direction

EXEC master..xp_cmdshell @exec_str

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

/ccid_code>/pre>

/td>

/tr>

/table>

/ccid_nobr>/CENTER>

这是调用textcopy将图片数据导入和导出的语句，我原打算新旧数据库调用同一个存储过程，旧数据库先将数据导出到硬盘，新数据库在导入。在测试以后，发现不成功，页面显示不出数据，单独用textcopy测试还是可以导出数据的，但在程序中调用，没有成功。我接下来换成下面的存储过程：

CENTER>ccid_nobr>

table width="400" border="1" cellspacing="0" cellpadding="2" bordercolorlight = "black" bordercolordark = "#FFFFFF" align="center">

tr>

td bgcolor="e6e6e6" class="code" >

pre>ccid_code>

if exists (select * from dbo.sysobjects

where id = object_id(N'[dbo].[sp_imageio]')

and OBJECTPROPERTY(id, N'IsProcedure') = 1)

drop procedure [dbo].[sp_imageio]

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS OFF

GO

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

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

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

/ccid_code>/pre>

/td>

/tr>

/table>

/ccid_nobr>/CENTER>

如何复制Image字段数据到新表同样的字段内

这个存储过程，基本原理其实和上面的是一样的。我先测试导出，在程序中运行后，不断刷新保存导出图片的文件夹，发现系统确实产生了数据，以文件+tmp的命名方式存放，但不知道为什么，系统运行完毕，所有的图片还是没有。这条路看来不通。

帖子发出来以后，很快有人回复。但是回复的答案就是我找到的两个存储过程的。看来问题可能无法解决。

但是任务还是的完成，最后万般无奈之下，我给认识的一位大侠发了求救信，他只是提供了一条思路，用流的方式写入。我按照这个思路，抱着试试看的心情，将代码改成如下的样式：

set rs2=Server.CreateObject("Adodb.Recordset")

sql2="select top 1 * from [User] order by UserID desc"

rs2.open sql2,cn,1,3

rs2("Photo").AppendChunk rs("Picture1")

rs2.update

rs2.close

set rs2=nothing

以上就是如何复制Image字段数据到新表同样的字段内，小编相信有部分知识点可能是我们日常工作会见到或用到的。希望你能通过这篇文章学到更多知识。更多详情敬请关注创新互联行业资讯频道。

本文标题：如何复制Image字段数据到新表同样的字段内
文章位置：http://kswjz.com/article/pdchci.html