.....
select.options[i].selected=true;
.....

解决方案 »

  1.   


    sql = "select * from member where id = "&id&""
    rs.open sql,conn,1,1
    if not(rs.bof and rs.eof) then
       province = rs("province")
       city = rs("city")
    end if
    <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>
      <%
      sql = "select * from city where Shengid = "&province&""
      rs.open sql,conn,1,1
      do while not rs.eof
      if rs("id") = city then
         response.Write "<option value="&rs("id")&" selected>"&rs("shiname")&"</option>"
      else
         response.Write "<option value="&rs("id")&">"&rs("shiname")&"</option>"
      end if
      rs.movenext
      loop
      rs.close
      %>
              </select>
    大概代码
    和前面的联动的JS没关系
      

  2.   

     if rs("id") = city then
                 response.Write "<option value="&rs("id")&" selected>"&rs("shiname")&"</option>"
              else
                 response.Write "<option value="&rs("id")&">"&rs("shiname")&"</option>"
              end if
    这个才是你问题的关键代码哦.
      

  3.   

    1.判断select选项中 是否存在Value="paraValue"的Item 
    2.向select选项中 加入一个Item 
    3.从select选项中 删除一个Item 
    4.修改select选项中 value="paraValue"的text为"paraText" 
    5.设置select中text="paraText"的第一个Item为选中 
    6.设置select中value="paraValue"的Item为选中 
    7.得到select的当前选中项的value 
    8.得到select的当前选中项的text 
    9.得到select的当前选中项的Index 
    10.清空select的项 
    ------------------------------------------- 
    //1.判断select选项中 是否存在Value="paraValue"的Item 
    function jsSelectIsExitItem(objSelect,objItemValue) 

    var isExit = false; 
    for(var i=0;i<objSelect.options.length;i++) 

    if(objSelect.options[i].value == objItemValue) 

    isExit = true; 
    break; 


    return isExit; 
    } //2.向select选项中 加入一个Item 
    function jsAddItemToSelect(objSelect,objItemText,objItemValue) 

    //判断是否存在 
    if(jsSelectIsExitItem(objSelect,objItemValue)) 

    alert("该Item的Value值已经存在"); 

    else 

    var varItem = new Option(objItemText,objItemValue); 
    // objSelect.options[objSelect.options.length] = varItem; 
    objSelect.options.add(varItem); 
    alert("成功加入"); 

    } //3.从select选项中 删除一个Item 
    function jsRemoveItemFromSelect(objSelect,objItemValue) 

    //判断是否存在 
    if(jsSelectIsExitItem(objSelect,objItemValue)) 

    for(var i=0;i<objSelect.options.length;i++) 

    if(objSelect.options[i].value == objItemValue) 

    objSelect.options.remove(i); 
    break; 


    alert("成功删除"); 

    else 

    alert("该select中 不存在该项"); 

    } //4.修改select选项中 value="paraValue"的text为"paraText" 
    function jsUpdateItemToSelect(objSelect,objItemText,objItemValue) 

    //判断是否存在 
    if(jsSelectIsExitItem(objSelect,objItemValue)) 

    for(var i=0;i<objSelect.options.length;i++) 

    if(objSelect.options[i].value == objItemValue) 

    objSelect.options[i].text = objItemText; 
    break; 


    alert("成功修改"); 

    else 

    alert("该select中 不存在该项"); 

    } //5.设置select中text="paraText"的第一个Item为选中 
    function jsSelectItemByValue(objSelect,objItemText) 

    //判断是否存在 
    var isExit = false; 
    for(var i=0;i<objSelect.options.length;i++) 

    if(objSelect.options[i].text == objItemText) 

    objSelect.options[i].selected = true; 
    isExit = true; 
    break; 


    //Show出结果 
    if(isExit) 

    alert("成功选中"); 

    else 

    alert("该select中 不存在该项"); 

    } //6.设置select中value="paraValue"的Item为选中 
    //document.all.objSelect.value = objItemValue; //7.得到select的当前选中项的value 
    //var currSelectValue = document.all.objSelect.value; //8.得到select的当前选中项的text 
    //var currSelectText = document.all.objSelect.options[document.all.objSelect.selectedIndex].text; //9.得到select的当前选中项的Index 
    //var currSelectIndex = document.all.objSelect.selectedIndex; //10.清空select的项 
    // document.all.objSelect.options.length = 0;