UC知道请各位仁兄帮忙看看,是查询数据库的一段代码.在线等待.十分感谢!是不是数据库名称不对呀?
来源：百度知道 编辑：UC知道 时间：2024/09/23 05:56:01
<%
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
<％For i=0 TO 7％>
<td size=1> <b>< ％=rs(i).Name％ ></b>
<td><％Next％>
<tr>
<％Do While Not rs.EOF%>
<tr>
<％For i=0 TO 7％>
<td size=1>< ％=rs("i")％ ><td>
<％Next％>
&l
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
<％For i=0 TO 7％>
<td size=1> <b>< ％=rs(i).Name％ ></b>
<td><％Next％>
<tr>
<％Do While Not rs.EOF%>
<tr>
<％For i=0 TO 7％>
<td size=1>< ％=rs("i")％ ><td>
<％Next％>
&l
你的字段名就叫"部门名称"?
在查询里面不应该这样吧, 如你可以改成"Department"
如:sql="select * from Conn where department='开发部'"
你试试
下边是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. 记录集对象