从数据库中动态选取下拉列表的方法

时间： 2021-07-31 作者：daque

有一页填词的页面，个中有几个下拉表单是经过一个表的某个字段动静天生，比方省底下的都会名，蓄意采用某一个省即可机动在另一下拉表单内天生都会名，.....而后提交给asp处置介入到其余一个表内。 <form name=f1 method="post"> <% opendb objconn, "xxxx" set rsclass = objconn.execute("select * from class order by fldclass") if rsclass.eof then response.write "没有记载。<br>" else response.write "<select name=""class"" style=""font-size: 9pt"" size=10" & _ " onchange=""classselected(this);"" >" sjavascript = "function classselected(elem){" &_ vbcrlf & _ "for (var i = document.f1.sort.options.length; i >= 0; i--){" & vbcrlf & _ "document.f1.sort.options[i] = null;" & _ vbcrlf do until rsclass.eof if slastclass <> rsclass("fldclass") then slastclass = rsclass("fldclass") response.write "<option value=" & rsclass("fldid") & ">" & slastclass & "</option>" sjavascript = sjavascript & "}" & vbcrlf & _ "if (elem.options[elem.selectedindex].value==" & _ rsclass("fldid") & "){" & vbcrlf end if sjavascript = sjavascript & _ "document.f1.sort.options[document." & _ "f1.sort.options.length] = new option(’" & _ rsclass("fldsort") & "’,’" & rsclass("fldid") & "’);" & _ vbcrlf rsclass.movenext loop response.write "</select>" response.write "<select name=""sort"" style=""font-size: 9pt"" size=10>" response.write "<option>[请采用]</option>" response.write "</select>" sjavascript = sjavascript & vbcrlf & "}" & vbcrlf & "}" & vbcrlf response.write "<scr" & "ipt language=""javascript"">" & vbcrlf response.write sjavascript & vbcrlf & "</scr" & "ipt>" & vbcrlf end if rsclass.close set rsclass = nothing%> </form>

从数据库中动态选取下拉列表的方法

相关推荐

推荐下载

热门阅览

最新排行