asp怎么实现下拉列表和文本框联动? 20
我想实现这样的功能,在录入学生选课信息时,先检索未选课学生表内学生信息,如果有该学生信息,直接在下拉列表内选取。如果没有该学生信息,则手动录入学生班级、姓名、学号信息。未...
我想实现这样的功能,在录入学生选课信息时,先检索未选课学生表内学生信息,如果有该学生信息,直接在下拉列表内选取。如果没有该学生信息,则手动录入学生班级、姓名、学号信息。
未选课学生表内有四列:id,班级Sclass,姓名Sname,学号Sid。如果从下拉列表内选择了该学生,就从未选课学生表内删除这个学生的信息。代码如下:
<form action="add.asp?action=saveadd" method="post" name="form1" id="form1">
<table width="90%" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
<tr><td height="25" align="center" bgcolor="#FFFFFF">课程信息</td>
<td align="left" valign="middle" bgcolor="#FFFFFF"><select name="Ccourse" size="1">
<option selected="selected" value="">请选择</option>
<option value="课程01">课程01</option>
<option value="课程02">课程02</option>
<option value="课程03">课程03</option>
<option value="课程04">课程04</option>
</select></td></tr>
<tr><td width="25%" height="25" align="center" bgcolor="#FFFFFF">学生信息</td>
<td width="50%" align="left" valign="middle" bgcolor="#FFFFFF">班级
<select name="Sclass" size="1">
<option selected="selected" value="">请选择</option>
<option value="1班">1班</option>
<option value="2班">2班</option>
<option value="3班">3班</option>
</select>
姓名<input name="Sname" type="text" id="Sclass" size="10" maxlength="10" value="" />
学号<input name="Sid" type="text" id="Sid" size="10" maxlength="10" value="" />
<select name="Sinfo" size="1">
<option selected="selected" value="">请选择</option>
<%
Set Rs = Server.CreateObject("ADODB.Recordset")
Sql="Select * From NoStu Order By id Asc"
Rs.Open Sql,conn,2,3
Do While Not Rs.EOF
Response.Write "<option value=" & Rs("id") & ">" & Rs("Sclass")&Rs("Sname")&Rs("Sid") & "</option>"
Rs.MoveNext
Loop
Rs.close
set Rs=nothing
%>
</select></td></tr>
<tr><td height="25" colspan="2" align="center" valign="middle" bgcolor="#FFFFFF"><input type="submit" name="Submit" value="提 交" />
<input type="reset" name="Submit2" value="重 置" /> </td></tr>
</table>
</form>
请高手指教!谢谢! 展开
未选课学生表内有四列:id,班级Sclass,姓名Sname,学号Sid。如果从下拉列表内选择了该学生,就从未选课学生表内删除这个学生的信息。代码如下:
<form action="add.asp?action=saveadd" method="post" name="form1" id="form1">
<table width="90%" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
<tr><td height="25" align="center" bgcolor="#FFFFFF">课程信息</td>
<td align="left" valign="middle" bgcolor="#FFFFFF"><select name="Ccourse" size="1">
<option selected="selected" value="">请选择</option>
<option value="课程01">课程01</option>
<option value="课程02">课程02</option>
<option value="课程03">课程03</option>
<option value="课程04">课程04</option>
</select></td></tr>
<tr><td width="25%" height="25" align="center" bgcolor="#FFFFFF">学生信息</td>
<td width="50%" align="left" valign="middle" bgcolor="#FFFFFF">班级
<select name="Sclass" size="1">
<option selected="selected" value="">请选择</option>
<option value="1班">1班</option>
<option value="2班">2班</option>
<option value="3班">3班</option>
</select>
姓名<input name="Sname" type="text" id="Sclass" size="10" maxlength="10" value="" />
学号<input name="Sid" type="text" id="Sid" size="10" maxlength="10" value="" />
<select name="Sinfo" size="1">
<option selected="selected" value="">请选择</option>
<%
Set Rs = Server.CreateObject("ADODB.Recordset")
Sql="Select * From NoStu Order By id Asc"
Rs.Open Sql,conn,2,3
Do While Not Rs.EOF
Response.Write "<option value=" & Rs("id") & ">" & Rs("Sclass")&Rs("Sname")&Rs("Sid") & "</option>"
Rs.MoveNext
Loop
Rs.close
set Rs=nothing
%>
</select></td></tr>
<tr><td height="25" colspan="2" align="center" valign="middle" bgcolor="#FFFFFF"><input type="submit" name="Submit" value="提 交" />
<input type="reset" name="Submit2" value="重 置" /> </td></tr>
</table>
</form>
请高手指教!谢谢! 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询