一个关于查询页面的后台编程问题。

kevinmitasp 2002-12-22 12:04:33
我现在要做个查询页面:
1,查询项目:是一个下拉菜单:案卷号,案卷标题,起止日期,保存期限,保存箱号.
2.查询方式:两个单选框:(1)基本查询;(2)模糊查询
3。关键字:一个文本框
4。提交按钮。

我想问的是,怎样才能实现查询项目的不同项目的选择,查询方式的不同选择,
在提交后,代码是怎么写的。谢谢!!!
...全文
28 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
m1_1m 2002-12-22
  • 打赏
  • 举报
回复
你在后台接受到一拉的框的值,再对它进行筛选不就得了吗
kevinmitasp 2002-12-22
  • 打赏
  • 举报
回复
我来试试看,谢谢大家的帮助,对了,我要是给分的话,怎么做才可以呀?
kevinmitasp 2002-12-22
  • 打赏
  • 举报
回复
我来试试看,谢谢大家的帮助,对了,我要是给分的话,怎么做才可以呀?
kevinmitasp 2002-12-22
  • 打赏
  • 举报
回复
我来试试看,谢谢大家的帮助,对了,我要是给分的话,怎么做才可以呀?
逍遥小贼 2002-12-22
  • 打赏
  • 举报
回复
******* aa.asp
<form name="form1" method="post" action="bb.asp">
<select name="project">
<option value="id" checked>案卷号</option>
<option value="title">案卷标题</option>
<option value="sdate">起止日期</option>
<option value="stime">保存期限</option>
<option value="caseid">保存箱号</option>
</select>
<input type="radio" name="method" value="基本查询">
<input type="radio" name="method" value="模糊查询">
<input type="text" name="keyword">
<input type="button" name="action" value="提交">
</form>

*****************bb.asp
<%
sid=request("id")
sproject=request("project")
smethod=trim(request("method"))
keyword=trim(request("keyword"))
sql="select * from tblname where "
if smethod="基本查询" then
select case sproject
case "id" sql=sql&"id='"&keyword&"'"
case "title" sql=sql&"title='"&keyword&"'"
case "sdate" sql=sql&"sdate='"&keyword&"'"
case "stime" sql=sql&"stime='"&keyword&"'"
case "caseid" sql=sql&"caseid='"&keyword&"'"
end select
elseif smethod="模糊查询" then
select case sproject
case "id" sql=sql&"id like '%"&keyword&"%'"
case "title" sql=sql&"title like '%"&keyword&"%'"
='"&keyword&"'"
case "sdate" sql=sql&"sdate like '%"&keyword&"%'"
case "stime" sql=sql&"stime like '%"&keyword&"%'"
case "caseid" sql=sql&"caseid like '%"&keyword&"%'"
end select
end if

strconn = "Driver={SQL erver};Description=sqldemo;SERVER=127.0.0.1;UID=LoginID;PWD=Password;DATABASE=Database_Name"
set conn = server.createobject("adodb.connection")
conn.open strconn

set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3

do while not rs.eof
bb=rs(0)
response.write "bb"
rs.movenext
Loop
rs.close
set rs=nothing
conn.close
set conn=nothing

%>
ksy 2002-12-22
  • 打赏
  • 举报
回复
根据选择查询方式改变查询的SQL语句。

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧