[请教] 下拉菜单如何获取显示数据值 - 编程论坛

#2

yms1232009-11-16 16:09

能否截图说明？

#3

mgmt_asp2009-11-16 16:47

程序代码：

假如现在选取了CCC 并且提交了

然后在修改页面里怎么让提交的值为selected选定状态呢(不是选定状态也没关系只要提交的值能显示就行)

我目前能想到的方法是

程序代码：

dim rs,sql,rsa,sqla
set rs=server.createobject("adodb.recordset")
sql="select * from table where ck='ccc'"
rs.open sql,conn,1,1
response.write "<option selected>"&rs("ck")&"</option>

set rsa=server.createobject("adodb,recordset")
sqla="select * from table where ck<>'ccc'"
rsa.open sqla,conn,1,1
if not rsa.eof then
for i=rsa.recordcount
rsponse.write "<option>"&rsa("ck")&"</option>
rsa.movenext
if rs.eof then
exit for
end if
next
end if

可是老觉得这样写有点不大靠谱,太烦琐了..

还请斑竹大人及各位达人指点,谢谢

#4

yms1232009-11-16 17:33

就是提交后页面刷新后select显示选中的那个选项？
<HTML>
<HEAD>
<script language="javascript">
function chChange(val)
{
   document.form1.ckvalue.value=val;//获取下拉列表选择的值
}
function Form1_Submit()
{
   //提交表单代码
   documemt.form1.action=self.location.href;//提交到本页(self.location.href是获得当前页的URL)
   document.form1.target="_self";//当前页显示提交的页面
   document.form1.submit();//提交表单
}
</script>
</HEAD>
<body>
<form name="form1" method="post" >
<select name="ck" onChange="chChange(this.options[this.selectedIndex].text);">
<%
set rsa=server.createobject("adodb,recordset")
sqla="select * from table"
rsa.open sqla,conn,1,1
Do Until rsa.EOF
   IF Request.Form("ckvalue")=rsa("ck") Then'判断如果提交的值等于某个选项的值，则选中selected该项
      rsponse.write "<option selected>"&rsa("ck")&"</option>"
   Else
      rsponse.write "<option>"&rsa("ck")&"</option>"'否则就是正常显示
   End IF
  rsa.MoveNext
Loop
%>
</select>
<input type="hidden" name="ckvalue" />
<input type="button" onClick="Form1_Submit();" mame="submit" value="提交" />
</form>
</body>
</html>

#5

mgmt_asp2009-11-17 00:47

yes!!!
谢谢yms