ASP中SELECT下拉菜单同时获取VALUE和TEXT值的实现代码

    在1个注册页面1.asp ,先选择镇,如下代码:

    
    <form action="reguser2.asp" method="post" name="form1" onSubmit="return checksumit();">
    <table width="100%" border="1" cellspacing="0" cellpadding="0">
    <tr>
    <td>所在镇:
    <%
    sql="select * from zhen"
    set rs=server.createobject("adodb.recordset")
    rs.open sql,conn,3,2
    %>
    <select name="zhen" id="zhen">
    <option value=-1>选择镇</option>
    <%
    if rs.eof and rs.bof then
    response.Write("<option value=-1>没有镇</option>")
    else
    do while not rs.eof
    %>
    <option value="<%=rs("z_id")%>"><%=rs("z_name")%></option>    //这里value  和 text 的值 在数据库中获得  ,但变量"zhen" 只能获得value的值...如何获得选中的 text值呢?
    <%
    rs.movenext
    loop
    end if%>
    </select></td>
    </tr>
    <tr align="center">
    <td><input type="submit" name="Submit" value="下一步" onclick="Javascript:callvalue()"></td>  //第三步,传递到下一页按钮这里增加 onclick取得值
    </tr>
    </table>
    
    <input type="hidden" name ="sendvalue" />  //第一步,这里增加一个hidden的input控件
    <script language="JavaScript">   //第二步,这里写一个获得text值的函数
    function callvalue() {
    sendvalue = document.form1.zhen.item(document.form1.zhen.selectedIndex).text;
    //alert(sendvalue);
    document.form1.sendvalue.value = sendvalue;
    form1.submit();
    }
    </script>

    最后,在另外一个页面 2.asp 里面直接取选定的text值 request.Form(“sendvalue”)

    这样,可以不频繁读取数据库取得值