帮帮忙~~这三个下拉菜单能运行~~只是中间的下拉菜单选择后不能显示已选择的选项~~大家帮忙看看是什么问题~~谢谢~~

[Dadimamiilove]

帮帮忙~~这三个下拉菜单能运行~~只是中间的下拉菜单选择后不能显示已选择的选项~~大家帮忙看看是什么问题~~谢谢~~
<!--#include file="conn.asp"-->
<%
dim bid,cid
bid = request("bid") 'bid 大类id
cid = request("cid") 'cid 中类id

set rs=server.createobject("adodb.recordset")
sql = "select * from btype" '表一 大类表
rs.open sql,conn,1,3
strOption1 = "<option value='' selected style='BACKGROUND-COLOR: #eeeeee; COLOR: #ff0000'>==请选择==</option>"
do while not rs.eof
if cstr(rs("id")) = cstr(bid) then
strOption1 = strOption1 & "<option value='" & rs("id") & "' selected>" & rs("type") & "</option>"
else

strOption1 = strOption1 & "<option value='" & rs("id") & "'>" & rs("type") & "</option>"

end if
rs.movenext
loop

rs.close

if bid <> "" then
sql = "select * from mtype where bid=" & bid '表二 中类表 bid==表一中的id

rs.open sql,conn,1,3
strOption2 = "<option value='' selected style='BACKGROUND-COLOR: #eeeeee; COLOR: #ff0000'>==请选择==</option>"

do while not rs.eof
if cstr(rs("id")) = cstr(cid) then
strOption2 = strOption2 & "<option value='" & rs("id") & "' selected>" & rs("type") & "</option>"
else
strOption2 = strOption2 & "<option value='" & rs("id") & "'>" & rs("type") & "</option>"
end if
rs.movenext
loop
rs.close
end if

if cid <> "" then
sql = "select * from stype where mid= " & cid '表三 小类表 mid==表二的id
rs.open sql,conn,1,3
strOption3 = "<option value='' selected style='BACKGROUND-COLOR: #eeeeee; COLOR: #ff0000'>==请选择==</option>"
while not rs.eof
if cstr(rs("id")) = cstr(cid) then
strOption3 = strOption3 & "<option value='" & rs("id") & "' selected>" & rs("type") & "</option>"
else
strOption3 = strOption3 & "<option value='" & rs("id") & "'>" & rs("type") &"</option>"
end if
'strOption3 = strOption3 & "<option value='" & rs("id") & "'>" & rs("type") & "</option>"

rs.movenext
wend
rs.close
end if

%>
<select onchange="changeb(this.value)" name="bid"><%=strOption1%></select>
<select onchange="change(this.value)" name="cid"><%=strOption2%></select>
<select name="typeid"><%=strOption3%></select>
<script language="javascript">
<!--
function changeb(bid){
location.assign("1.asp?bid=" + bid);
}

function change(cid){
location.assign("1.asp?bid=<%=bid%>&cid=" + cid);
}
-->
</script>

[三楼の郎]

<!--#include file="conn.asp"-->
<%
dim bid,cid
bid = request("bid") 'bid 大类id
cid = request("cid") 'cid 中类id

set rs=server.createobject("adodb.recordset")
sql = "select * from btype" '表一 大类表
rs.open sql,conn,1,3
strOption1 = " <option value='' selected style='BACKGROUND-COLOR: #eeeeee; COLOR: #ff0000'>==请选择== </option>"
do while not rs.eof
if cstr(rs("id")) = cstr(bid) then
strOption1 = strOption1 & " <option value='" & rs("id") & "' selected>" & rs("type") & " </option>"
else

strOption1 = strOption1 & " <option value='" & rs("id") & "'>" & rs("type") & " </option>"

end if
rs.movenext
loop

rs.close

if bid <> "" then
sql = "select * from mtype where bid=" & bid '表二 中类表 bid==表一中的id

rs.open sql,conn,1,3
strOption2 = " <option value='' selected style='BACKGROUND-COLOR: #eeeeee; COLOR: #ff0000'>==请选择== </option>"

do while not rs.eof
if cstr(rs("id")) = cstr(cid) then 'cid改成bid
strOption2 = strOption2 & " <option value='" & rs("id") & "' selected>" & rs("type") & " </option>"
else
strOption2 = strOption2 & " <option value='" & rs("id") & "'>" & rs("type") & " </option>"
end if
rs.movenext
loop
rs.close
end if

if cid <> "" then
sql = "select * from stype where mid= " & cid '表三 小类表 mid==表二的id
rs.open sql,conn,1,3
strOption3 = " <option value='' selected style='BACKGROUND-COLOR: #eeeeee; COLOR: #ff0000'>==请选择== </option>"
while not rs.eof
if cstr(rs("id")) = cstr(cid) then
strOption3 = strOption3 & " <option value='" & rs("id") & "' selected>" & rs("type") & " </option>"
else
strOption3 = strOption3 & " <option value='" & rs("id") & "'>" & rs("type") &" </option>"
end if
'strOption3 = strOption3 & " <option value='" & rs("id") & "'>" & rs("type") & " </option>"

rs.movenext
wend
rs.close
end if

%>
<select onchange="changeb(this.value)" name="bid"> <%=strOption1%> </select>
<select onchange="change(this.value)" name="cid"> <%=strOption2%> </select>
<select name="typeid"> <%=strOption3%> </select>
<script language="javascript">
<!--
function changeb(bid){
location.assign("1.asp?bid=" + bid);
}

function change(cid){
location.assign("1.asp?bid= <%=bid%>&cid=" + cid);
}
-->
</script>

[Dadimamiilove]

还是不行~~

[Dadimamiilove]

没高手啦~~~