注册 登录
编程论坛 ASP技术论坛

有关于下拉菜单问题,有请高手指教!

huade 发布于 2008-03-06 11:02, 587 次点击
产品> 系列 > 型号>
我各做一个下拉菜单表。
代码如下:
<body>
<form id="form1" name="form1" method="POST" action="<%=MM_editAction%>">
  <table width="750" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <td height="35" align="left" valign="middle">请选择产品品牌:
        <select name="cp" id="cp">
          <option value=""></option>
          <%
While (NOT pl_cp.EOF)
%>
          <option value="<%=(pl_cp.Fields.Item("mctl_name_eng").Value)%>"><%=(pl_cp.Fields.Item("mctl_name_eng").Value)%></option>
          <%
  pl_cp.MoveNext()
Wend
If (pl_cp.CursorType > 0) Then
  pl_cp.MoveFirst
Else
  pl_cp.Requery
End If
%>
                </select></td>
    </tr>
    <tr>
      <td height="35" align="left" valign="middle">请选择品牌系列:
        <select name="lx" id="lx">
          <option value=""></option>
          <%
While (NOT pl_lx.EOF)
%>
          <option value="<%=(pl_lx.Fields.Item("ctl_name_eng").Value)%>"><%=(pl_lx.Fields.Item("ctl_name_eng").Value)%></option>
          <%
  pl_lx.MoveNext()
Wend
If (pl_lx.CursorType > 0) Then
  pl_lx.MoveFirst
Else
  pl_lx.Requery
End If
%>
                </select></td>
    </tr>
    <tr>
      <td height="35" align="left" valign="middle">请选择品牌型号:
        <select name="xh" id="xh">
          <option value=""></option>
          <%
While (NOT pl_hx.EOF)
%>
          <option value="<%=(pl_hx.Fields.Item("cpxh_name_eng").Value)%>"><%=(pl_hx.Fields.Item("cpxh_name_eng").Value)%></option>
          <%
  pl_hx.MoveNext()
Wend
If (pl_hx.CursorType > 0) Then
  pl_hx.MoveFirst
Else
  pl_hx.Requery
End If
%>
                </select></td>
    </tr>
  </table>
  
  <input type="hidden" name="MM_insert" value="form1">
</form>
</body>

如果我在下拉表选中某产品的就要转向该产品的系列和型号。

单击某菜单就显示该内容的选项
0 回复
1