高难度，挑战性问题———关于从数据库中读字段值、把读出的值作为下拉菜单选项的问题（100）

Question

给你一个两级的,自己改吧
<SCRIPT language=JavaScript>
<!-- Begin
var hy_arry = new Array();
var hy_arrgrp = new Array();<% 
dim i
i=0
bigsql="select * from jiamei_big_product order by id"
set bigrs=conn.execute(bigsql)
do while not bigrs.eof
smallsql="select * from jiamei_small_product where big_product='"&bigrs("big_product")&"'"
set smallrs=conn.execute(smallsql)
do while not smallrs.eof
%>
hy_arry[<%= i %>] ="<%= trim(smallrs("small_product")) %>";
hy_arrgrp[<%= i %>] ="<%= bigrs("big_product") %>";
<%
smallrs.movenext
i=i+1
loop
bigrs.movenext
i=i+1
loop
%>function selectChange(control, controlToPopulate, ItemArray, GroupArray)
{
  var myElee ;
  var x ;
  // Empty the second drop down box of any choices
  for (var q=controlToPopulate.options.length;q>=0;q--) controlToPopulate.options[q]=null;
  
  // ADD Default Choice - in case there are no values
  myElee = document.createElement("option") ;
  myElee.value = "" ;
  myElee.text = "请选择产品小类" ;
  controlToPopulate.add(myElee) ;
for ( x = 0 ; x < ItemArray.length  ; x++ )
    {
      if ( GroupArray[x] == control.value )
        {
          myElee = document.createElement("option") ;
          myElee.value = ItemArray[x] ;
          myElee.text = ItemArray[x] ;
          controlToPopulate.add(myElee) ;
        }
    }
}
//  End -->
</SCRIPT><td height="25">大类: 
                  <SELECT  name=big_product class="button" onchange=         "selectChange(this, frm_search.small_product, hy_arry, hy_arrgrp);"  onkeydown="if(event.keyCode==13)event.keyCode=9">
                            <OPTION value=0 selected>选择产品大类</OPTION>
                            <% do while not classrs.eof %>
                            <OPTION value="<%= classrs("big_product") %>"><%= classrs("big_product") %></OPTION>
                            <% classrs.movenext
loop
      %>
                          </SELECT></td>
              </tr>
  <tr> 
                <td height="25">小类: 
                  <select name=small_product  onkeydown="if(event.keyCode==13)event.keyCode=9">
                            <option value="" selected>请选择产品小类</option>
                          </select><% 
classrs.close

%></td>

Answer 1

在论坛ASP版里面搜索一下，会找到你要的答案的。关键字“联动”

Answer 2

http://www.tn99.com/myblog/blogview.asp?logID=49&cateID=2

Answer 3

软件名称：百无趣（电影吧）全站程序3.0版！
介绍：提供全套影视链接维护，设置。电影发布修改等功能，全部动态，纯ASP代码编写。
软件网站：http://www.buy57.com
http://www.buy57.com/down/buy57.com.rar   
软件类型：国产软件 / 简体中文 / 共享软件
应用平台：Win95/98/NT/2000/XP