跳转菜单的问题,急~!

zlydaaa 2003-09-29 04:29:00
我的一个类似于省和县市的跳转菜单放在表单外面运行通过,但是把它放到一个表单里面,也就是<form></form>之间的时候,第二个菜单(县市)就显示不了,
请教是什么原因,怎么解决?
...全文
29 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
zlydaaa 2003-09-29
  • 打赏
  • 举报
回复
<%
Dim Rs,sql,i,rw
Dim MyArray()
set rs=server.createobject("adodb.recordset")
SQL="select * from province order by proNum"
Rs.Open SQL,conn,3,2
Rs.MoveFirst
redim MyArray(Rs.RecordCount-1)
%>


<select id=select1 style="WIDTH: 150px" name=province>
<option value='all' selected>--省名--</option>
<option value=<%=Rs("proNum")%>><%=Rs("proName")%></option>
<%
MyArray(0)=Rs("proNum")
Rs.MoveNext
for i=1 to Rs.RecordCount-1
%>
<option value=<%=Rs("proNum")%>><%=Rs("proName")%></option>
<%
MyArray(i)=Rs("proNum")
Rs.MoveNext
next
%>
</select>
<%
Rs.Close
%>
</td>
<td width="96">
<%
for i=0 to ubound( MyArray)
SQL="select * from City where CityId like '" & MyArray(i) & "%'"
'Response.End
Rs.Open SQL,conn,3,2
if Rs.RecordCount >0 then
Rs.MoveFirst
%>
<SELECT id=select<%=MyArray(i)%> style="WIDTH: 200px;display='none'" name=city>
<option selected value='all'>-----县市名-----</option>
<%do while not Rs.EOF %>
<OPTION value="<%=Rs("CityId")%>"><%=Rs("CityName")%></OPTION>
<%
Rs.MoveNext
loop
%>
</SELECT>
<%
end if
Rs.Close
next
%>
<SCRIPT LANGUAGE=vbscript>
<!--

dim obj,lastObj
lastObj="select01"

window.execScript "select01.style.display='block'" ,"vbs"
Sub select1_onchange
obj="select"+select1.value
if obj<>lastObj and isobject(eval(obj)) then
window.execScript Obj & ".style.display='block'" ,"vbs"
window.execScript lastObj & ".style.display='none'" ,"vbs"
lastObj="select"+ select1.value
end if
End Sub

-->
</SCRIPT>



大概的也就这样,其实这段代码还是我在CSDN的论坛的一篇帖子上找的,自己改了一点,
在<form>表单外能实现,但是移到表单内,CITY菜单就没有了
lincoke 2003-09-29
  • 打赏
  • 举报
回复
在你对菜单处理时要加上 表单名称.菜单名称...........=..........
如frm_re.menu.options[1].selected=true;
lincoke 2003-09-29
  • 打赏
  • 举报
回复
源码贴上来。
glasses1999 2003-09-29
  • 打赏
  • 举报
回复
贴出你的源码

28,390

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧