广元万瑞科技有限公司:连接两个数据库，高手请进``

来源：百度文库编辑：高考问答时间：2024/04/27 21:59:44

<%
'dim conn
'dim connstr

'Set conn = Server.CreateObject("ADODB.Connection")
'connStr="Provider=SQLOLEDB.1; Persist Security Info=True; Data Source=127.0.0.1; Initial Catalog=数据库名; User ID=用户名; Password=密码"
'conn.Open connstr

connstr="DBQ="+server.mappath("../data/#tx38.com.asa")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%><%
function chkcookie(fString)
fString = replace(fString, "'", "")
fString = replace(fString, " ", "")
chkcookie = fString
end function

%>
我想在连一个数据库lsdfj.mdb怎么办？

写一个过程不就好了
<%
'////conn.asp
dim conn
dim connstr
Public Sub OpenDataBase(dbfile)
dim p
p=Server.MapPath(dbfile)
connstr="DBQ="+server.mappath(p)+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
Ens Sub
%>
'//////////////////////
'demo.asp
<%
'打开数据库
Call OpenDataBase("lsdfj.mdb")'路径自己设
dim sql
sql="SELECT * FROM [..]"
set rs =Server.createObject("Adodb.Recordset")
rs.open sql,conn,1,1
.......
'接下来关闭数据连接
rs.close
set rs = nothing
conn.close
set conn =nothing
%>

连接两个数据库，高手请进`` 连接两个数据库，高手请进 vb连接access数据库的字符串问题（高手请进）请问两个数据库怎么连接？请问两个数据库怎么连接?？数据库高手请进数据库高手请进.... 数据库高手请进！数据库高手请进! 数据库高手请进！！