📄 mod_student.asp
字号:
<!--#include file = "inc/conn.asp" -->
<!--#include file = "CheckLogin.asp" -->
<!--#include file = "inc/zhuru.asp" -->
<%
Dim rs ,strSql ,rs1 ,strSql1 , strID
strID = trim(Request.QueryString("ID"))
If strID & "" = "" Then
Response.Write("参数错误！")
Response.End
End IF
Set rs = Server.CreateObject("ADODB.Recordset")
strSql1 = "SELECT * FROM Student WHERE ID = "& strID &""
Set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.open strSql1,conn,1,1
If Not rs1.EOF Then
%>
<style type="text/css">
<!--
.STYLE9 {color: #003300; font-size: 12px; }
body,td,th {
font-size: 12px;
}
.STYLE10 {font-size: 14px}
-->
</style>
<SCRIPT language=JavaScript>
function CheckValue(thisform)
{
if (thisform.Sno.value.length == 0){
alert ('请输入学号。');
}
if (thisform.Sno.value.length > 40){
alert ('学号过长。');
}
if (thisform.Name.value.length == 0){
alert ('请输入学生名。');
}
if (thisform.Name.value.length > 100){
alert ('学生名过长。');
}
else if (thisform.Pwd.value.length == 0){
alert ('请输入密码。');
}
else if (thisform.Pwd.value.length > 40){
alert ('密码过长。');
}
else if (thisform.Pwd.value.length == 0){
alert ('请输入确认密码。');
}
else if (thisform.Pwd2.value != thisform.Pwd.value){
alert ('两次密码不一致。');
}
else if (thisform.Class.value.length == 0){
alert ('请选择班级。');
}
else if (thisform.Nianyue.value.length > 50){
alert ('出生年月信息过长。');
}
else if (thisform.Zhengzhimianmao.value.length > 50){
alert ('政治面貌信息过长。');
}
else if (thisform.Nationality.value.length > 30){
alert ('民族信息过长。');
}
else if (thisform.Native.value.length > 50){
alert ('籍贯信息过长。');
}
else if (thisform.CardID.value.length > 100){
alert ('身份证信息过长。');
}
else if (thisform.Tel.value.length > 50){
alert ('电话信息过长。');
}
else if (thisform.Email.value.length > 50){
alert ('Email信息过长。');
}
else if (thisform.QQ.value.length > 100){
alert ('QQ信息过长。');
}
else if (thisform.MSN.value.length > 50){
alert ('MSN信息过长。');
}
else if (thisform.Sex.value.length == 0){
alert ('请选择性别。');
}
else {
thisform.submit();
}
}
</SCRIPT>
<body bgcolor="#B1DB99" topmargin="5" leftmargin="5">
<table width="355" border="0" align="left">
<form id="form1" name="form1" method="post" action="ModStudent.asp?ID=<%=strID%>" onSubmit="CheckValue(this);return false">
<tr>
<td colspan="4" background="images/Down_bg.gif"><div align="center" class="STYLE10">学生信息</div></td>
</tr>
<tr bgcolor="#66C06D">
<td><div align="right">学号：</div></td>
<td colspan="3"><input name="Sno" type="text" value="<%=rs1("Sno").value%>"></td>
</tr>
<tr bgcolor="#66C06D">
<td width="94"><div align="right"><span class="STYLE9">姓名：</span></div></td>
<td width="251" colspan="3">
<label>
<input type="text" name="Name" value=<%=rs1("Name").value%> />
</label> </td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right">密码：</div></td>
<td colspan="3"><input name="Pwd" type="password" value="<%=rs1("pwd").value%>"></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right">密码确认</div></td>
<td colspan="3"><input name="Pwd2" type="password" value="<%=rs1("pwd").value%>"></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right">学院：</div></td>
<td><select name="SchoolID">
<%
strSql = "SELECT * FROM School ORDER BY Name ASC"
rs.open strSql,conn,1,1
%>
<%
Do While Not rs.EOF
%>
<option value=<%=rs("ID").Value%> <%If rs("ID").value = rs1("SchoolID").Value Then%> selected="selected" <%End If%>><%=rs("name").Value%></option>
<%
rs.movenext
loop
rs.close
%>
</select> </td>
<td><div align="right">专业：</div></td>
<td><select name="zhuanyeID">
<%
strSql = "SELECT * FROM zhuanye ORDER BY Name ASC"
rs.open strSql,conn,1,1
%>
<%
Do While Not rs.EOF
%>
<option value=<%=rs("ID").Value%> <%If rs("ID").value = rs1("zhuanyeID").Value Then%> selected="selected" <%End If%>><%=rs("name").Value%></option>
<%
rs.movenext
loop
rs.close
%>
</select></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right"><span class="STYLE9">班级：</span></div></td>
<td><select name="ClassID">
<%
strSql = "SELECT * FROM Class ORDER BY Name ASC"
rs.open strSql,conn,1,1
%>
<%
Do While Not rs.EOF
%>
<option value=<%=rs("ID").Value%> <%If rs("ID").value = rs1("ClassID").Value Then%> selected="selected" <%End If%>><%=rs("name").Value%></option>
<%
rs.movenext
loop
rs.close
%>
</select></td>
<td><div align="right"><span class="STYLE9">性别：</span></div></td>
<td><select name="Sex">
<option value="男" <%If strSex = "男" Then %> selected="selected" <%End If%>>男</option>
<option value="女" <%If strsex = "女" Then %> selected="selected" <%End If%>>女</option>
</select></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right">出生年月：</div></td>
<td colspan="3"><input type="text" name="Nianyue" value="<%=rs1("Nianyue").value%>"></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right">政治面貌：</div></td>
<td colspan="3"><input name="Zhengzhimianmao" type="text" value="<%=rs1("zhengzhimianmao").value%>"></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right">民族：</div></td>
<td colspan="3"><input name="Nationality" type="text" value="<%=rs1("Nationality").value%>"></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right">籍贯：</div></td>
<td colspan="3"><input name="Native" type="text" value="<%=rs1("Native").value%>"></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right">身份证号：</div></td>
<td colspan="3"><input name="CardID" type="text" value="<%=rs1("CardID").value%>"></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right"><span class="STYLE9">电话：</span></div></td>
<td colspan="3"><input type="text" name="Tel" value=<%=rs1("Tel").value%> ></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right"><span class="STYLE9">Email: </span></div></td>
<td colspan="3"><input type="text" name="Email" value=<%=rs1("email").value%> ></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right"><span class="STYLE9">MSN: </span></div></td>
<td colspan="3"><input type="text" name="MSN" value=<%=rs1("MSN").value%> ></td>
</tr>
<tr bgcolor="#66C06D">
<td height="17"><div align="right"><span class="STYLE9">QQ: </span></div></td>
<td colspan="3"><input type="text" name="QQ" value=<%=rs1("QQ").value%> ></td>
</tr>
<tr bgcolor="#66C06D">
<td height="18" colspan="4" align="center">
<input name="清空" type="reset" value="清空" />
<input type="submit" name="Submit2" value="修改" /></td>
</tr>
<tr>
<td colspan="4" background="images/Top_bg.gif"><div align="center" class="STYLE10">学生信息</div></td>
</tr>
</form>
</table>
<%
Else
Response.Write("参数错误！")
Response.End
End If
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -