帮我看看这段ASP代码问题出在哪？

来源：百度知道编辑：UC知道时间：2024/05/10 23:44:13

<%
set conn2=server.createobject("adodb.connection")
conn2.open "DBQ="&server.mappath("SunData/Collect.mdb")&";Driver={Microsoft Access Driver (*.mdb)};"
Set rs=Server.CreateObject("ADODB.Recordset")
sql="Select * from news where title like '%"&request("key")&"%'"
rs.open sql,conn2,1,1
If rs.eof Then
%>
没有查找到信息！
<%
else
rs.pagesize=15
dim Page
Page =1
if request("Page") <> "" then
Page=cint(request("Page"))
end if
if not rs.eof and not rs.bof then
rs.absolutepage=Page
end if
count=rs.pagesize
do while not rs.eof and count>0
%>

<%=rs("title")%><br>

<%
rs.movenext
count=count-1
Loop
End If
%>

这是一段搜索代码，现在的问题是，如果Request("key")传过来

把sql="Select * from news where title like '%"&request("key")&"%'" 改为

if request("key")="" then
response.write("查询关键字为空")
else
sql="Select * from news where title like '%"&request("key")&"%'"
end if

If rs.eof Then
%>
没有查找到信息！
rs.close
conn2.close
response.end
<%

If rs.eof and rs.bof Then
response.write("没有相关信息！")
else

帮我看看这段ASP代码问题出在哪？ ASP代码问题。。。帮我看看这段ASP代码帮我看看这段代码问题出在哪？高手帮我看看这段ASP查询代码哪出的问题请大家帮我看看这段asp代码的问题出在哪儿? 谢谢帮我看看这段ASP代码帮我看看这段ASP代码～～！帮我看看这段asp代码问题在哪里，关于coolie的可以帮我看看这段JavaScript代码的问题出在哪里吗？关于ASP,那位帮我看看这段代码!