在DREAMWEAVER MX中，两个下拉式文本框，内容连接数据库中的两个表，在一个表单中，如何选中一个下拉文本框一条后，按照选中的下拉文本框

用iframe动态读取数据，构造select,然后parent.td.innerHTML=

解决方案 »

  1.   

    lgchao(),你好，可以说得更详细一些吗？
      

  2.   

    <%
    dim count
    set rsl=server.createobject("adodb.recordset")
    sqltext="select * from Class_2"
    rsl.open sqltext,conn,1,1
    %>
    <script language = "JavaScript">
    var onecount;
    onecount=0;
    subcat = new Array();
            <%
            count = 0
            do while not rsl.eof 
            %>
    subcat[<%=count%>] = new Array("<%= trim(rsl("Class_1_ID"))%>","<%= trim(rsl("Class_2_Name"))%>","<%= trim(rsl("ID"))%>");
            <%
            count = count + 1
            rsl.movenext
            loop
            rsl.close
            %>
    onecount=<%=count%>;function changelocation(locationid)
        {
        document.myform.Class_2_name.length = 0;
    document.myform.txt.value=document.myform.Class_1_name.options[document.myform.Class_1_name.selectedIndex].text;
    var locationid=locationid;
        var i;
        for (i=0;i < onecount; i++)
            {
                if (subcat[i][0] == locationid)
                { 
                    document.myform.Class_2_name.options[document.myform.Class_2_name.length] = new Option(subcat[i][1]);
                }        
            } 
    }    
    </script>
    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
    <html>
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
    <title>无标题文档</title>
    </head><body>
    <form method='POST' action='eshop/splb.asp' target="_blank" name="myform">
      <input name='Product_Name' type='text' class='a' style="font-size: 12px" value="请输入商品名称" size='14'>
      <input name="image" type="image" src="eshop/images/fint.gif" alt="查询" width="21" height="20">
      <select name='Class_1_name' size='1' class="top" id="Class_1_name" style="font-size: 14px" tabindex='0'  onChange="changelocation(document.myform.Class_1_name.options[document.myform.Class_1_name.selectedIndex].value)">
        <option selected value="">==请选栏目==</option>
        <%set rs_class_1_name=server.CreateObject("adodb.recordset")
       rs_class_1_name.open "select * from class_1" ,conn,1,1
       While Not rs_class_1_name.EOF%>
        <option value="<%=rs_class_1_name("Id")%>"> 
        <% =rs_class_1_name("Class_1_Name")%>
        </option>
        <%
           rs_class_1_name.MoveNext
         Wend
      rs_class_1_name.close
      %>
      </select>
      <select name="Class_2_name" size='1' class='a' id="Class_2_name" style="font-size: 14px" tabindex='0'>
        <option selected value="">==请选栏目==</option>
      </select>
      <input type=hidden name=txt>
      <input name="cha" type="hidden" id="cha" value="1">
    </form>
    </body>
    </html>