UC知道谁可以提供用asp查询Access数据库的代码呀?
来源：百度知道 编辑：UC知道 时间：2024/05/22 07:46:58
<%
dim Conn
dim ABC
ABC="DBQ="+server.mappath("mynews.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open"ABC"
s=Request("menu1")
sql="select * from sheet1 where 部门名称="&" '"&s&"'"
Set rs=Conn.Execute(sql)
%>
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 找不到文件 '(未知的)'。
/shujuku/shudeng/admin/shujuku5.asp, 第 8 行
我的access数据库的名称是Conn
dim Conn
dim ABC
ABC="DBQ="+server.mappath("mynews.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open"ABC"
s=Request("menu1")
sql="select * from sheet1 where 部门名称="&" '"&s&"'"
Set rs=Conn.Execute(sql)
%>
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 找不到文件 '(未知的)'。
/shujuku/shudeng/admin/shujuku5.asp, 第 8 行
我的access数据库的名称是Conn
你的问题出在连接数据库代码上~
下边是ASP与ACCESS的连接代码~
===============================================================
ASP与Access数据库连接：
<%@ language=VBs cript%>
<%
dim conn,mdbfile
mdbfile=server.mappath("数据库名称.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=数据库密码;dbq="&mdbfile
%>
===============================================================
具体到你的例子 将conn替换上"数据库名称"即可~
上边是数据库连接的代码;顺便说一下连接后 数据操作的代码:
===============================================================
1.建立记录集对象：
set rs=server.createobject("adodb.recordset")
rs.open SQL语句,conn,*,*(此处为两参数~)
2. 记录集对象的方法：
rs.movenext 将记录指针从当前的位置向下移一行
rs.moveprevious 将记录指针从当前的位置向上移一行
rs.movefirst 将记录指针移到数据表第一行
rs.movelast 将记录指针移到数据表最后一行
rs.absol