可编辑的HTML下拉框

  <div style="position:absolute;">
                        <select name="sel_jbr" style="position:absolute;top:-8px; width: 80px; height: 20px; clip:rect(0 180 110 60) "
                                 onChange='jbr.value=this.options[this.selectedIndex].value'>
                               <%
                                    str_sql="select * from @@@ "
                                    MyDr=MyData.MyDataRead(myconn,str_sql)
                                    while MyDr.read()
                                        myselected=""
                                        if MyDr.item("mc")=jbr0 then myselected="selected"
                                %>
                                <option value=<%=MyDr.item("mc")%> <%=myselected%> ><%=MyDr.item("mc")%></option>
                                <%
                                    end while
                                    MyConn.Close()
                                %>
                        </select>
                        <input name="jbr" type="text" value="<%=jbr0%>"
                        style="position:absolute;top:-8px; width: 79px; height:21px">
</div>

做派车登记的时候，由于经办人太多，下拉框一条太长了，车队派车时，找自己名字比自己输入还难受，就改成这样了～其实就是下拉框和文本框重叠的一个效果，再加个onchange就OK了~