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 %>
...全文
194 11 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
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 思想很深邃
下拉菜单 asp 思想很深邃下拉菜单 asp 思想很深邃下拉菜单 asp 思想很深邃下拉菜单 asp 思想很深邃
GridView和下拉菜单DropDownList结合
GridView和下拉菜单DropDownList结合
ASP.NET 省 城市 县区三级联动
ASP.NET 绑定下拉框的省 城市 县区三级联动，自带所有省 城市数 县区数据文件。
ASP三级联动表及库
三级联动表及库
ASP四级联动1个表(带后台)
ASP四级联动1个表 ASP(带后台) 四级联动菜单 数据库
ASP

28,409

社区成员

356,971

社区内容

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

加载中

查看更多榜单
社区公告
暂无公告

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

+ 用AI写文章