| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 427 人关注过本帖
标题:[求助]站内搜索
只看楼主 加入收藏
tulipdwh
Rank: 1
等 级:新手上路
帖 子:79
专家分:0
注 册:2006-10-18
收藏
 问题点数:0 回复次数:3 
[求助]站内搜索

这是第一页
<form id="form1" name="form1" method="post" action="2.asp">
<label>
<select name="name">
<option value="姓名" >姓名</option>
<option value="Email">Email</option>
</select>
<input type="text" name="keyword" size="15">
<input type="submit" value="搜索">


第二页
<!--#include file="conn.asp"-->
<%
name=Request.form("name")
keyword=request.form("keyword")
%>

搜索: <font color="green"><%=name%></font> 中的关键字: <span style="background-color:#FFFF00"><%=keyword%></span><br><br><br><br>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from yonghu where name like '%"&keyword&"%' ",conn,1,1
if "keyword"<>"name" then
response.Write("没有搜索到相关内容<br><br><a href='javascript:history.go(-1)'>返回重新搜索</a>")
else
response.Write("相关内容如下:<br><br>")
end if
while not rs.eof
%>
<%
rs.movenext
wend
rs.close
set rs=nothing
%>

这什么收不到内容呢

搜索更多相关主题的帖子: 搜索 
2006-12-05 09:26
hangxj
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:2045
专家分:0
注 册:2006-4-10
收藏
得分:0 
以下是引用tulipdwh在2006-12-5 9:26:51的发言:

这是第一页
<form id="form1" name="form1" method="post" action="2.asp">
<label>
<select name="name">
<option value="姓名" >姓名</option>
<option value="Email">Email</option>
</select>
<input type="text" name="keyword" size="15">

<input type="submit" value="搜索">


第二页
<!--#include file="conn.asp"-->
<%
name=Request.form("name")
keyword=request.form("keyword")
%>

搜索: <font color="green"><%=name%></font> 中的关键字: <span style="background-color:#FFFF00"><%=keyword%></span><br><br><br><br>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from yonghu where name like '%"&keyword&"%' ",conn,1,1
if "keyword"<>"name" then
response.Write("没有搜索到相关内容<br><br><a href='javascript:history.go(-1)'>返回重新搜索</a>")
else
response.Write("相关内容如下:<br><br>")
end if
while not rs.eof
%>
<%
rs.movenext
wend
rs.close
set rs=nothing
%>

这什么收不到内容呢

自己认真看下我所标示的红色部分,以及认真想下为什么?


http://www./
2006-12-05 09:30
tulipdwh
Rank: 1
等 级:新手上路
帖 子:79
专家分:0
注 册:2006-10-18
收藏
得分:0 
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from yonghu where name like '%"&keyword&"%' ",conn,1,1
if rs.eof then
response.Write("没有搜索到相关内容<br><br><a href='javascript:history.go(-1)'>返回重新搜索</a>")
else
response.Write("相关内容如下:<br><br>")
end if
while not rs.eof
%>
<%=rs("name")%>&nbsp;
<%
rs.movenext
wend
rs.close
set rs=nothing
%>
2006-12-05 09:40
tulipdwh
Rank: 1
等 级:新手上路
帖 子:79
专家分:0
注 册:2006-10-18
收藏
得分:0 
解决了
2006-12-05 09:40
快速回复:[求助]站内搜索
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.026207 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved