| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 784 人关注过本帖
标题:[求助]下拉菜单查询,显示不能解决
只看楼主 加入收藏
zmw5112
Rank: 1
等 级:新手上路
帖 子:171
专家分:0
注 册:2005-12-11
收藏
 问题点数:0 回复次数:8 
[求助]下拉菜单查询,显示不能解决

一下是我根据论坛搜索写的代码,能执行,但我不会处理显示问题
<%
if len(request("keyword"))=0 then
response.write("请填写关键字!!")
Response.end
end if
keyword=request("keyword")


%>
<!--#include file="../inc/conn.asp" -->

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>您正在搜索有关 <%response.write(request("keyword"))%> 的信息!
</title>
<link href="../css/css.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0">

<%
if request.form("kh")="gs_name" then
strsql="select * from gs where gs_name like '%"&keyword&"%'"
end if
if request.form("kh")="tel" then
strsql="select * from gn where tel like '%"&keyword&"%'"
end if

set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strsql, conn, 1, 1
total=0
total=rs.recordcount
while not rs.eof
%>
<%
if len(rs("gs_name"))<>0 then
Response.Write(replace(rs("gs_name"),chr(13),"<BR>"))
else
Response.Write(" ")
end if
%><BR>
<%
if len(rs("tel"))<>0 then
Response.Write(replace(rs("tel"),chr(13),"<BR>"))
else
Response.Write(" ")
end if
%><BR>
如果我提交的是gs_name则tel不能显示并报错,如果提交tel上面那个rs gs_name报错,我现在想:怎样提交gs_name,那个tel不作处理,非常感谢

补充:关键是显示问题,SQL能正常判断要查询哪个表,但显示的时候没有被查询的到的表怎么办?比如查询了gs表,但下面还有要显示gn表的内容,这是肯定会报错,怎样才能让它不报错或不处理。

[此贴子已经被作者于2006-8-10 17:38:54编辑过]

搜索更多相关主题的帖子: 菜单 查询 
2006-08-10 17:28
hangxj
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:2045
专家分:0
注 册:2006-4-10
收藏
得分:0 
一种思路,可以像你查询表一样
通过
if request.form("kh")="gs_name" then
.....

来判断

如果查询的是gs_name
则显示gs_name表的内容.

......

具体的等明天再帮你,下班了

http://www./
2006-08-10 17:47
zmw5112
Rank: 1
等 级:新手上路
帖 子:171
专家分:0
注 册:2005-12-11
收藏
得分:0 
非常感谢你,我也先研究一下,关键是他们的关系,我还没有弄清楚
2006-08-10 17:52
hangxj
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:2045
专家分:0
注 册:2006-4-10
收藏
得分:0 

<%
if len(request("keyword"))=0 then
response.write("请填写关键字!!")
Response.end
end if
keyword=request("keyword")
%>

<!--#include file="../inc/conn.asp" -->

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>您正在搜索有关 <%response.write(request("keyword"))%> 的信息!
</title>
<link href="../css/css.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0">

<%
if request.form("kh")="gs_name" then
strsql="select * from gs where gs_name like '%"&keyword&"%'"
end if
if request.form("kh")="tel" then
strsql="select * from gn where tel like '%"&keyword&"%'"
end if

set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strsql, conn, 1, 1
total=0
total=rs.recordcount
while not rs.eof
%>
<%
'这加上
if request.form("kh")="gs_name" then

if len(rs("gs_name"))<>0 then '至于要不要对是否为空来处理就看你自己的了
Response.Write(replace(rs("gs_name"),chr(13),"<BR>"))
else
Response.Write(" ")
end if
%><BR>
<%elseif request.form("kh")="tel" then%>
<%
if len(rs("tel"))<>0 then '至于要不要对是否为空来处理就看你自己的了
Response.Write(replace(rs("tel"),chr(13),"<BR>"))
else
Response.Write(" ")
end if
%><BR>
<%end if%>


http://www./
2006-08-11 08:33
zmw5112
Rank: 1
等 级:新手上路
帖 子:171
专家分:0
注 册:2005-12-11
收藏
得分:0 
由于你昨天的提示,我晚上回去就是按照你这样改的,没有问题,不过我还有很多if,这样会不会影响速度,我感觉有点慢,后来我又看了10天学ASP,里面说用
语句
elseif
....
elseif
.....
elseif
.....
end if
这样速度是不是很快,跟上面的比呢
2006-08-11 09:40
hangxj
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:2045
专家分:0
注 册:2006-4-10
收藏
得分:0 
你可以用if 也可以用switch

这些速度还跟你查询的数据快慢以及一些代码优化有关系

http://www./
2006-08-11 10:10
zmw5112
Rank: 1
等 级:新手上路
帖 子:171
专家分:0
注 册:2005-12-11
收藏
得分:0 
switch
这种语句是怎么写的,和if一样吗
2006-08-11 17:32
hangxj
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:2045
专家分:0
注 册:2006-4-10
收藏
得分:0 
switch(控制表达式)
{
case 测试值1:
语句1
break;
case 测试值2:
语句2
break;
case 测试值3:
语句3
break;
default:
默认执行语句
break;

}

注:(补充说明)
测试值后面是冒号(:)
break后面是分号(;)
default后面是冒号(:)

default 亦可用 case else 来替代



[此贴子已经被作者于2006-8-11 17:41:31编辑过]


http://www./
2006-08-11 17:35
zmw5112
Rank: 1
等 级:新手上路
帖 子:171
专家分:0
注 册:2005-12-11
收藏
得分:0 
谢谢你,我试试看,看看哪种比较快一些
2006-08-11 21:31
快速回复:[求助]下拉菜单查询,显示不能解决
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.042027 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved