100求助!!!!如何把一个库的所有表中记录全部导入到另一个库,这两个库表结构相同~~~

baby21st 2003-11-14 03:16:33
RT

相当于在企业管理器中导入\导出数据一样
不知用SQL语句还能实现?

急~~~

...全文
60 23 打赏 收藏 转发到动态 举报
写回复
用AI写文章
23 条回复
切换为时间正序
请发表友善的回复…
发表回复
baby21st 2003-11-17
  • 打赏
  • 举报
回复
问题解决了,不过不知道是不是很合理

我把 zjcxc(邹建) 的存储过程放在一个库里面,然后在VB中调用

谢谢楼上的各位~~

结帖
baby21st 2003-11-14
  • 打赏
  • 举报
回复
pengdali(大力 V3.0)

我目前的问题就是如何把两个结构相同的库合并成一个库啊

:(


zjcxc(邹建)

在查询分析器中实现了,那我如何在VB中实现呢?
pengdali 2003-11-14
  • 打赏
  • 举报
回复
--------查询分析器写入:

sp_detach_db 你的旧库名 --分离
GO

---拷贝路径一定要对
exec xp_cmdshell 'copy c:\program files\microsoft sql server\mssql\data\你的旧库的文件.mdf c:\program files\microsoft sql server\mssql\data\你的新库的文件.mdf'
go

--附加还原
CREATE DATABASE 你的旧库名
ON PRIMARY (FILENAME = 'c:\program files\microsoft sql server\mssql\data\你的旧库的文件.mdf')
FOR ATTACH
GO

--附加新的库
CREATE DATABASE 你的新库名
ON PRIMARY (FILENAME = 'c:\program files\microsoft sql server\mssql\data\你的新库的文件.mdf')
FOR ATTACH
GO
baby21st 2003-11-14
  • 打赏
  • 举报
回复


做一个数据库的安装程序,用VB,有的库比较大,分成两个库,但最终安装后还是一个库
比如Data1,Data2,安装后的库名为Data,如果Data没有安装,直接附加上去,如果装了Data1,那Data2就不好用附加数据库了~

Data1,Data2都是从MSSQL分离数据库得到的MDF文件

这就是我的问题


pengdali(大力 V3.0) , zjcxc(邹建) ( ) ,lynx1111(任我行:CrazyEnglishing) ...

你们说说这个问题这样的思路还能行得通?


你们倒是说话啊,急死我了~~

zjcxc 元老 2003-11-14
  • 打赏
  • 举报
回复
然后删除所有的代码:

按Ctrl+A,再按Del



删除后,写入下面的语句,将 源数据库 ,改为你要复制的数据, 目标数据库 改为你接收数据复制的数据库.:
exec p_copydb '源数据库','目标数据库'
zjcxc 元老 2003-11-14
  • 打赏
  • 举报
回复
打开查询分析器,复制下面的代码.按F5执行


/*--数据库数据复制

将一个数据库中的数据复制到另一个数据库
如果某列在目标数据库中为标识列,将不会被复制

适用范围:数据库结构发生了变化,想将旧数据库进行升级
这样就可以根据新的数据库结构创建一个空库,然后
将旧数据库的所有数据复制到新库中
--邹建 203.10--*/

/*--调用示例

exec p_copydb '源数据库','目标数据库'
exec p_copydb 'acc_五医','acc_演示数据8'
--*/

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

create proc p_copydb
@o_dbname sysname, --要复制数据的数据库--源数据库
@n_dbname sysname, --接收数据的数据库--目标数据库
@cleardb bit=0 --清空目标数据库
as
declare @sql nvarchar(4000)

--禁用约束,防止复制时的数据冲突
set @sql='declare #tbc cursor for select name,tbname=object_name(parent_obj)
from '+@n_dbname+'..sysobjects where xtype in(''C'',''F'')'
exec(@sql)
declare @name sysname,@tbname sysname
open #tbc
fetch next from #tbc into @name,@tbname
while @@fetch_status=0
begin
set @sql='alter table '+@n_dbname+'..['+@tbname+'] NOCHECK CONSTRAINT ['+@name+']'
exec(@sql)
fetch next from #tbc into @name,@tbname
end
close #tbc

--复制数据
declare @sql1 varchar(8000)
set @sql='declare #tb cursor for select a.name from '
+@o_dbname+'..sysobjects a inner join '
+@n_dbname+'..sysobjects b on a.name=b.name
where a.xtype=''U'' and b.xtype=''U'''
exec(@sql)
open #tb
fetch next from #tb into @tbname
while @@fetch_status=0
begin
select @sql1=''
,@sql='select @sql1=@sql1+'',[''+a.name+'']'' from(
select name from '+@o_dbname+'..syscolumns where id in
(select id from '+@o_dbname+'..sysobjects where name='''+@tbname+''')
) a inner join (
select name from '+@n_dbname+'..syscolumns where status<>0x80 and id in
(select id from '+@n_dbname+'..sysobjects where name='''+@tbname+''')
) b on a.name=b.name'
exec sp_executesql @sql,N'@sql1 nvarchar(4000) out',@sql1 out

select @sql1=substring(@sql1,2,8000)
exec('insert into '+@n_dbname+'..['+@tbname+']('+@sql1
+') select '+@sql1+' from '+@o_dbname+'..['+@tbname+']')
if @@error<>0
print('insert into '+@n_dbname+'..['+@tbname+']('+@sql1
+') select '+@sql1+' from '+@o_dbname+'..['+@tbname+']')
fetch next from #tb into @tbname
end
close #tb
deallocate #tb

--数据复制完成后启用约束
open #tbc
fetch next from #tbc into @name,@tbname
while @@fetch_status=0
begin
set @sql='alter table '+@n_dbname+'..['+@tbname+'] CHECK CONSTRAINT ['+@name+']'
exec(@sql)
fetch next from #tbc into @name,@tbname
end
close #tbc
deallocate #tbc
go



baby21st 2003-11-14
  • 打赏
  • 举报
回复
exec sp_MSForEachTable 'insert 目标库名..? select * from ?'

两个?指什么啊?
源库名在哪?

求求你们还能写段小完整的代码~~

唉~~~
zezejun 2003-11-14
  • 打赏
  • 举报
回复
pengdali 2003-11-14
  • 打赏
  • 举报
回复

开始菜单-->打开sqlserver查询分析器-->写入:
use 你的数据库
go
exec sp_MSForEachTable 'insert 目标库名..? select * from ?'

-->按F5执行
baby21st 2003-11-14
  • 打赏
  • 举报
回复
是想求一个SQL脚本

exec sp_MSForEachTable 'insert 目标库名..? select * from ?'

这个怎么用?
zjcxc 元老 2003-11-14
  • 打赏
  • 举报
回复
那不好办.你应该用脚本的方法.
baby21st 2003-11-14
  • 打赏
  • 举报
回复
Data1,Data2都是从SQL分离出来的MDF文件~~
baby21st 2003-11-14
  • 打赏
  • 举报
回复
不好意思,真的没有用过存储过程:(
目前的问题是:

做一个数据库的安装程序,用VB,有的库比较大,分成两个库,但最终安装后还是一个库
比如Data1,Data2,安装后的库名为Data,如果Data没有安装,直接附加上去,如果装了Data1,那Data2就不好用附加数据库了~:(这就是我的问题

能请楼上兄弟们写一段代码吗?
我没有用过存储过程,上面的不会用:(

谢谢各位~~~
太空11 2003-11-14
  • 打赏
  • 举报
回复
exec sp_MSForEachTable 'insert 目标库名..? select * from ?'
lynx1111 2003-11-14
  • 打赏
  • 举报
回复
楼主连存储过程都没用过,他看得懂邹建的贴吗???贴着有什么用?热心过渡!!!


楼主用这个吧:
先把表中indentity设置为"否"
insert into hy(hyid,name,number)select hyid,name,number from 数据库2.dbo.hy
另外要注意外键关系
zjcxc 元老 2003-11-14
  • 打赏
  • 举报
回复
参考我的贴子:

数据迁移
http://expert.csdn.net/Expert/topic/2403/2403537.xml?temp=.6569178
zjcxc 元老 2003-11-14
  • 打赏
  • 举报
回复

/*--数据库数据复制

将一个数据库中的数据复制到另一个数据库
如果某列在目标数据库中为标识列,将不会被复制

适用范围:数据库结构发生了变化,想将旧数据库进行升级
这样就可以根据新的数据库结构创建一个空库,然后
将旧数据库的所有数据复制到新库中
--邹建 203.10--*/

/*--调用示例

exec p_copydb '源数据库','目标数据库'
exec p_copydb 'acc_五医','acc_演示数据8'
--*/

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

create proc p_copydb
@o_dbname sysname, --要复制数据的数据库--源数据库
@n_dbname sysname, --接收数据的数据库--目标数据库
@cleardb bit=0 --清空目标数据库
as
declare @sql nvarchar(4000)

--禁用约束,防止复制时的数据冲突
set @sql='declare #tbc cursor for select name,tbname=object_name(parent_obj)
from '+@n_dbname+'..sysobjects where xtype in(''C'',''F'')'
exec(@sql)
declare @name sysname,@tbname sysname
open #tbc
fetch next from #tbc into @name,@tbname
while @@fetch_status=0
begin
set @sql='alter table '+@n_dbname+'..['+@tbname+'] NOCHECK CONSTRAINT ['+@name+']'
exec(@sql)
fetch next from #tbc into @name,@tbname
end
close #tbc

--复制数据
declare @sql1 varchar(8000)
set @sql='declare #tb cursor for select a.name from '
+@o_dbname+'..sysobjects a inner join '
+@n_dbname+'..sysobjects b on a.name=b.name
where a.xtype=''U'' and b.xtype=''U'''
exec(@sql)
open #tb
fetch next from #tb into @tbname
while @@fetch_status=0
begin
select @sql1=''
,@sql='select @sql1=@sql1+'',[''+a.name+'']'' from(
select name from '+@o_dbname+'..syscolumns where id in
(select id from '+@o_dbname+'..sysobjects where name='''+@tbname+''')
) a inner join (
select name from '+@n_dbname+'..syscolumns where status<>0x80 and id in
(select id from '+@n_dbname+'..sysobjects where name='''+@tbname+''')
) b on a.name=b.name'
exec sp_executesql @sql,N'@sql1 nvarchar(4000) out',@sql1 out

select @sql1=substring(@sql1,2,8000)
exec('insert into '+@n_dbname+'..['+@tbname+']('+@sql1
+') select '+@sql1+' from '+@o_dbname+'..['+@tbname+']')
if @@error<>0
print('insert into '+@n_dbname+'..['+@tbname+']('+@sql1
+') select '+@sql1+' from '+@o_dbname+'..['+@tbname+']')
fetch next from #tb into @tbname
end
close #tb
deallocate #tb

--数据复制完成后启用约束
open #tbc
fetch next from #tbc into @name,@tbname
while @@fetch_status=0
begin
set @sql='alter table '+@n_dbname+'..['+@tbname+'] CHECK CONSTRAINT ['+@name+']'
exec(@sql)
fetch next from #tbc into @name,@tbname
end
close #tbc
deallocate #tbc
go


baby21st 2003-11-14
  • 打赏
  • 举报
回复
不好意思,我还没有用过存储过程,还能写段调用存储过程的代码
万分谢谢~~~
lynx1111 2003-11-14
  • 打赏
  • 举报
回复
exec sp_MSForEachTable 'insert 目标库名..? select * from ?'
samuelpan 2003-11-14
  • 打赏
  • 举报
回复
select ' set identity_insert on' as t
union
select ' go'
union
select 'insert into [目标库名]..'+name+' select * from name' from sysobjects where type='u'
union
select 'set identity_insert off'
union
select 'go'

将结果拿来运行
加载更多回复(3)

34,499

社区成员

发帖
与我相关
我的任务
社区描述
MS-SQL Server相关内容讨论专区
社区管理员
  • 基础类社区
  • 二月十六
  • 卖水果的net
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧