有关利用ASP实现数据库转移的问题
来源：
互联网
日期：2006-12-11
<%
dim conn,conn1,connstr,connstr1 ,rs '这里多定义了一个变量
set conn=server.createobject("adodb.Connection")
set rs=server.createobject("adodb.recordset") '这里要初始化rs对象
connstr="provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("main.mdb")
conn.Open connstr '连接第一个数据库
set conn1=server.createobject("adodb.Connection")
connstr1="provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("main2.mdb" )
conn1.Open connstr1 '连接第二个数据库
strsql="select * from [user]"
set rs=conn.execute(strsql) '从第一个数据库的USER表中搜索
do while not rs.eof
strsql1="insert into user2(name,pwd)values('"&rs("xm")&"','"&rs("xh")&"')"
conn1.execute(strsql1) '注意这里是conn1,不是conn
rs.movenext
loop
rs.close
set rs=nothing
%>
更多的有关利用ASP实现数据库转移的问题请到论坛查看: http://BBS.TC711.COM
【 双击滚屏 】 【 评论 】 【 收藏 】 【 打印 】 【 关闭 】
来源：
互联网
日期：2006-12-11
|
|
|
