asp下拉菜单的默认值问题

[yinweiyi]

设计了一个读取数据库里表的下拉菜单，提交订单后。当修改个人信息时，如何才能实现默认值为当时的选择？
<%
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 %>

[ChinaXtHuLang]

修改的时候。根据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 %>

[yinweiyi]

谢谢1楼的回答，还有一个问题：
If rstemp("schoolid") = 修改的RS的schoolid的值 Then
这个【修改的RS的schoolid的值】怎么写？
我写的是If rstemp("schoolid")=rs("schoolid") Then%>
无法读取。还是显示第一个选项。

[ChinaXtHuLang]

你打印一下这个：rs("schoolid")
看看有没有取到值啊。。

[ChinaXtHuLang]

改成：

<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]

<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>

[yinweiyi]

rs("schoolid")放在其他地方可以去到值，
按你最后写的这个，还是不行。要不要我把所有的都贴上来？

[yinweiyi]

<!---修改报名学生个人信息--->
<%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%>

[ChinaXtHuLang]

还有问题？

[yinweiyi]

为什么读不出rs("schoolid")的值呀？拜托了
<% do while not rstemp.eof
If rstemp("schoolid") = rs("schoolid") Then%>

[ChinaXtHuLang]

rs("schoolid")
你表里是：schoolid这个字段吗？还是：u_class
就是保存：u_class的字段是哪个你就读取哪个。我又不知道你里面用哪个字段保存的？
自己改下吧。

[yinweiyi]

好的，谢谢你，我自己改改试一试。很感谢你。