用Jet4.0连接access数据库语句

来源：百度知道 编辑：UC知道 时间：2024/05/19 12:59:13
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("/datebase/a.mdb")
set conn=server.CreateObject("ADODB.connection")
conn.open connstr,1,1
这样对吗、？

参考：
在Access里面的VBA，写代码连接数据的：
Dim dbs As Database, rs As Recordset
Set dbs = OpenDatabase(CurrentProject.FullName)
Set rs = dbs.OpenRecordset("Select * from 表")

其他方式连接字符串：
Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=D:\xxxx\xxxxx.mdb;Mode=Share Deny None;Extended Properties="";Persist Security Info=False;Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=0;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk

dim conn,db
dim connstr
db="data.accdb" '数据库文件位置
on error resume next
'connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

connstr="provider=Microsoft.Jet.OLEDB.4.0;data source="&Server.MapPath(""&db&"")

set conn