QL code
use test
GO
declare @tablename varchar(100)
declare @sql varchar(1000)
declare cur cursor
 for
select [name] from openrowset('sqloledb','127.0.0.1';'sa';'sa',test.dbo.sysobjects) where xtype='U'
open cur
fetch next from cur into @tablename
while (@@Fetch_status=0)
begin
    set @sql = 'insert into '+@tablename+' select *  from openrowset(''sqloledb'',''127.0.0.1'';''sa'';''sa'',test.dbo.'+@tablename+')'
    exec(@sql)
    fetch next from cur into @tablename
end
close cur
deallocate cur



前提是test库已存在，并且与源数据库结构一样，表已存在，只是导入数据 
如果要创建新库，导入所有的表及存储过程，视图，函数之类的，需做适当修改









SQL code/********************导整个数据库*****************************/ 


用bcp实现的存储过程 


/* 
 实现数据导入/导出的存储过程 
         根据不同的参数,可以实现导入/导出整个数据库/单个表 
 调用示例: 
--导出调用示例 
----导出单个表 
exec file2table ’zj’,’’,’’,’xzkh_sa..地区资料’,’c:\zj.txt’,1 
----导出整个数据库 
exec file2table ’zj’,’’,’’,’xzkh_sa’,’C:\docman’,1 


--导入调用示例 
----导入单个表 
exec file2table ’zj’,’’,’’,’xzkh_sa..地区资料’,’c:\zj.txt’,0 
----导入整个数据库 
exec file2table ’zj’,’’,’’,’xzkh_sa’,’C:\docman’,0 


*/ 
if exists(select 1 from sysobjects where name=’File2Table’ and objectproperty(id,’IsProcedure’)=1) 
 drop procedure File2Table 
go 
create procedure File2Table 
@servername varchar(200)  --服务器名 
,@username varchar(200)   --用户名,如果用NT验证方式,则为空’’ 
,@password varchar(200)   --密码 
,@tbname varchar(500)   --数据库.dbo.表名,如果不指定:.dbo.表名,则导出数据库的所有用户表 
,@filename varchar(1000)  --导入/导出路径/文件名,如果@tbname参数指明是导出整个数据库,则这个参数是文件存放路径,文件名自动用表名.txt 
,@isout bit      --1为导出,0为导入 
as 
declare @sql varchar(8000) 


if @tbname like ’%.%.%’ --如果指定了表名,则直接导出单个表 
begin 
 set @sql=’bcp ’+@tbname 
  +case when @isout=1 then ’ out ’ else ’ in ’ end 
  +’ "’+@filename+’" /w’ 
  +’ /S ’+@servername 
  +case when isnull(@username,’’)=’’ then ’’ else ’ /U ’+@username end 
  +’ /P ’+isnull(@password,’’) 
 exec master..xp_cmdshell @sql 
end 
else 
begin --导出整个数据库,定义游标,取出所有的用户表 
 declare @m_tbname varchar(250) 
 if right(@filename,1)<>’\’ set @filename=@filename+’\’ 


 set @m_tbname=’declare #tb cursor for select name from ’+@tbname+’..sysobjects where xtype=’’U’’’ 
 exec(@m_tbname) 
 open #tb 
 fetch next from #tb into @m_tbname 
 while @@fetch_status=0 
 begin 
  set @sql=’bcp ’+@tbname+’..’+@m_tbname 
   +case when @isout=1 then ’ out ’ else ’ in ’ end 
   +’ "’+@filename+@m_tbname+’.txt " /w’ 
   +’ /S ’+@servername 
   +case when isnull(@username,’’)=’’ then ’’ else ’ /U ’+@username end 
   +’ /P ’+isnull(@password,’’) 
  exec master..xp_cmdshell @sql 
  fetch next from #tb into @m_tbname 
 end 
 close #tb 
 deallocate #tb  
end 
go 







SQL code
insert into tb_CustomerInfo2 select *from openrowset('sqloledb','192.168.0.250';'mem';'mem',mjn_bj2.dbo.tb_CustomerInfo_2)

------解决方案--------------------

还有一个，SQL2005备份还原SQL2000
SQL code

--重新建立一个与之前相同的数据库然后 

restore database yourdb from disk='bak文件地址' with replace

use master 
go 

restore database rqhf from disk='d:\rqhf_db_200806180100.BAK' with replace

------解决方案--------------------

SQL2005可以直接连接sql2000，用ssis或者 链接服务器

------解决方案--------------------
用ssis