<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--){"
"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 & "}"
"if (elem.options[elem.selectedindex].value=="
rsclass("fldid") & "){"
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 & "}" & "}"
response.write "<scr" & "ipt language=""javascript"">"
response.write sjavascript & "</scr" & "ipt>"
end if
rsclass.close
set rsclass = nothing
%>
</form>
如对本文有疑问, 点击进行留言回复!!
LeetCode 17. Letter Combinations of a Phone Number
解决使用commit提交大文件无法推送到远程库问题及git rebase使用详解
一不小心git rebase后出现(master|REBASE 1/10)的问题及解决办法
网友评论