第二个Select里的Option随第一个Select的选择从数据库里面读取选择该怎么写?

eastone111 2004-01-13 12:32:36
谢谢!
...全文
108 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
jumpnew929 2004-01-13
  • 打赏
  • 举报
回复
post:

<form method=post action=currentfile.asp><select name=c1 onchange=submit()><option>111<option>222</select></form>
<select name=c2>
<%
if(Request.Form("c1"))!="undefined")
{
//相关查询及response.write
}
%>
</select>
eastone111 2004-01-13
  • 打赏
  • 举报
回复
用Post实现的源代码呢?能否给详细说明一下
谢谢楼上两位
zhlym 2004-01-13
  • 打赏
  • 举报
回复
你查一下关健词"三动联动" 找找
jumpnew929 2004-01-13
  • 打赏
  • 举报
回复
响应第一个select的onchange不是就可以了吗?用GET,POST还是隐含框架那就随便你了哦
eastone111 2004-01-13
  • 打赏
  • 举报
回复
谢谢
eastone111 2004-01-13
  • 打赏
  • 举报
回复
不行啊
<tr>
<td>大类:</td>
<td>
<%
sql="select * from TBFstLevel"
rs.open sql,conn,1,3
%>
<select name=DocLevelFirst size=1 onChange=submit()>
<%do while not rs.eof%>
<option value=<%=rs("FstLevel")%>><%=rs("FstLevel")%></option>
<%
rs.movenext
loop
%>
</select>
<%
rs.close()
%>
</td>
</tr>
<tr>
<td>小类:</td>
<td>
<select name=DocLevelSecond size=1>
<%
dim SelLevel1
if request.form("DocLevelFirst")<>"" then
SelLevel1=trim(request.form("DocLevelFirst"))
sql="select SndLevel from TBSndLevel where FstLevel='"& SelLevel1 &"'"
rs.open sql,conn,1,3
do while not rs.eof
response.write "<option value="
response.write rs("SndLevel")
response.write ">"
response.write rs("SndLevel")
response.write "</option>"
rs.movenext
loop
rs.close
else
response.write "<option value=null>"
response.write "没有大类名称"
response.write "</option>"
end if
%>
</select>
</td>
</tr>
jumpnew929 2004-01-13
  • 打赏
  • 举报
回复
你没有加form是提交不出去的哦
PPLUNCLE 2004-01-13
  • 打赏
  • 举报
回复
http://expert.csdn.net/Expert/xsl/Reply_Xml.asp?Topicid=2646938
eastone111 2004-01-13
  • 打赏
  • 举报
回复
不行啊
<tr>
<td>大类:</td>
<td>
<%
sql="select * from TBFstLevel"
rs.open sql,conn,1,3
%>
<select name=DocLevelFirst size=1 onChange=submit()>
<%do while not rs.eof%>
<option value=<%=rs("FstLevel")%>><%=rs("FstLevel")%></option>
<%
rs.movenext
loop
%>
</select>
<%
rs.close()
%>
</td>
</tr>
<tr>
<td>小类:</td>
<td>
<select name=DocLevelSecond size=1>
<%
dim SelLevel1
if request.form("DocLevelFirst")<>"" then
SelLevel1=trim(request.form("DocLevelFirst"))
sql="select SndLevel from TBSndLevel where FstLevel='"& SelLevel1 &"'"
rs.open sql,conn,1,3
do while not rs.eof
response.write "<option value="
response.write rs("SndLevel")
response.write ">"
response.write rs("SndLevel")
response.write "</option>"
rs.movenext
loop
rs.close
else
response.write "<option value=null>"
response.write "没有大类名称"
response.write "</option>"
end if
%>
</select>
</td>
</tr>

28,407

社区成员

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

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