我的asp显示ODBC 驱动程序不支持所需的属性。

lwnylslwnyls 2009-11-15 04:33:37

代码如下

<html>
<body>
<p>
<%
dim rec
set rec= Server.CreateObject("ADODB.Recordset")
dim sql
if request("username") & ""="" then
sql="select * from guest where 内容 like '%" & request("title") & "%'"
else
sql="select * from guest where 内容 like '%" & request("title") & "%' and 用户名='" & request("username") & "'"
end if
rec.open sql , conn,1, 1 //这一行有问题
%>
<form id="form1" name="form1" method="post" action="show.asp">
姓名：
<label>
<select name="name" id="name">
<option value="" ></option>
<%do while not rec1.eof
if rec1(0)=request("name") then%>
<option value="<%=rec1(0)%>" selected="selected"><%=rec1(0)%></option>
<%else%>
<option value="<%=rec1(0)%>"><%=rec1(0)%></option>
<%
end if
rec1.movenext
loop%>
</select>
</label>
主题：
<input name="title" type="text" id="title" value="<%=request("title")%>" />
<label>
<input type="submit" name="Submit" value="查询" />
</label>
<label>
<input type="reset" name="Submit2" value="重填" />
</label>
</form>
<table border=1 CELLSPACING=0>
<tr>
<%
for i=0 to rec.fields.count-1
response.write "<td>" & rec(i).name & "</td>"
next
%>
</tr>
<%
do while not rec.eof
%>
<tr>
<%
for i=0 to rec.fields.count-1
response.write "<td>" & rec(i) & "</td>"
next%>
<td><a href="mod.asp?id=<%=rec(0)%>">修改</a>--<a href="del.asp?id=<%=rec(0)%>">删除</a></td>
<%response.write "</tr>"
rec.movenext
loop

rec.close
set rec=nothing
rec1.close
set rec1=nothing
closedb

%>
</body>
</html>

错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。
/留言簿/show.asp, 第 14 行
高手帮忙解决一下，很感谢，

...全文

110 4 打赏收藏转发到动态举报

写回复

用AI写文章

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

ACMAIN_CHM 2009-11-15

打赏
举报

select * from guest where 主题 like '%%'

到你的ACCESS中直接执行一下。

1。确认你有这个表guest
2. 确认表guest 中有这个主题字段

lwnylslwnyls 2009-11-15

打赏
举报

[Quote=引用 2 楼 acmain_chm 的回复:]
<%
dim rec
set rec= Server.CreateObject("ADODB.Recordset")
dim sql
if request("username") & ""="" then
sql="select * from guest where 内容 like '%" & request("title") & "%'"
else
sql="select * from guest where 内容 like '%" & request("title") & "%' and 用户名='" & request("username") & "'"
end if

response.write sql
response.end

rec.open sql , conn,1, 1 //这一行有问题

引用.
改成如上
看看你的SQL语句到底是什么？！估计是你的这个表guest中根本就没有内容　或者用户名这些字段
[/Quote]

执行response.write sql后显示select * from guest where 主题 like '%%'
是不是错了

ACMAIN_CHM 2009-11-15

打赏
举报

<%
dim rec
set rec= Server.CreateObject("ADODB.Recordset")
dim sql
if request("username") & ""="" then
sql="select * from guest where 内容 like '%" & request("title") & "%'"
else
sql="select * from guest where 内容 like '%" & request("title") & "%' and 用户名='" & request("username") & "'"
end if

response.write sql
response.end

rec.open sql , conn,1, 1 //这一行有问题

[Quote].[/Quote]
改成如上
看看你的SQL语句到底是什么？！估计是你的这个表guest中根本就没有内容　或者用户名这些字段