一聚教程网:一个值得你收藏的教程网站
PHP教程 Css教程 操作系统 数据库
辽买买
桩桩
碧波庭
消费保
什么垃圾
爱康体检宝
QQ同步助手
藏汉翻译通
搜款网
奇兵到家
《寻找夏日的宝物》全事件流程如何过
苹果版的avnight卡播放面问题解决
久草视频观看地址介绍
五黑一白是什么梗 五黑一白是什么意思
《伪人测试》网页版入口一览
《周五夜放克》网页版地址一览
苹果iOS系统怎么安装AVnight(爱威奶)软件
解决IDEA springboot"spring-boot-maven-plugin"报红问题方法
字母圈是什么梗 字母圈什么意思
《梦幻西游手游》梦长安奇遇事件攻略汇总
时间:2008-02-11 编辑:简简单单 来源:一聚教程网
<% response.write ""&vbCrlf strJS="function classselect(obj){for (var i=document.refer.class_c_id.options.length;i>=0;i--){document.refer.class_c_id.options[i]=null;"&vbCrlf '清除原有option对象的JS代码 sql="select class_id,class_name from class order by class_order" set rs=conn.execute(sql) while not rs.eof response.write " if class_id<>"" then if rs("class_id")=CInt(class_id) then '使相对应的父类的option上为selected。一定加CInt函数,否则不行 response.write " selected " end if end if response.write ">"&rs("class_name")&""&vbCrlf strJS=strJS&"}"&vbCrlf&"if (obj.options[obj.selectedIndex].value=="&rs("class_id")&"){"&vbCrlf sql1="select class_c_id,class_c_name from class_c where class_id="&rs("class_id")&" order by class_c_order" set rs1=conn.execute(sql1) while not rs1.eof strJS=strJS&"document.refer.class_c_id.options[document.refer.class_c_id.options.length]=new Option('"&rs1("class_c_name")&"','"&rs1("class_c_id")&"');"&vbCrlf rs1.movenext wend rs.movenext wend '为了使第一个子类的option不为空==================================================== if class_id="" then sql="select class_id,class_name from class" set rs=conn.execute(sql) sql="select class_c_id,class_c_name from class_c where class_id="&rs("class_id")&" order by class_c_order" else sql="select class_c_id,class_c_name from class_c where class_id="&class_id&" order by class_c_order" end if set rs=conn.execute(sql) while not rs.eof if class_c_id<>"" then if rs("class_c_id")=CInt(class_c_id) then '使相对应的子类的option上为selected。if放在字符串连接前面 strJS3="var option_length=document.refer.class_c_id.options.length;"&vbCrlf strJS2="document.refer.class_c_id.options[option_length].selected=true;"&vbCrlf else strJS3="" end if end if strJS1=strJS1&strJS3&"document.refer.class_c_id.options[document.refer.class_c_id.options.length]=new Option('"&rs("class_c_name")&"','"&rs("class_c_id")&"');"&vbCrlf rs.movenext wend '================================================================================== strJS=strJS&"}"&vbCrlf&"}"& vbCrlf response.write " " response.write "" response.write "" response.write ""&vbCrlf conn.close set conn=nothing %>
上一个: asp增加纪录后怎么马上得到新纪录的ID
下一个: asp在线人数统计