表单提交，我的代码怎么没我要的效果，帮看看

WEB 开发	开发语言	Java 技术	.Net 技术	数据库	硬件使用
图象媒体	Linux/Unix	移动平台	嵌入开发	Windows 专区	软件工程

你的位置：首页 > WEB 开发 > ASP

[ 来源：ITWENKU 时间：2006-9-18 20:47:42 | 浏览：192人次 ]

我要实现的要求是：我选择列表/菜单（kinds）中的一项，然后提交

表单到这个页面，列表/菜单（kinds）中被选择的项要是我刚选择的项
（现在的情况每次都是所有类别这项被选定）

部分代码如下，文件名为list.asp
----------------list.asp----------------------------------------
<%
kinds=trim(request.Form("kinds"))
rs_kinds1.open "select id,kindid1,kindname1 from kinds1",conn,1,1
%>

<form name="urlform" method="post" action="list.asp">
小说类别：<select name="kinds">
<option value="0" selected>所有类别</option>

<%
rs_kinds1.movefirst
do while not rs_kinds1.eof
if rs_kinds1("kindid1")=kinds then
%>

<option value=<%=rs_kinds1("kindid1")%> selected >╋ <%=rs_kinds1("kindname1")%></option>

<%else%>

<option value=<%=rs_kinds1("kindid1")%>>╋ <%=rs_kinds1("kindname1")%></option>

<%
end if

rs_kinds1.movenext
loop
%>

</select>
......

<select name="kinds">提交表单后在本页面用
dim kinds
kinds=request.form("kinds")
<option value=<%=rs_kinds1("kindid1")%> <%if kinds=rs_kinds1("kindid1") then response.write "selected"%>>╋ <%=rs_kinds1("kindname1")%

<%
rs_kinds1.open "select id,kindid1,kindname1 from kinds1",conn,1,1
do while not rs_kinds1.eof
str=str&"<option value="&rs_kinds1("kindid1")&">╋"&rs_kinds1("kindname1")&"</option>"
rs_kinds.movenext
loop
%>

<form name="urlform" method="post" action="list.asp">
小说类别：<select name="kinds" onchagne="urlform.submit()">
<option value="0" selected>所有类别</option>
<%=str%>
</select>
</form>
<script>
document.getElementById('kinds').value="<%trim(request.Form("kinds"))%>";
</script>

楼上基本正解

也可以把值赋给JS，让JS在页面载入完成后完成自动选择

回：

感谢几位，问题已经解决

特别感谢penglewen(昨日如梦)，看了你的代码，收获很大

不过还有些疑问，我的代码到底有些什么错误？

你没有什么事件让form提交，那个request.form肯定没有值啦。。。。。

·请问这个VB循环输出定义组的内容怎么做?
·UBB替换成动态内容.
·高手帮忙解决一下关于多条件查询问题？
·高分求解：如何禁止ASP在线视频播放系统播放时候视频文件保存在缓存？在线等待哦
·想知道asp做成的图片木马怎么执行？
·当网页出错（找不到网页文件时）重定向到自定义页面，如何在global.asa中编写？