库进行检索，并将查询结果集通过信息展示部分输出到浏览器中，数据处理页的程序代码如下：
<!--#include file="../conn/conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
if request.QueryString("type")="all" then '显示全部内容
sql="select * from tab_cgdan"
else
flag=request.Form("flag")
i=0 '为变量赋初始值
if flag<>"" then
if instr(flag,"1")>0 then '当有一个条件时进行相应的处理
sel=request.Form("sel")
tj=request.Form("tj")
qname=request.Form("qname")
i=1
flag_deal="inIF"
end if
if instr(flag,"2")>0 then '当有两个条件时进行相应的处理
sdate=request.Form("sdate")
edate=request.Form("edate")
i=i+1
flag_deal="inDate"
end if
if i>1 then
flag_deal="double"
end if
session("flag")=flag_deal '创建Session变量
session("sel")=sel
session("tj")=tj
session("qname")=qname
session("sdate")=sdate
session("edate")=edate
end if
'查询条件判断
select case session("flag")
case "inIF"
if session("tj")="=" then '精确查询
sql="select * from tab_cgdan where "&session("sel")&" = '"&session("qname")&"' "
else '模糊查询
sql="select * from tab_cgdan where "&session("sel")&" like '%"&session("qname")&"%'"
end if
case "inDate" '日期查询
sql="select * from tab_cgdan where cgdate between '"&session("sdate")&"' and '"&session("edate")&"'"
case "double" '多条件的精确查询
if session("tj")="=" then
sql="select * from tab_cgdan where "&session("sel")&" = '"&session("qname")&"' and cgdate between '"&session("sdate")&"' and '"&session("edate")&"'"
else '多条件的模糊查询
sql="select * from tab_cgdan where
