求大神帮小弟写asp一段代码.

[asp菜鸟进化中]

小弟分数不多.求大神帮忙改一段 asp 代码

第一次写联动代码.我自己写的这段代码..自己都搞晕了..
有哪里错请指出来!谢谢!

现在选择所有会员

                <option value="all">所有会员</option>

不显示这个.

  Response.Write("<option value='all'>所有会员</option>")

求帮助!!

<select name="User_ID" id="User_ID" onChange="changelocation(document.add.User_ID.options[document.add.User_ID.selectedIndex].value,document.add)">
                <option value="">请选择会员组</option>
                <option value="all">所有会员</option>
                <option value="1">尊贵会员9.9折</option>
                <option value="0">贵宾会员9折</option>
                <option value="2">代销会员7.5折</option>
                <option value="21">代销贵宾7折</option>
                <option value="22">代理会员6.8折</option>
                <option value="3">代理会员6.5折</option>
                <option value="4">合作伙伴6折</option>
                <option value="5">管理人员5折</option>
    </select>
<select name="user" id="user">
<option value="">请选择会员</option>
 <%
 If User_ID = "0,1,2,3,4,5,21,22" Then
  Set RsUser= Conn.Execute("SELECT * FROM user WHERE LV = "&User_ID)
  Do While Not RsUser.Eof
  Response.Write("<option value='"&RsUser(0)&"'>"&RsUser(1)&"</option>")
			  else
  Response.Write("<option value='all'>所有会员</option>")
  RsUser.MoveNext
  Loop
  elseIf User_ID = "all" Then
  Response.Write("<option value='all'>所有会员</option>")
			  else
  Response.Write("<option value='all'>所有会员</option>")
 End if
 Set RsUser = Nothing
 %>
 </select>

[木鱼的世界]

没有看明白你要问什么

[csdn_aspnet]

<form action="memberEdit.asp" method="post" name="form1"> <script> <!-- <% '二级数据保存到数组 Dim count1,cityRS,citySQL set cityRS=server.createobject("adodb.recordset") citySQL="select * from city order by shiorder" cityRS.open citySQL,conn,1,1 %> var subval2 = new Array(); //数组结构：一级根值,二级根值,二级显示值 <% count1 = 0 do while not cityRS.eof %> subval2[<%=count1%>] = new Array('<%=cityRS("Shengid")%>','<%=cityRS("id")%>','<%=cityRS("shiname")%>') <% count1 = count1 + 1 cityRS.movenext loop cityRS.close %> function changeselect1(locationid) { document.form1.city.length = 0; document.form1.city.options[0] = new Option('请选择城市',''); for (i=0; i<subval2.length; i++) { if (subval2[i][0] == locationid) {document.form1.city.options[document.form1.city.length] = new Option(subval2[i][2],subval2[i][1]);} } } //--> </script> <select name="province" class="buttonmain" id="province" onChange="changeselect1(this.value)"> <option value="">请选择省份</option> <% dim provinceRS,provinceSQL set provinceRS = server.createobject("adodb.recordset") provinceSQL = "select * from province order by shengorder" provinceRS.open provinceSQL,conn,1,1 do while not provinceRS.eof if provinceRS("id") = province then response.Write "<option value="&provinceRS("id")&" selected>"&provinceRS("shengname")&"</option>" else response.Write "<option value="&provinceRS("id")&">"&provinceRS("shengname")&"</option>" end if provinceRS.movenext loop provinceRS.close set provinceRS = nothing %> </select> <select name="city" class="buttonmain" id="city"> <option value="">请选择城市</option> </select> </form>