ASP：在结果中搜索

　ASP：在结果中搜索

作者：小荷　时间： 2003-07-04　文档类型：原创　来自：蓝色理想

我们经常用GOOGLE来搜索东东，也看到了它的在结果中搜索的功能。

在论坛中曾有人问到，如果用 ASP 在搜索结果中再次搜索的问题。

下面就是一个完整的解决方案。

设计思路：

把搜索的内容传递过来，中间用“,”号隔开，统计出搜索的关键字，然后用sql语法的“and”连接起来形成一个新的查询语句。

ASP代码，下面的代码不提供数据库下载，如果你要进行测试，可以新建一个ACCESS数据库，在里面新建一个“capital”字段就可以了。

代码拷贝框
<title>在结果中再搜索</title> <body bgcolor="#FFFFFF"> <% u_search=request.form("u_search") u_prev_search=request.form("u_prev_search") u_search_within=request.form("u_search_within") if u_search <> "" then if u_prev_search = "" then u_prev_search=u_search else u_prev_search=u_prev_search &","& u_search g_prev_search=split(u_prev_search,",") num_inputted=ubound(g_prev_search) end if sql= "select * from states where (capital like '%%"& u_search & "%%') " if u_search_within = "Yes" then for counter =0 to num_inputted-1 sql=sql& "and (capital like '%%"& g_prev_search(counter) & "%%') " next end if accessdb="state_info" cn="DRIVER={Microsoft Access Driver (*.mdb)};" cn=cn & "DBQ=" & server.mappath(accessdb) Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, cn ' 如果没有找到相应的信息 if rs.eof then %> 没有任何记录 <%' 有相应的信息就列出来 else rs.movefirst do while Not rs.eof %> <%= rs("capital") %><br> <% rs.movenext loop end if end if %>  <form action="<%= request.servervariables("script_name") %>" method="post"> <input type="text" name="u_search" value="<%= u_search %>"> <br> <% if u_search <> "" then %> <input type = "radio" name="u_search_within" checked value="No"> 重新搜索   <input type = "radio" name="u_search_within" value="Yes"> 在结果中搜索 <% if u_search_within = "Yes" then %> <input type = "hidden" name="u_prev_search" value="<%= u_prev_search %>"> <% else %> <input type = "hidden" name="u_prev_search" value="<%= u_search %>"> <% end if%> <br> <% end if%> <input type="submit" value="搜索"> </form>  <p> </p> <%= sql %>
[Ctrl+A 全部选择然后拷贝]

出处：蓝色理想
责任编辑：小荷

◎进入论坛网络编程版块参加讨论

相关文章

更多相关链接

[ASP]利用 xmlhttp 分块上传文件

ASP 中健壮的页结构的异常处理

改进 ASP 的字符串处理性能

ASP 指南

ASP编程入门进阶

作者文章

微软的“Web Data Administrator”MS SQL 管理器

好玩：日期选择器


关键字搜索	常规搜索	推荐文档
热门搜索：CSS Fireworks 设计比赛网页制作 web标准用户体验 UE photoshop Dreamweaver Studio8 Flash 手绘 CG

站点最新

站点最新列表

周大福“敬•自然”设计大赛开启

国际体验设计大会7月将在京举行

中国国防科技信息中心标志征集

云计算如何让安全问题可控

云计算是多数企业唯一拥抱互联网的机会

阿里行云

云手机年终巨献，送礼标配299起

阿里巴巴CTO王坚的"云和互联网观"

1499元买真八核云OS双蛋大促

首届COCO桌面手机主题设计大赛

栏目最新

栏目最新列表

浅谈JavaScript编程语言的编码规范

如何在illustrator中绘制台历

Ps简单绘制一个可爱的铅笔图标

数据同步算法研究

用ps作简单的作品展示页面

CSS定位机制之一:普通流

25个最佳最闪亮的Eclipse开发项目

Illustrator中制作针线缝制文字效果

Photoshop制作印刷凹凸字体

VS2010中创建自定义SQL Rule