asp下拉菜单的默认值问题

yinweiyi 2010-07-11 01:06:10
设计了一个读取数据库里表的下拉菜单,提交订单后。当修改个人信息时,如何才能实现默认值为当时的选择?
<%
set rstemp=server.createobject("adodb.recordset")
sqltemp = "select * from mschool "
rstemp.open sqltemp,conn,1,1
if rstemp.eof then
%>
<% else %>
<select name="u_school">
<option value="" selected="selected"></option>
<% do while not rstemp.eof %>
<option value="<%=rstemp("schoolid")%>"><%=rstemp("sname")%></option>
<% rstemp.movenext %>
<% loop %>
</select>
<% end if %>
...全文
71 点赞 收藏 11
写回复
11 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
yinweiyi 2010-07-11
好的,谢谢你,我自己改改试一试。很感谢你。
回复
ChinaXtHuLang 2010-07-11
rs("schoolid")
你表里是:schoolid这个字段吗?还是:u_class
就是保存:u_class的字段是哪个你就读取哪个。我又不知道你里面用哪个字段保存的?
自己改下吧。
回复
yinweiyi 2010-07-11
为什么读不出rs("schoolid")的值呀?拜托了
<% do while not rstemp.eof
If rstemp("schoolid") = rs("schoolid") Then%>
回复
ChinaXtHuLang 2010-07-11
还有问题?
回复
yinweiyi 2010-07-11
<!---修改报名学生个人信息--->
<%sub pidedit()%>
<%dim id
id=Request("id")
set rs=server.createobject("adodb.recordset")
sql="select * from pid where u_id="&id&""
rs.open sql,conn,1,1
%>
<form action="?action=pidsave" method=POST name="frmArticle">
<table width="98%" border=0 align=center cellspacing=1 class=list>
<tr>
<th colspan=6>中考信息(HSEE)</th>
<th colspan=4>家庭信息(FM)</th>
</tr>
<tr align="center">
<td width="9%" align="center">报名类型:</td>
<td width="18%" align="left"><select name=u_kind>
<option value= selected></option>
<option value=1>推荐</option>
<option value=2>网络</option>
<option value=3>电话</option>
<option value=4>关系</option>
</select><font color="#FF0000">*</font></td>
<td width="2%" align="center">语</td>
<td width="4%" align="center"><input name="u_yw" type="text" id="u_yw" onChange="AddToTotal('u_yw','u_sx','u_yy','u_lz','u_wz','u_zf')" value="<%=rs("u_yw")%>" size="3"></td>
<td width="4%" align="center">理综</td>
<td width="4%" align="center"><input name="u_lz" type="text" id="u_lz" onChange="AddToTotal('u_yw','u_sx','u_yy','u_lz','u_wz','u_zf')" value="<%=rs("u_lz")%>" size="3"></td>
<td width="6%" align="center">父亲:</td>
<td width="23%" align="left"><input name="u_fn" type=text value="<%=rs("u_fn")%>" size=6>
手机:
<input name="u_fm" type=text value="<%=rs("u_fm")%>" size=11></td>
<td width="9%" align="left">其他联系1</td>
<td width="21%" align="left"><input name="u_other1" type=text value="<%=rs("u_other1")%>" size=20></td>
</tr>
<tr align="center">
<td align="center">毕业学校:</td>
<td align="left">
<select name="u_school">
<%
set rstemp=server.createobject("adodb.recordset")
sqltemp = "select * from mschool "
rstemp.open sqltemp,conn,1,1
if rstemp.eof then
%>
<option value="" selected="selected"></option>
<% else %>

<% do while not rstemp.eof
If rstemp("schoolid") = rs("schoolid") Then
%>
<option value="<%=rstemp("schoolid")%>" selected="selected"><%=rstemp("sname")%></option>
<%else%>
<option value="<%=rstemp("schoolid")%>"><%=rstemp("sname")%></option>
<%end if%>
<% rstemp.movenext %>
<% loop %>
</select>
<% end if %>
<font color="#FF0000">*</font></td>
<td align="center">数</td>
<td align="center"><input name="u_sx" type="text" id="u_sx" onChange="AddToTotal('u_yw','u_sx','u_yy','u_lz','u_wz','u_zf')" value="<%=rs("u_sx")%>" size="3"></td>
<td align="center">文综</td>
<td align="center"><input name="u_wz" type="text" id="u_wz" onChange="AddToTotal('u_yw','u_sx','u_yy','u_lz','u_wz','u_zf')" value="<%=rs("u_wz")%>" size="3"></td>
<td align="center">工作:</td>
<td align="left"><input name="u_fw" type=text value="<%=rs("u_fw")%>" size=26></td>
<td align="left">其他联系2</td>
<td align="left"><input name="u_other2" type=text value="<%=rs("u_other2")%>" size=20></td>
</tr>
<tr align="center">
<td align="center">毕业班级:</td>
<td align="left"><%
set rstemp=server.createobject("adodb.recordset")
sqltemp = "select * from mclass "
rstemp.open sqltemp,conn,1,1
if rstemp.eof then
%>
<% else %>
<select name="u_class">
<option value="" selected="selected"></option>
<% do while not rstemp.eof %>
<option value="<%=rstemp("classid")%>"><%=rstemp("cname")%></option>
<% rstemp.movenext %>
<% loop %>
</select>
<% end if %>
<font color="#FF0000">*</font></td>
<td align="center">英</td>
<td align="center"><input name="u_yy" type="text" id="u_yy" onChange="AddToTotal('u_yw','u_sx','u_yy','u_lz','u_wz','u_zf')" value="<%=rs("u_yy")%>" size="3"></td>
<td align="center">总分</td>
<td align="center"><input name="u_zf" type="text" id="u_zf" onChange="AddToTotal('u_yw','u_sx','u_yy','u_lz','u_wz','u_zf')" value="<%=rs("u_zf")%>" size="3"></td>
<td align="center">母亲:</td>
<td align="left"><input name="u_mn" type=text value="<%=rs("u_mn")%>" size=6>
手机:
<input name="u_mm" type=text value="<%=rs("u_mm")%>" size=11></td>
<td align="left"> </td>
<td align="left"><%=rs("schoolid")%></td>
</tr>
<tr align="center">
<td align="center">准考证号:</td>
<td align="left"><input name="u_kh" type=text value="<%=rs("u_kh")%>" size=20></td>
<td align="center"> </td>
<td align="center"> </td>
<td align="center">满分</td>
<td align="center"><input name="u_mf" type=text value="<%=rs("u_mf")%>" size=3></td>
<td align="center">工作:</td>
<td align="left"><input name="u_mw" type=text value="<%=rs("u_mw")%>" size=26></td>
<td align="left"> </td>
<td align="left"> </td>
</tr>
</table></form>
<%rs.close
set rs=nothing
end sub%>
回复
yinweiyi 2010-07-11
rs("schoolid")放在其他地方可以去到值,
按你最后写的这个,还是不行。要不要我把所有的都贴上来?
回复
ChinaXtHuLang 2010-07-11
<select name="u_school">
<%
set rstemp=server.createobject("adodb.recordset")
sqltemp = "select * from mschool "
rstemp.open sqltemp,conn,1,1
if rstemp.eof then
%>
<option value="" selected="selected"></option>
<% else %>

<% do while not rstemp.eof
If rstemp("schoolid") = rs("schoolid") Then
%>
<option value="<%=rstemp("schoolid")%>" selected="selected"><%=rstemp("sname")%></option>
<%else%>
<option value="<%=rstemp("schoolid")%>"><%=rstemp("sname")%></option>
<%end if%>
<% rstemp.movenext %>
<% loop %>
</select>
回复
ChinaXtHuLang 2010-07-11
改成:
<select name="u_school">
<%
set rstemp=server.createobject("adodb.recordset")
sqltemp = "select * from mschool "
rstemp.open sqltemp,conn,1,1
if rstemp.eof then
%>
<option value="" selected="selected"></option>
<% else %>

<% do while not rstemp.eof
If rstemp("schoolid") = 修改的RS的schoolid的值 Then
%>
<option value="<%=rstemp("schoolid")%>" selected="selected"><%=rstemp("sname")%></option>
<%else%>
<option value="<%=rstemp("schoolid")%>"><%=rstemp("sname")%></option>
<%end if%>
<% rstemp.movenext %>
<% loop %>
</select>
回复
ChinaXtHuLang 2010-07-11
你打印一下这个:rs("schoolid")
看看有没有取到值啊。。
回复
yinweiyi 2010-07-11
谢谢1楼的回答,还有一个问题:
If rstemp("schoolid") = 修改的RS的schoolid的值 Then
这个【修改的RS的schoolid的值】怎么写?
我写的是If rstemp("schoolid")=rs("schoolid") Then%>
无法读取。还是显示第一个选项。
回复
ChinaXtHuLang 2010-07-11
修改的时候。根据ID来取里面的值。在下拉框这里进行判断一下就行了。
具体的我就不写了。就这点。
<% do while not rstemp.eof 
If rstemp("schoolid") = 修改的RS的schoolid的值 Then
%>
<option value="<%=rstemp("schoolid")%>" selected="selected"><%=rstemp("sname")%></option>
<%else%>
<option value="<%=rstemp("schoolid")%>"><%=rstemp("sname")%></option>
<%end if%>
<% rstemp.movenext %>
<% loop %>
回复
发动态
发帖子
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
社区公告
暂无公告