求救啊,asp连接access出错(windows2003 server)

chinazds 2004-04-10 10:45:34

请高手帮忙,我用asp连接access时出错,请高手们给出解决的办法啊!(就15分了全给压上了)

Microsoft OLE DB Provider for ODBC Drivers error '80040e21'

ODBC driver does not support the requested properties.
...全文
83 点赞 收藏 4
写回复
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
whb147 2004-04-12
1) 用SET建立连接对象
set cnobj = Server.CreateObject("ADODB.Connection")
2)给出数据库驱动的生产厂商和版本号以及你的ACCESS数据库所在的位置
strcon="provider=microsoft.jet.oledb.4.0;data source="&Server.MapPath("/wang/data/bbs.mdb")
记住:strcon是字符串变量你可以随便给,server.mappath是取数据库的磁盘路径,后面所跟的一定是站点路经。
本句也可以写成:
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ="&Server.MapPath("("/wang/data/bbs.mdb")
3)用链接对象的OPEN方法打开数据库
cnobj.Open strcon
到此连接完成,后面就是建立记录集对象了,如:
set rstobj=server.createobject("adodb.recordset") '此句用SET语句建立记录集对象RSTOBJ
set rstobj=cnobj.execute("select * from users") '此句利用cnobj对象的execute方法执行SELECT查询语句,users是库中的表名称
带密码的连接:
Conn1.Open "Provider=Microsoft.JET.OLEDB.3.51;" & _
"Data Source=G:\ComponentSource\DBFiles\CSMain\CSMain.mdb;" &
"Jet OLEDB:Database Password=outlook"
回复
threezxw 2004-04-12
dim conn
dim rs
set conn=server.createobject("adodb.connection")
conn.open "Driver={microsoft access driver (*.mdb)}; dbq="& server.mappath("your.mdb")
set rs=server.createobject("adodb.recordset")
rs.open"select * from dls where 姓名='"&a(0)&"'and 地址='"&a(1)&"' and 公司='"&a(2)&"'",conn

用ado链接。
回复
jiffer 2004-04-12
3) 用实际的数据库绝对路径连接:
<%
Set conn = Server.CreateObject("ADODB.Connection")
Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "
Strconn=Strconn & "DBQ=e:\yanhang\database.mdb"
conn.Open Strconn
%>

4) 用实际的数据库相对路径连接:
<%
Set conn = Server.CreateObject("ADODB.Connection")
Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "
Strconn=Strconn & "DBQ=" & Server.MapPath("/database/yanhang.mdb")
conn.Open Strconn
%>
回复
zl13 2004-04-10
<%
dim startime,endtime,conn,connstr,db
startime=timer()
'更改数据库名字
db="./data/mydata.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
'connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)&";Jet OLEDB:Database Password=freefly;"
'connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'response.write connstr
'如果你的服务器采用较老版本Access驱动,请用下面连接方法
connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
conn.Open connstr
function CloseDatabase
Conn.close
Set conn = Nothing
End Function
%>
回复
发动态
发帖子
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
社区公告
暂无公告