标题:如何动态根据 select 控件中的内容进行 显示
取消只看楼主
afliult
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2007-7-22
 问题点数:0 回复次数:2 
如何动态根据 select 控件中的内容进行 显示

下面是我写ASP 程序时所碰到的一个问题:
我想选择男,那么就只显示性别为男的学生,
如果选择女,那么就只显示性别为女的学生,
下面的代码为什么实现不了,请各位大师指教


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

<html>
<head>
<title> 学生情况表登记 </title>
</head>

<script language=javascript>
function bao(s)
{
<%
session("this_sex")=s
%>
}
</script>

<body>

<form method="post" action="select02.asp">

<p align=center>

<select name=sel onchange="bao(this.options[this.options.selectedIndex].value)">
<option value="全部">全部
<option value="男" <% if session("this_sex")="男" then Response.write "selected" %> >男
<option value="女" <% if session("this_sex")="女" then Response.write "selected" %> >女
</select>

<input class="button" type="submit" name="Submit" value="确定">

</p>

<TABLE width="680" border=0 align="center" cellPadding=4 cellSpacing=1 bgcolor="#CCCCCC" class="table">
<tr align="center">
<td width="48" bgcolor="#f7f7f7">编号</td>
<td width="166" bgcolor="#f7f7f7">姓名</td>
<td width="130" bgcolor="#f7f7f7">性别</td>
<td width="180" bgcolor="#f7f7f7">家庭地址</td>
<td width="150" bgcolor="#f7f7f7">毕业学校</td>
</tr>

<%
dim rs,sql
set rs = server.createobject("adodb.recordset")

if session("this_sex")="" or session("this_sex")="全部" then
sql="select * from student"
end if

if session("this_sex")="男" then
sql="select * from student where sex='男'"
end if

if session("this_sex")="女" then
sql="select * from student where sex='女'"
end if

rs.open sql,conn,1,1

dim i
i=0
do while not rs.eof
%>
<tr align="center">
<td width="48" bgcolor="#f7f7f7"><%=i+1%></td>
<td width="166" bgcolor="#f7f7f7"><%=rs("name")%></td>
<td width="130" bgcolor="#f7f7f7"><%=rs("sex")%></td>
<td width="180" bgcolor="#f7f7f7"><%=rs("addr")%></td>
<td width="150" bgcolor="#f7f7f7"><%=rs("gradeby")%></td>
</tr>
<%
i=i+1
rs.movenext
loop

rs.close
%>
</table>
</form>
</body>
</html>

JK4f2kgq.rar (13.34 KB) 如何动态根据 select 控件中的内容进行 显示


搜索更多相关主题的帖子: select 控件 动态 性别 
2007-09-09 21:53
afliult
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2007-7-22
得分:0 
我把我的源码放在后面,请下载修改后,上传,谢谢!
希望能和各位大师交个朋友
QQ: 397437671
2007-09-09 21:56
afliult
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2007-7-22
得分:0 

谢谢这位大师,现在有用了

2007-09-10 09:32



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-168809-1-1.html




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

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