如何获取下拉菜单选项的值

[阳新互联]

我这里有个考勤系统需要做一点小修改，遇到一个语句不会写

动态的下拉菜单，我加了一个默认的选项 “全部” value是 1
我想写一个判断
如果这个下拉菜单获取的值是1 那么执行sql语句1
如果这个下拉菜单获取的值不是1 那么执行sql语句2

<form method="post" action="nowkqinfo.asp" name="deptform" id="deptform" >
职务：
<%
'读取部门职务
	set conn=opendb("oabusy","conn","accessdsn")
	set rs8=server.createobject("adodb.recordset")
	sql8="select DISTINCT userlevel from userinf"
	rs8.open sql8,conn,1
%>
<select size=1 name="userlevel">
<%
	if not rs8.eof and not rs8.bof then
		userlevel=rs8("userlevel")
	end if
	if request("userlevel")<>"" then
		userlevel=request("userlevel")
	end if
	while not rs8.eof and not rs8.bof
%>
<option value="1">全部</option>
<option value="<%=rs8("userlevel")%>"<%=selected(userlevel,rs8("userlevel"))%>><%=rs8("userlevel")%></option>
<%
		rs8.movenext
	wend
	conn.close
	set conn=nothing
	set rs8=nothing
%>
</select>
<input type="submit" value="查看"><input type="button" name="pintbtn" value="打印" onClick="printsub();">
</form>

另外如果sql语句有两个条件 像这样写对不对
sql="select * from userinf where userdept="&sqlstr(userdept)&" and userlever="& sqlstr(userlever)

[toury]

<form method="post" action="nowkqinfo.asp" name="deptform" id="deptform" >
职务：
<%
  '读取部门职务
  userlevel=requeest.form("userlevel")
  if userlevel="" then userlevel=1

  set conn=opendb("oabusy","conn","accessdsn")
  set rs8=server.createobject("adodb.recordset")
  if userlevel=1 then
    sql8="select DISTINCT userlevel from userinf"
  else
    sql8="另一个SQL语句"
  end if

  rs8.open sql8,conn,1,1
%>
<select size=1 name="userlevel" onchange="document.deptform.submit();">
<%
  do while not rs8.eof
    '如果rs8("userlevel")是文本
    if userlevel=rs8("userlevel") then sel=" selected" else sel=""
    '如果rs8("userlevel")是数字
    if userlevel=rscintrs(rs8("userlevel")) then sel=" selected" else sel="" 
    %>
    <option value="1" selected>全部</option>
    <option value="<%=rs8("userlevel")%>"<%=sel%>><%=rs8("userlevel")%></option>
    <%
    rs8.movenext
  loop
  if rs.state<>0 then rs.close
  set rs8=nothing
  conn.close:    set conn=nothing 
%>
</select>
<input type="submit" value="查看"><input type="button" name="pintbtn" value="打印" onClick="printsub();">
</form>

[toury]

   '如果rs8("userlevel")是文本
    if userlevel=rs8("userlevel") then sel=" selected" else sel=""
    '如果rs8("userlevel")是数字
    ''''''''''if userlevel=rscintrs(rs8("userlevel")) then sel=" selected" else sel="" 

[阳新互联]

我只是想简单的获取一个表单下拉菜单的值 如

<form method="post" action="nowkqinfo.asp" name="deptform" id="deptform" >
<select name="userdept">
 <option value=值1>1</option>
 <option value=值2>2</option>
 <option value=值3>3</option>
</select>

<select name="userlevel">
 <option value=值1>1</option>
 <option value=值2>2</option>
 <option value=值3>3</option>
</select>
<input type="submit" value="查看">
</form>

在下面我要获取userlevel这个下拉菜单的值 该怎么写
userlevel=request.form("userlevel")   ？？？

[wqjywyg2009]

request

[北京不不]

楼上的。你要在同一个页面马上获取下拉列表的值。然后根据值不同来执行不通的vbscript?
你要分清，你不提交，服务器就不晓得你选择了什么。
除非你选一个，就刷新一下。
<select name="userdept" onchange='document.formname.submit()'>
<option value=值1>1</option>
<option value=值2>2</option>
<option value=值3>3</option>
</select>

或者用ajax，就不用刷新页面。

[阳新互联]

我是需要点这个按钮进行提交啊<input type="submit" value="查看">
返回本页面form method="post" action="nowkqinfo.asp"

[toury]

[Quote=引用 5 楼 monitorli 的回复:]
我只是想简单的获取一个表单下拉菜单的值
[/Quote]

你要分清客户端和服务端变量。假设你在中国，服务器在美国，你点击下拉框的动作是在中国你的电脑（客户端）上的动作而取到的是你电脑上的变量值；而request.form("userlevel")需要你把你电脑的这个值传到美国的服务器上，在那里才能得到。这是WEB开发最基本的基础，一定要分清

[toury]

[Quote=引用 8 楼 monitorli 的回复:]

我是需要点这个按钮进行提交啊<input type="submit" value="查看">
返回本页面form method="post" action="nowkqinfo.asp"
[/Quote]
你仔细看3楼代码 ，都帮你写好了；连看也不看，你也太懒点了吧，呵呵

[阳新互联]

[Quote=引用 10 楼 toury 的回复:]
你仔细看3楼代码 ，都帮你写好了；连看也不看，你也太懒点了吧，呵呵
[/Quote]
看了啊 我都照着写一个了 需要改的那个东西我只截取出来一部分 3楼那个写法有点不适合

[toury]

嗯，可能你不需要选了下拉框就自动提交刷新网页，而是点个按钮再提交，那就:
<select size=1 name="userlevel" onchange="document.deptform.submit();">
--------->
<select size=1 name="userlevel">


'读取部门职务
userlevel=requeest.form("userlevel")'这是你想要的
if userlevel="" then userlevel=1

[孟子E章]

执行sql语句执行进行判断，判断语句写最前面

[shan1119]

参考：

<%@ Page aspcompat=true %>

<form method="get" action="nowkqinfo.asp" name="deptform" id="deptform" >
职务：
<%
'读取部门职务
    'set conn=opendb("oabusy","conn","accessdsn")
    'set rs8=server.createobject("adodb.recordset")
    'sql8="select DISTINCT userlevel from userinf"
    'rs8.open sql8,conn,1
%>
<select size=1 name="userlevel">
<option value="1">全部</option>
<option value="2"><%=2%></option>
<option value="3"><%=3%></option>
</select>
<input type="submit" value="查看"><input type="button" name="pintbtn" value="打印" onClick="printsub();">
</form>
<script>
function printsub(){
    alert(document.deptform.userlevel.value);
}
</script>