用户可以在合同信息管理页面中的查询部分，输入一定的查询条件，进行合同信息的查询。
用户在查询部分输入查询条件后，单击【查询】按钮，用户所添加的查询条件将被提交给本页，本页将根据用户提交的表单信息对数据库进行检索，并将结果集通过操作区输出到浏览器中。
合同信息查询程序代码如下：
<%
if request("post")<>"" then
if request("tiao")="模糊查询" then‘模糊查询合同信息
set rs=server.CreateObject("adodb.recordset")
sql="select * from tb_Pact where "&request("sel")&" like '%"&request("search")&"%' order by id desc"
rs.open sql,conn,1,1
else’精确查询合同信息
set rs=server.CreateObject("adodb.recordset")
sql="select * from tb_Pact where "&request("sel")&"='"&request("search")&"' order by id desc"
rs.open sql,conn,1,1
end if
else’ 默认状态下显示的合同信息
set rs=server.CreateObject("adodb.recordset")
sql="select * from tb_Pact order by id desc"
rs.open sql,conn,1,1
end if
%>
合同信息显示/查询页面运行结果如图11所示。
图13 合同信息修改页面运行结果
4．合同信息的删除
合同信息删除的主要功能是删除合同信息，其代码如下：
<%
kid=Split(Request("del"),",")
response.Write("正在删除...")
for i=0 to ubound(kid)
sqld="delete from tb_Pact where id="&clng(kid(i))
conn.execute(sqld)
next
%>
5 服务管理
服务管理设计的主要功能包括反馈信息的显示/查询、添加、修改和删除4个部分。用户可以通过功能导航进入服务管理页面，页面设计效果如图20所示。
