ASP制作学生档案管理系统
时间：2022-10-11 04:05:48
ASP制作学生档案管理系统
时间：2004-04-15作者：陈庆平安徽新华电脑学校
摘要：本系统是根据现代化校园的发展而设计的基于ASP的学生档案管理系统，本系统可以方便老师、家长来学校查找学生。实现全校学生信息在线查询。还可以对新来的学员信息进行信息录入。由于学员上课情况复杂，可以实现信息修改，及时调整学员的基本情况。
关键字ASP在线查询信息录入信息修改
一、制作数据库和建立数据源
1、利用MicrosoftAccess制作数据库，取名为information,然后制作表，表名为infor.下面写入数据字段。如图所示：
2、建立ODBC数据源（在2000professional系统中建立）
步骤：
控制面板à管理工具àODBC数据源à系统DSNàAdd….
ODBC界面
二、系统界面
一个好的系统需要一个友好的用户界面。由于本系统是基于ASP开发的，所以，我们利用网页制作工具制作友好的用户界面。部分界面如图所示：
进入界面
信息录入界面
信息查询
三、程序实现
由于本系统是基于ASP开发的实现在线操作的系统。所以，本系统的完成需要借助HTML，又由于HTML是网页编程的基础，所以，在这里就省去HTML代码，相信大家都是HTML高手。版权所有
1、信息录入
<%
dimstrsql,rs
setconn=createobject("ADODB.connection")//建立ADODB连接
conn.open("DSN=information;UID=;PWD=;")//打开数据源information
setrs=createobject("ADODB.Recordset")//建立记录对象rs
rs.open"infor",conn,3,3//打开数据库里的infor表
rs.Addnew//添加一条新的记录
rs("name").value=request.form("name")/*取得表单名为name里的内容“送”
到数据库name记录里（备注：表单名是信息录入界面里的提示信息是“姓名”的表单域的名字，以下类似）*/
rs("sex").value=request.form("sex")
rs("birth").value=request.form("birthday")
rs("zzmm").value=request.form("zz")
rs("teach").value=request.form("teach")
rs("xl").value=request.form("xl")
rs("class").value=request.form("class")
rs("school").value=request.form("school")
rs("add").value=request.form("add")
rs("tel").value=request.form("tel")
rs("hy").value=request.form("mar")
rs("jg").value=request.form("addr")
rs("career").value=request.form("career")
rs("date").value=request.form("time")
rs("school").value=request.form("school")
rs.Update//保存数据库里的记录
Response.Write("你已经成功注册的这位学员的信息。请继续<ahref='http://'''input.htm''''>注册</a>")//显示提示信息
rs.close//关闭数据记录
conn.close//关闭连接
setrs=nothing
setconn=nothing
%>
2、信息查询
<%
dimstrsql,conn,rs
setconn=server.createobject("ADODB.connection")
conn.open("DSN=information;UID=;PWD=;")
setrs=server.createobject("ADODB.Recordset")
strsql="select*frominforwherename=''''"&request("name")&"''''"//利用SQL建立查询
rs.openstrsql,conn
%>
<tablewidth="1205"border="1"align="left"bordercolor="#6600CC">
<tr>//本行写上要显示的字段的相应的中文名
<tdwidth="69"><divalign="center"><fontsize="2">姓名</font></div></td>
<tdwidth="46"><divalign="center"><fontsize="2">性别</font></div></td>
<tdwidth="122"><divalign="center"><fontsize="2">出生年</font></div></td>
<tdwidth="46"><divalign="center"><fontsize="2">学历</font></div></td>
<tdwidth="91"><divalign="center"><fontsize="2">政治面貌</font></div></td>
<tdwidth="91"><divalign="center"><fontsize="2">专业</font></div></td>
<tdwidth="50"><divalign="center"><fontsize="2">班级</font></div></td>
<tdwidth="69"><divalign="center"><fontsize="2">班主任</font></div></td>
<tdwidth="122"><divalign="center"><fontsize="2">入学时间</font></div></td>
<tdwidth="146"><divalign="center"><fontsize="2">联系电话</font></div></td>
<tdwidth="337"><divalign="center"><fontsize="2">联系地址</font></div></td>
</tr>
<%whileNotrs.eof%>//循环语句控制符合条件的记录输出
<tr>//本行根据循环条件可以重复输出
<td><divalign="center"><fontsize="2"><%=rs("name")%></font></div></td>
/*输出数据库中符合条件的name字段的值*/
<td><divalign="center"><fontsize="2"><%=rs("sex")%></font></div></td>
<td><divalign="center"><fontsize="2"><%=rs("birth")%></font></div></td>
<td><divalign="center"><fontsize="2"><%=rs("xl")%></font></div></td>
<td><divalign="center"><fontsize="2"><%=rs("zzmm")%></font></div></td>
<td><divalign="center"><fontsize="2"><%=rs("career")%></font></div></td>
<td><divalign="center"><fontsize="2"><%=rs("class")%></font></div></td>
<td><divalign="center"><fontsize="2"><%=rs("teach")%></font></div></td>
<td><divalign="center"><fontsize="2"><%=rs("date")%></font></div></td>
<td><divalign="center"><fontsize="2"><%=rs("tel")%></font></div></td>
<td><divalign="center"><fontsize="2"><%=rs("add")%></font></div></td></tr>
<%rs.movenext
Wend
rs.close
conn.close
%>
</table>
3、信息修改
<%
setconn=server.createobject("adodb.connection")
conn.open"DSN=information;UID=;PWD=;"
setrs=server.CreateObject("adodb.recordset")
username=request("name")//取得name表单的值赋给username
strsql="select*frominforwherename=''''"&username&"''''"//建立SQL查询
rs.openstrsql,conn,3,3
%>
<formaction="zhuce.asp"method="post">
//以POST方式将修改的记录通过zhuce.asp页面的程序保存到数据库当中
<tablewidth="75%"border="1"align="center"bordercolor="#663399">
<tr>
<tdwidth="18%"><divalign="right"><fontsize="2">姓名：</font></div></td>
<tdwidth="36%"><fontsize="2">
<inputname="name"type="text"id="name"value="<%=rs.fields("name")%>">
</font></td>//显示符合查询条件的数据库当中name字段的值，供修改
<tdwidth="15%"><divalign="right"><fontsize="2">入学时间：</font></div></td>
<tdwidth="31%"><inputname="time"type="text"id="time"value="<%=rs.fields("date")%>"></td>
</tr>
<tr>
<tdheight="20"><divalign="right"><fontsize="2">性别：</font></div></td>
<td><p>
<label>
<inputname="sex"type="radio"value="<%=rs.fields("sex")%>"checked>
男</label>
<label>
<inputtype="radio"name="sex"value="<%=rs.fields("sex")%>">
女</label>
<br>
</p></td>
<td><divalign="right"><fontsize="2">专业：</font></div></td>
<td><inputname="career"type="text"id="career"value="<%=rs.fields("career")%>"></td>
</tr>
<tr>
<td><divalign="right"><fontsize="2">出生年月：</font></div></td>
<td><fontsize="2">
<inputname="birthday"type="text"id="birthday"value="<%=rs.fields("birth")%>">
</font></td>
<td><divalign="right"><fontsize="2">班级：</font></div></td>
<td><inputname="class"type="text"id="class"value="<%=rs.fields("class")%>"></td>
</tr>
<tr>
<td><divalign="right"><fontsize="2">政治面貌：</font></div></td>
<td><selectname="zz"id="zz">
<optionvalue="团员">团员</option>
<optionvalue="党员">党员</option>
<optionvalue="其他">其他</option>
</select></td>
<td><divalign="right"><fontsize="2">班主任：</font></div></td>
<td><inputname="teach"type="text"id="teach"value="<%=rs.fields("teach")%>"></td>
</tr>
<tr>
<td><divalign="right"><fontsize="2">学历：</font></div></td>
<td><fontsize="2">
<selectname="xl"id="xl">
<optionvalue="初中">初中</option>
<optionvalue="高中">高中</option>
<optionvalue="大专">大专</option>
<optionvalue="本科">本科</option>
<optionvalue="研究生">研究生</option>
<optionvalue="其他">其他</option>
</select>
</font></td>
<td><divalign="right"><fontsize="2">教室：</font></div></td>
<td><inputname="room"type="text"id="room"></td>
</tr>
<tr>
<td><divalign="right"><fontsize="2">原毕业学校：</font></div></td>
<td><fontsize="2">
<inputname="school"type="text"id="school"value="<%=rs.fields("school")%>">
</font></td>
<tdcolspan="2"rowspan="5"><divalign="left">
<p><fontcolor="#FF0000"size="2">请数据录入人员认真录入学员信息，以便以</font></p>
<p><fontcolor="#FF0000"size="2">后查询！</font></p>
</div></td>
</tr>
<tr>
<td><divalign="right"><fontsize="2">联系地址：</font></div></td>
<td><fontsize="2">
<inputname="add"type="text"id="add"value="<%=rs.fields("add")%>">
</font></td>
</tr>
<tr>
<td><divalign="right"><fontsize="2">联系电话：</font></div></td>
<td><fontsize="2">
<inputname="tel"type="text"id="tel"value="<%=rs.fields("tel")%>">
</font></td>
</tr>
<tr>
<td><divalign="right"><fontsize="2">婚姻状况：</font></div></td>
<td><selectname="mar"id="mar">
<optionvalue="已婚">已婚</option>
<optionvalue="未婚">未婚</option>
</select></td>
</tr>
<tr>
<td><divalign="right"><fontsize="2">籍贯：</font></div></td>
<td><fontsize="2">
<inputname="addr"type="text"id="addr"value="<%=rs.fields("jg")%>">
</font></td>
</tr>
</table>
<tablewidth="75%"border="0">
<tr>
<td><divalign="center">
<inputtype="submit"name="Submit2"value="保存">
</div></td>
<td><inputtype="reset"name="Reset"value="重写"></td>
</tr>
</table>
<p></p>
</form>
