请教,为什么查询不到记录
代码如下
<!--#include file="conn.asp" -->
<%
'on error resume next
dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="SELECT * From news WHERE no ="&request("No")
rs.open sql,conn,1,1
response.Write "<p><span class='unnamed3'><font size='+2'><strong>"
if rs.bof and rs.eof then
response.write "此文章已经删除。。。</strong></font></a></span> </p>"
else
response.Write(rs("title"))
response.Write"</strong></font></a></span> </p>"
response.Write "<p>"
response.Write(rs("article"))
response.Write "</p>"
end if
%>
conn.asp
<%
dim conn
dim connstr
'on error resume next
connstr = "DBQ=" + server.mappath("newsdb.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err.number<>0 then
err.clear
set conn=nothing
response.write "数据库连接出错!"
Response.End
else
conn.open connstr
if err then
err.clear
set conn=nothing
response.write "数据库连接出错!"
Response.End
end if
end if
sub endConnection()
conn.close
set conn=nothing
end sub
%>
数据库
no title article
明明有记录,但显示 此文章已经删除。。。