asp的问题,请各位大虾帮个忙!!!我感激不尽!!!

[happyhui]

下面是一个用asp写的:

<%

set cn=server.createobject("adodb.connection")
cn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("jcb.mdb")
set rs1=server.createobject("adodb.recordset")
rs1.open "arrege",cn,1,3
while not rs1.eof
if rs1("title")=request.form("tarr") then
response.write "<td width='100%'><a href=arrege.asp?id="&rs1(0)&">"&rs1(1)&"</a></td>"
else
response.write "对不起,没有你所找的"
end if
rs1.movenext
wend
set cn=nothing
set rs1=nothing

%>
如果数据库没有,怎么只能让它只显示一句"对不起,没有你所找的"

[bingofei]

把所有的都去掉，只留下
<%
Response.Write "对不起,没有你所找的"
%>

[lovehwq21]

在response.write "对不起,没有你所找的"后面加上一句
response.end

[dishui]

你查找记录集的sql语句呢？
如果是arrege，应该在链接数据库的后面
rs1.open "arrege",cn,1,3
位置颠倒一下：
set rs1=nothing
set cn=nothing

[flying310]

<%
set cn=server.createobject("adodb.connection")
cn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("jcb.mdb")
set rs1=server.createobject("adodb.recordset")
rs1.open "arrege",cn,1,3
while not rs1.eof
if rs1("title")=request.form("tarr") then
response.write "<td width='100%'><a href=arrege.asp?id="&rs1(0)&">"&rs1(1)&"</a></td>"
break
else
rs1.movenext
if rs1.eof then
response.write "对不起,没有你所找的"
end if
end if
wend
set cn=nothing
set rs1=nothing

%>

[lightsword]

if rs1.eof then response.write。。。。
else
end if

[troopers]

set cn=server.createobject("adodb.connection")
cn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("jcb.mdb")
set rs1=server.createobject("adodb.recordset")
rs1.open "arrege",cn,1,3
if not rs1.eof then
while not rs1.eof
if rs1("title")=request.form("tarr") then
response.write "<td width='100%'><a href=arrege.asp?id="&rs1(0)&">"&rs1(1)&"</a></td>"
end if
rs1.movenext
wend
else
response.write "对不起,没有你所找的"
end if

set cn=nothing
set rs1=nothing

%>

[happyhui]

高兴的太早了，你们的方法不行呀。

[happyhui]

我实现了,真是谢谢大家!!!