注册 登录
编程论坛 ASP技术论坛

[求助]站内搜索问题

hufengxu888 发布于 2007-08-14 16:21, 490 次点击


<%
set rs=server.createobject("adodb.recordset")
sql="select * from tdcx where pwid like '%"&pwid&"%' and pwname='%"&pwname&"%'"
pwname=trim(request("pwname"))
pwid=trim(request("pwid"))
response.Write pwname
response.Write "<br>"
response.Write pwid
'response.End()
rs.open sql,conn,1,1

%>

<%if rs.eof then
<td colspan="3">
<%
response.write"现在还没有记录!"‘当数据库里有输入的搜索关键字是,程序也只执行到这里,后面的就不执行了 ,请高手指教
response.end
end if
%></td>
</tr>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from tdcx where pwid like '%"&pwid&"%' and pwname='%"&pwname&"%'"
rs.open sql,conn,1,1
%>
<tr>
<td width="312" bordercolor="#663333">批文名称</td>
<td width="275" bordercolor="#663333">批文号</td>
<td width="174" bordercolor="#663333">发文时间</td>
</tr>
<%
do while not rs.eof
%>
<tr>
<td bordercolor="#663333"><%=rs("PwName")%></td>
<td bordercolor="#663333"><%=rs("PwId")%></td>
<td bordercolor="#663333"><%=rs("date")%></td>
</tr>
<%

rs.movenext
loop
%>
</table>

8 回复
#2
multiple19022007-08-14 16:30
试试条件: rs.BOF And rs.EOF
#3
dhdhzzw2007-08-14 16:32

去掉response.end

#4
hufengxu8882007-08-14 16:34
回复:(multiple1902)试试条件: rs.BOF And rs.EOF...

谢谢版主,但还是和原来一样的效果

#5
QQQQQQQQQQQQ2007-08-14 16:44
sql="select * from tdcx where pwid like '%"&pwid&"%' and pwname='%"&pwname&"%'"
你把红色的去掉后运行看看,如果能运行就是红色代码的问题
#6
dhdhzzw2007-08-14 16:52

我晕 <%if rs.eof then
<td colspan="3">
<%
response.write"现在还没有记录!"‘当数据库里有输入的搜索关键字是,程序也只执行到这里,后面的就不执行了 ,请高手指教
response.end
end if
%>
你只写了为空时就停止,却没写不为空时的else 当然会停在这啦,写上ELSE榜下面的代码写在else后面

#7
hufengxu8882007-08-14 17:01
回复:(QQQQQQQQQQQQ)sql=
把后面的语句去了还是不行

站内搜索时,有两个文本框,只要在任一个文本框内输入关键字就可以查询的语句怎么写?
#8
QQQQQQQQQQQQ2007-08-14 17:22

'response.End()
rs.open sql,conn,1,1
response.write rs.recordcount '如果这里输入的是0,就是SQL语句问题


看了一下发现你多写了一遍代码
[QUOTE]<%
set rs=server.createobject("adodb.recordset")
sql="select * from tdcx where pwid like '%"&pwid&"%' and pwname='%"&pwname&"%'"
pwname=trim(request("pwname"))
pwid=trim(request("pwid"))
response.Write pwname
response.Write "<br>"
response.Write pwid
'response.End()
rs.open sql,conn,1,1
%>
<%if rs.eof then
<td colspan="3">
<%
response.write"现在还没有记录!"‘当数据库里有输入的搜索关键字是,程序也只执行到这里,后面的就不执行了 ,请高手指教
response.end
end if
%></td>
</tr>

<tr>
<td width="312" bordercolor="#663333">批文名称</td>
<td width="275" bordercolor="#663333">批文号</td>
<td width="174" bordercolor="#663333">发文时间</td>
</tr>
<%
do while not rs.eof
%>
<tr>
<td bordercolor="#663333"><%=rs("PwName")%></td>
<td bordercolor="#663333"><%=rs("PwId")%></td>
<td bordercolor="#663333"><%=rs("date")%></td>
</tr>
<%

rs.movenext
loop
%>
</table>[/QUOTE]

#9
QQQQQQQQQQQQ2007-08-14 17:24
这段你写了两次
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from tdcx where pwid like '%"&pwid&"%' and pwname='%"&pwname&"%'"
rs.open sql,conn,1,1
%>
1