|
|
|
从数据库中动态选取下拉列表的方法 |
|
|
| http://www.iyit.net 日期：2005-11-24 17:47:52 来源：易特网络技术 点击： |
有一页填表的页面，其中有几个下拉表单是通过一个表的某个字段动态
生成，比如省下面的城市名，希望选择某一个省即可自动在另一下拉表
单内生成城市名，.....然后提交给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>
|
上一篇：perl的运算符号字符概述
下一篇：产生一个密码记录并发送给用户
[发送给好友] [打印本页] [关闭窗口] [返回顶部] 转载请注明来源：http://www.iyit.net |
|
| 特别声明： 本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转载的文章有版权问题请联系编辑人员，我们尽快予以更正。 |
| 责任编辑： |
投稿作者： 易特网络技术 |
| 信息来源： 易特网络技术 |
录入时间： 2005-11-24 17:47:52 |
| 浏览次数： |
投稿信箱： shtghy@163.com |
|
|
|
|
|
