Question

asp中实现把数据库文件的复制

把在同一个投票文件夹下的vote.mdb中的数据表复制到“投票数据库.mdb”中，怎么操作？结果如下图所示

Answer 1

如果在本地，可以直接在“投票数据库.mdb里导入vote.mdb里的表
如果是远程，那只能写代码，创建2个conn和 1个rs，每select一条数据同时insert进另一个数据库表中

Answer 2

dim ConnStr,conn,ConnStr2,conn2,db,db2,rs,rs1
db="源数据库.mdb"
db2="目标数据库.mdb"
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connstr
ConnStr2 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db2)
Set conn2 = Server.CreateObject("ADODB.Connection")
conn2.Open connstr2
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from XH_IP order by id asc",conn,1,1
do while not rs.eof
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from yy_ip",conn2,1,3
rs1.addnew
rs1("主题ID")=rs("sid")
rs1("IP地址")=rs("IP")
rs1("投票时间")=rs("vtime")
rs1("选项")=rs("xuanxiang")
rs1.update
rs1.close
set rs1=nothing
rs.movenext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
conn2.close
set conn2=nothing

Answer 3

用update