ASP多条件查询功能实现代码(多关键词查询)

经过多次研究写出了如下代码,有需要的可以参考下

代码如下:

kd=server.HTMLEncode(request("keyword"))
if kd<>"" then
    kd=trim(kd)
'kd=replace(kd," ","")
  kd=replace(kd,"'","")
  kd=replace(kd,"%","")
  kd=replace(kd,"\"," ")
  kd=replace(kd,">",">")
  kd=replace(kd,"<","<")
  kd=replace(kd,","," ")
  kd=replace(kd,","," ")
  kd=replace(kd,"|"," ")
kd=replace(kd,";"," ")
kd=replace(kd,":"," ")
kd=replace(kd,":"," ")
kd=replace(kd,";"," ")
'上面的是先替换一些特殊字符,方便输入一些特殊的分隔符
keyarr= Split(kd," ")
keyarrl=ubound(keyarr)
For I = 0 to keyarrl
if keyarrl>0 then
sqlk=sqlk&" and title like '%"&keyarr(I)&"%'"
else
sqlk=sqlk&"and title like '%"&keyarr(I)&"%'"
end if
Next
   if id<>"" then
    sql="select top 1000 id,title from news where type_id in ("&sqqq&") "&sqlk&" order by isshow ,shengcheng,id desc"
   else
    sql="select top 1000 id,title from news where id<>0 "&sqlk&" order by isshow ,shengcheng,id desc"
   end if
   else
   if id<>"" then
    sql="select top 1000 id,title from news where type_id in ("&sqqq&") order by isshow ,shengcheng,id desc"
   else
    sql="select top 1000 id,title from news where id<>0 order by isshow ,shengcheng,id desc"
   end if
   end if

ASP 多条件符合查询代码实例2

asp的多条件符合查询语句,自己写的,拿出来分享一下,绝对原创。请多指教!

代码如下:

<%
 dim qy
  qy=0
  if request.form("stu_name")<>"" then       '第一个条件表单传递的数据
   str="stu_name='"&request.form("stu_name")&"'"
   qy=qy+1
  end if

if request.form("stu_num")<>"" then     '第二个条件表单传递的数据
   if qy=0 then
    str=str&"stu_number='"&request.form("stu_num")&"'"
   else
    str=str&"and stu_number='"&request.form("stu_num")&"'"
   end if
   qy=qy+1
  end if

if request.form("stu_xibie")<>"" then     '第三个条件表单传递的数据
   if qy=0 then
    str=str&"stu_xibie='"&request.form("stu_xibie")&"'"
   else
    str=str&"and stu_xibie='"&request.form("stu_xibie")&"'"
   end if
   qy=qy+1
  end if

if request.form("stu_class")<>"" then
   if qy=0 then
    str=str&"stu_class='"&request.form("stu_class")&"'"
   else
    str=str&"and stu_class='"&request.form("stu_class")&"'"
   end if
   qy=qy+1
  end if

if request.form("stu_year")<>"" then
   if qy=0 then
    str=str&"stu_year='"&request.form("stu_year")&"'"
   else
    str=str&"and stu_year='"&request.form("stu_year")&"'"
   end if
   qy=qy+1
  end if
 sql="select * from [students] where "&str
Set rs=Conn.Execute(sql)   '执行sql语句
%>

运行环境:IIS
脚本语言:VBScript
数据库:Access/SQL Server
数据库语言:SQL

1.概要:
不论是在论坛,还是新闻系统,或是下载系统等动态网站中,大家经常会看到搜索功能:搜索帖子,搜索用户,搜索软件(总之搜索关键字)等,本文则是介绍如何建立一个高效实用的,基于ASP的站内多值搜索。

本文面对的是“多条件模糊匹配搜索”,理解了多条件的,单一条件搜索也不过小菜一碟了。一般来讲,有两种方法进行多条件搜索:枚举法和递进法。搜索条件不太多时(n<=3),可使用枚举法,其语句频度为2的n次方,成指数增长,n为条件数。很明显,当条件增多以后,无论从程序的效率还是可实现性考虑都应采用递进法,其语句频度为n,成线性增长。需要指出的是,枚举法思路非常简单,一一判断条件是否为空,再按非空条件搜索,同时可以利用真值表技术来对付条件极多的情况(相信没人去干这种事,4条件时就已经要写16组语句了);递进法的思想方法较为巧妙,重在理解,其巧就巧在一是使用了标志位(flag),二是妙用SQL中字符串连接符&。下面以实例来讲解引擎的建立。

2.实例:
我们建立一通讯录查询引擎,数据库名为addressbook.mdb,表名为address,字段如下:

ID Name Tel School
1 张 三 33333333 电子科技大学计算机系
2 李 四 44444444 四川大学生物系
3 王 二 22222222 西南交通大学建筑系
… … … …

Web搜索界面如下:

姓名: 电话: 学校: 搜索按钮

采用枚举法的源程序如下:

代码如下:

<%@ CODEPAGE = "936" %>
'连接数据库
<%
dim conn
dim DBOath
dim rs
dim sql
Set conn=Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("addressbook.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set rs=Server.CreateObject("ADODB.Recordset")
'从Web页获取姓名、电话、学校的值
dim Name
dim Tel
dim School
Name=request("Name")
Tel=request("Tel")
School=request("School")
'枚举法的搜索核心,因为有3个条件所以要写8组If判断语句
if trim(Name)="" and trim(Tel)="" and trim(School)="" then
sql="select * from address order by ID asc"
end if
if trim(Name)="" and trim(Tel)="" and trim(School)<>"" then
sql="select * from address where School like '%"&trim(School)&"%' order by ID asc"
end if
if trim(Name)="" and trim(Tel)<>"" and trim(School)="" then
sql="select * from address where Tel like '%"&trim(Tel)&"%' order by ID asc"
end if
if trim(Name)="" and trim(Tel)<>"" and trim(School)<>"" then
sql="select * from address where Tel like '%"&trim(Tel)&"%' and School like '%"&trim(School)&"%' order by ID asc"
end if
if trim(Name)<>"" and trim(Tel)="" and trim(School)="" then
sql="select * from address where Name like '%"&trim(Name)&"%' order by ID asc"
end if
if trim(Name)<>"" and trim(Tel)="" and trim(School)<>"" then
sql="select * from address where Name like '%"&trim(Name)&"%' and School like '%"&trim(School)&"%' order by ID asc"
end if
if trim(Name)<>"" and trim(Tel)<>"" and trim(School)="" then
sql="select * from address where Name like '%"&trim(Name)&"%' and Tel like '%"&trim(Tel)&"%' order by ID asc"
end if
if trim(Name)<>"" and trim(Tel)<>"" and trim(School)<>"" then
sql="select * from address where Name like '%"&trim(Name)&"%' and Tel like '%"&trim(Tel)&"%' and School like '%"&trim(School)&"%' order by ID asc"
end if
rs.open sql,conn,1,1
'显示搜索结果
if rs.eof and rs.bof then
response.write "目前通讯录中没有记录"
else
do while not rs.eof
response.write "姓名:"&rs("Name")&"电话:"&rs("Tel")&"学校:"&rs("School")&"<br>"
rs.movenext
loop
end if
'断开数据库
set rs=nothing
conn.close
set conn=nothing
%>

理解上述程序时,着重琢磨核心部分,8组语句一一对应了3个搜索框中的8种状态

Name Tel School
空 空 空
空 空 非空
空 非空 空
空 非空 非空
非空 空 空
非空 空 非空
非空 非空 空
非空 非空 非空

另外trim()是VB的函数,将输入的字符串前后的空格去掉;%是SQL语言中的多字符通配符(_是单字符通配符),由此可见%"&trim()&"%对搜索框中输入的关键字是分别向左向右匹配的;SQL语言中用and连接说明非空条件之间是“与”关系。

再来看看递进法,与枚举法相比它们只有核心部分不同:
'递进法的搜索核心,依次判断条件为空否,非空则将其加入搜索条件

代码如下:

sql="select * from address where"
if Name<>"" then
sql=sql&" Name like '%"&Name&"%' "
flag=1
end if
if Tel<>"" and flag=1 then
sql=sql&" and Tel like '%"&Tel&"%'"
flag=1
elseif Tel<>"" then
sql=sql&" Tel like '%"&Tel&"%'"
flag=1
end if
if Company<>"" and flag=1 then
sql=sql&" and Company like '%"&Company&"%'"
flag=1
elseif Company <>"" then
sql=sql&" Company like '%"&Company&"%'"
flag=1
end if
if flag=0 then
sql="select * from address order by ID asc"
end if
rs.open sql,conn,1,1

递进法是一个明智的算法,单从语句的长短就可以看出来了。这个算法的难点和精髓就在flag和&上。首先你应该清楚&在SQL中就是一个字符串连接符,把该符号左右的字符拼接在一起。再回到程序,当Name不为空时sql="select * from address where Name like '%"&Name&"%' "同时flag=1;接下来当Name不为空时且Tel不为空时,即Tel<>"" and flag=1时,sql="select * from address where Name like '%"&Name&"%' and Tel like '%"&Tel&"%' "同时flag=1,否则当Name为空Tel不为空,sql="select * from address where Tel like '%"&Tel&"%' "同时flag=1;以此类推就可以推广到n个条件的搜索。当然条件皆为空时,即flag=0将选择所有表中所有项。

3.验证:

至此,一个搜索引擎就建立起来了。以下是一些使用示例:

姓名:张 电话: 学校: 搜索按钮

搜索结果为:
姓名: 张三 电话:33333333 单位:电子科技大学计算机系

姓名: 电话: 学校:大学 搜索按钮

搜索结果为:
姓名:张三 电话:33333333 单位:电子科技大学计算机系
姓名 李 四 电话:44444444 单位:四川大学生物系
姓名:王二 电话:22222222 单位:西南交通大学建筑系

姓名: 电话:4444 学校:四川 搜索按钮

搜索结果为:
姓名 李 四 电话:44444444 单位:四川大学生物系

姓名: 电话: 学校:交%大 搜索按钮

搜索结果为:

姓名:王二 电话:22222222 单位:西南交通大学建筑系

4.改进:
其实这个引擎还有些缺陷,问题主要在于通配符%。一方面是因为人们平时习惯把*作为通配符,另一方面%若出现在超链接中,通过request获取时%将被“吃”掉,如下:

代码如下:

--test.htm--

<a href=test.asp?content=test%the%sign>click here</a>

--test.asp--
<%
content=request(“content”)
response.write content
%>

在IE中浏览test.htm时点击超链接,显示为:
testthesign
可见%直接被超链接忽略掉了。怎么才能解决这个问题呢?很简单,我们做点小小的手脚--偷梁换柱。
将以下代码加在搜索核心之前:
Name=replace(Name,"*","%")
Tel=replace(Tel,"*","%")
Company=replace(Company,"*","%")
将以下代码加在搜索核心之后:
Name=replace(Name,"%","*")
Tel=replace(Tel,"%","*")
Company=replace(Company,"%","*")

在我们来分析一下这些语句。replace()是VB中字符串替换函数,replace(Name,"*","%") 就是将Name中所有的*换成%。也就是说,我们把3个条件中凡是出现的*都替换为%,这样一来前3句就将通配符改成*了。而后3句就可以防止%被“吃”掉。所有问题就迎刃而解了吧。

姓名: 电话: 学校:交%大 搜索按钮

搜索结果为:
姓名:王 二 电话:22222222 单位:西南交通大学建筑系

将上面的语句再改一改,把*用空格代替,不就成了我们在Google、BaiDu中常用的用空格来分开搜索条件的搜索引擎了吗?

补充功能:如果我们要实现查询同一个表中的标题和内容 但想按这二个的顺序来排列 比如 查到与标题符合的先显示出来 而与内容符合的则显示在标题的后面 如何实现呢? 

sql="select * from product where title like '%"&keyword&"%' "
sql=sql + " union select * from product where content like '%"&keyword&"%' order by id desc"

两条SQL语句中间加一个,union 就可以联合查询,但列必须一样,还有排序条件也同样是一个.

我们将用到UNION的联合查询,这将能实现以上的功能。

分析:数据库查询 将先按与title的数据实现查询 然后再将实现与content的数据查询 故则有先后之分。

(0)

相关推荐

  • 用js实现QQ在线查询功能

    这段程序的方法是利用XMLHTTP来读取腾讯网站的相应HTML代码获取QQ的头像,根据这个想法,我们还可以抓取很多其他网站的信息,如天气预报.新闻等等. <script language="JavaScript">  <!--   function getFaceImg(QQcode)   {   var Re=new RegExp("^[1-9]{1}\d+$","g");   if (!QQcode !Re.test(QQc

  • asp查询xml的代码 不刷新页面查询的方法

    以下为引用的内容: <html> <head> <title>不刷新页面查询的方法</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> </head> <script language="javascript"> <!--初始化,将数据岛中数据装入列表框中-

  • asp.net 网页动态查询条件的实现

    场景 最近有一个需求,会在 mongodb 中插入各种类型的数据,算是记录业务日志的数据库吧. 因为业务对象类型都不同,所以插入的数据格式也完全不同. 除此之外,还需要提供一个查询界面,可以搜索数据. 插入数据没任何问题,但是查询就- 查询设计方案 首先想到的是让用户直接输入 mongodb 查询语法,类似 json 格式.但是使用者虽然也是开发,可都不熟悉这个语法,所以放弃了. 第二个想法是让用户输入 SQL 语句,然后转换- 结果以失败而告终. 最后,看到了 iTunes 智能播放列表的交互

  • asp.net连接数据库 增加,修改,删除,查询代码

    复制代码 代码如下: '数据库连接 Public Sub connectionDB() Try serverUrl = readFromIni(My.Application.Info.DirectoryPath & "\config.dll", "Service Information", "IPAddress") serverID = readFromIni(My.Application.Info.DirectoryPath &

  • 基于ASP实现QQ在线查询功能

    本文给大家分享的qq在线查询功能代码非常简单,具体内容如下: 这段程序的方法是利用XMLHTTP来读取腾讯网站的相应HTML代码获取QQ的头像,根据这个想法,我们还可以抓取很多其他网站的信息,如天气预报.新闻等等. <script language="JavaScript"> <!-- function getFaceImg(QQcode) { var Re=new RegExp("^[1-9]{1}/d+$","g"); if

  • asp.net IList查询数据后格式化数据再绑定控件

    一.先讲最基本的 DataSet绑定操作,GridView为例. 当操作查询得一个 DataSet ds 后,可以进行一些数据的格式化,如: 复制代码 代码如下: foreach (DataRow dr in ds.Tables[0].Rows) { if (dr["Depth"].ToString() != "1") { dr["ColumnName"] = StringHelper.StringOfChar(Convert.ToInt32(d

  • asp.net中gridview的查询、分页、编辑更新、删除的实例代码

    1.A,运行效果图 1.B,源代码/App_Data/sql-basic.sql 复制代码 代码如下: use mastergoif exists(select * from sysdatabases where name='db1')begin    drop database db1endgocreate database db1gouse db1go-- ================================-- ylb:1,类别表-- =====================

  • ASP多条件查询功能实现代码(多关键词查询)

    经过多次研究写出了如下代码,有需要的可以参考下 复制代码 代码如下: kd=server.HTMLEncode(request("keyword"))if kd<>"" then    kd=trim(kd)'kd=replace(kd," ","")  kd=replace(kd,"'","")  kd=replace(kd,"%","&quo

  • SQL Server 2012 多表连接查询功能实例代码

    废话不多说了,直接给大家贴代码了,具体代码如下所示: -- 交叉连接产生笛卡尔值 (X*Y) SELECT * FROM Student cross Join dbo.ClassInfo --另外一种写法 SELECT * FROM Student , ClassInfo -- 内连接 (Inner 可以省略) SELECT * FROM Student JOIN dbo.ClassInfo ON dbo.Student.Class = dbo.ClassInfo.ID; -- Inner Jo

  • AngularJS模糊查询功能实现代码(过滤内容下拉菜单排序过滤敏感字符验证判断后添加表格信息)

    注:添加球员的功能无指定技术要求,添加球员的页面也无具体样式要求. 1.实现上图页面所有元素,页面布局规整,跟上图效果一致 2.实现文案显示,按效果显示 3.实现查询,实现查询敏感词过滤,实现查询后列表变化 4.实现倒序,实现正序,下拉列表排序效果都实现 5.按钮背景一致,按钮样式 6.实现添加球员页面,添加球员页面样式,添加球员功能,添加球员必填项判断,添加完球员后能显示在表格内,已存在球员判重. 7.表格样式跟上图样式一致 代码: <!DOCTYPE html> <html lang

  • Select下拉框模糊查询功能实现代码

    select下拉列表框支持输入模糊查询功能,设计非常的人性化,下面小编给大家分享了关键代码,大家根据自己的需求适当的添加修改,有任何问题欢迎给我反馈. 关键代码如下所示: <HTML> <HEAD> <META http-equiv='Content-Type' content='text/html; charset=gb2312'> <TITLE>可输入的下拉框</TITLE> </HEAD> <BODY > <S

  • ASP.NET MVC验证码功能实现代码

    前台 复制代码 代码如下: <img id="vcodeimg" src="/Home/VCode" width="70"                                    height="25" />                                 <span                                    style="cursor: p

  • asp.net(c#) RSS功能实现代码

    可能还有很多未完善,但终归可以使用了,以后再慢慢改进!! 以下是我RSS界面的后台代码,给需要的朋友提供下我的经验: 复制代码 代码如下: using System; using System.Data; using System.Configuration; using System.Collections; using System.Web; using System.Web.Security; using System.Web.UI; using System.Web.UI.WebCont

  • java使用淘宝API读写json实现手机归属地查询功能代码

    一般查询手机归属地内容应该很好用json格式保存,在网上找到了淘宝的归属地API,并下了处理json相关的jar包,做了这个手机归属地查询功能 复制代码 代码如下: package com.think.java; import java.io.BufferedReader;import java.io.InputStream;import java.io.InputStreamReader;import java.net.MalformedURLException;import java.net

  • kkpager 实现ajax分页查询功能

    前台分页数据,适合数据少量的时候,因为分页的数据是从后台获取的,大数据的话不建议使用 先看下前台代码: @{ Layout = null; } <!DOCTYPE html> <html> <head> <meta name="viewport" content="width=device-width" /> <script src="~/kkpager/lib/jquery-1.10.2.min.js

  • jQuery EasyUI的TreeGrid查询功能实现方法

    最近需要实现对treeGrid的查询功能,具体查询界面如下: 可以查询根节点和具体子节点的信息,开始使用EasyUI的TreeGrid的loadData 加载url的方式不能实现查询功能,于是利用异步AJAX查询了一下数据返回后,赋值给变量,然后利用 TreeGrid的loadData加载这个json格式的返回结果实现了对TreeGrid的查询功能,代码如下: function searchROM() { var product = $('#Product').combobox('getValu

  • Android 百度地图POI搜索功能实例代码

    在没介绍正文之前先给大家说下poi是什么意思. 由于工作的关系,经常在文件中会看到POI这三个字母的缩写,但是一直对POI的概念和含义没有很详细的去研究其背后代表的意思.今天下班之前,又看到了POI这三个字母,决定认认真真的搜索一些POI具体的含义. POI是英文的缩写,原来的单词是point of interest, 直译成中文就是兴趣点的意思.兴趣点这个词最早来自于导航地图厂商.地图厂商为了提供尽可能多的位置信息,花费了很大的精力去寻找诸如加油站,餐馆,酒店,景点等目的地,这些目的地其实都可

随机推荐