ASP制作学生档案管理系统_第1页
ASP制作学生档案管理系统_第2页
ASP制作学生档案管理系统_第3页
ASP制作学生档案管理系统_第4页
ASP制作学生档案管理系统_第5页
已阅读5页,还剩7页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、ASP制作学生档案管理系统 发布时间: 2004-04-15 作者:陈庆平 安徽新华电脑学校 摘要:本系统是根据现代化校园的发展而设计的基于ASP的学生档案管理系统,本系统可以方便老师、家长来学校查找学生。实现全校学生信息在线查询。还可以对新来的学员信息进行信息录入。由于学员上课情况复杂,可以实现信息修改,及时调整学员的基本情况。关键字 ASP 在线查询 信息录入 信息修改一、制作数据库和建立数据源1、利用Microsoft Access 制作数据库,取名为information,然后制作表,表名为infor.下面写入数据字段。如图所示:2、建立ODBC数据源(在2000 profession

2、al 系统中建立)步骤: 控制面板0管理工具0ODBC数据源0系统DSN0Add.ODBC界面二、系统界面一个好的系统需要一个友好的用户界面。由于本系统是基于ASP开发的,所以,我们利用网页制作工具制作友好的用户界面。部分界面如图所示:进入界面信息录入界面信 息 查 询三、程序实现由于本系统是基于ASP开发的实现在线操作的系统。所以,本系统的完成需要借助HTML,又由于HTML是网页编程的基础,所以,在这里就省去HTML代码,相信大家都是HTML高手。1、信息录入<%dim strsql,rsset conn=createobject("ADODB.connection&quo

3、t;) /建立ADODB连接conn.open ("DSN=information;UID=;PWD=;") /打开数据源informationset rs=createobject("ADODB.Recordset") /建立记录对象rsrs.open "infor",conn,3,3 /打开数据库里的infor表rs.Addnew /添加一条新的记录rs("name").value=request.form("name") /*取得表单名为 name里的内容“送”到数据库name记录里(备注

4、:表单名是信息录入界面里的提示信息是“姓名”的表单域的名字,以下类似)*/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

5、.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&q

6、uot;)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 ("你已经成功注册的这位学员的信息。请继续

7、<a href='input.htm'>注册 </a>") /显示提示信息rs.close /关闭数据记录conn.close /关闭连接set rs=nothingset conn=nothing%>2、信息查询<%dim strsql,conn,rsset conn=server.createobject("ADODB.connection")conn.open ("DSN=information;UID=;PWD=;")set rs=server.createobject("A

8、DODB.Recordset") strsql="select * from infor where name= '" & request("name") &"'"/利用SQL建立查询rs.open strsql,conn%><table width="1205" border="1" align="left" bordercolor="#6600CC"><tr> /本行写上要显示的字

9、段的相应的中文名<td width="69"><div align="center"><font size="2">姓名</font></div></td><td width="46"><div align="center"><font size="2">性别</font></div></td><td width="1

10、22"><div align="center"><font size="2">出生年</font></div></td><td width="46"><div align="center"><font size="2">学历</font></div></td><td width="91"><div align=&

11、quot;center"><font size="2">政治面貌</font></div></td><td width="91"><div align="center"><font size="2">专业</font></div></td><td width="50"><div align="center"><f

12、ont size="2">班级</font></div></td><td width="69"><div align="center"><font size="2">班主任</font></div></td><td width="122"><div align="center"><font size="2">

13、入学时间</font></div></td><td width="146"><div align="center"><font size="2">联系电话</font></div></td><td width="337"><div align="center"><font size="2">联系地址</font></

14、div></td></tr><% while Not rs.eof %> /循环语句控制符合条件的记录输出<tr> /本行根据循环条件可以重复输出<td><div align="center"><font size="2"><%=rs("name")%></font></div></td>/*输出数据库中符合条件的name字段的值*/<td><div align="cen

15、ter"><font size="2"><%=rs("sex")%></font></div></td><td><div align="center"><font size="2"><%=rs("birth")%></font></div></td><td><div align="center">

16、;<font size="2"><%=rs("xl")%></font></div></td><td><div align="center"><font size="2"><%=rs("zzmm")%></font></div></td><td><div align="center"><font size

17、="2"><%=rs("career")%></font></div></td><td><div align="center"><font size="2"><%=rs("class")%></font></div></td><td><div align="center"><font size="2&

18、quot;><%=rs("teach")%></font></div></td><td><div align="center"><font size="2"><%=rs("date")%></font></div></td><td><div align="center"><font size="2">&l

19、t;%=rs("tel")%></font></div></td><td><div align="center"><font size="2"><%=rs("add")%></font></div></td> </tr><% rs.movenextWendrs.closeconn.close%></table>3、信息修改<% set conn=se

20、rver.createobject("adodb.connection")conn.open "DSN=information;UID=;PWD=;"set rs=server.CreateObject("adodb.recordset")username=request("name") / 取得name表单的值赋给usernamestrsql="select * from infor where name='"&username&"'" /建

21、立SQL查询rs.open strsql,conn,3,3%><form action="zhuce.asp" method="post"> / 以POST方式将修改的记录通过zhuce.asp页面的程序保存到数据库当中<table width="75%" border="1" align="center" bordercolor="#663399"><tr> <td width="18%"><d

22、iv align="right"><font size="2">姓 名:</font></div></td><td width="36%"><font size="2"> <input name="name" type="text" id="name" value="<%=rs.fields("name")%>">&

23、lt;/font></td> /显示符合查询条件的数据库当中name字段的值,供修改<td width="15%"><div align="right"><font size="2">入学时间:</font></div></td><td width="31%"><input name="time" type="text" id="time" valu

24、e="<%=rs.fields("date")%>"></td></tr><tr> <td height="20"><div align="right"><font size="2">性 别:</font></div></td><td><p><label><input name="sex" type="

25、;radio" value="<%=rs.fields("sex")%>" checked>男</label><label><input type="radio" name="sex" value="<%=rs.fields("sex")%>">女</label><br></p></td><td><div align="rig

26、ht"><font size="2">专业:</font></div></td><td><input name="career" type="text" id="career" value="<%=rs.fields("career")%>"></td></tr><tr> <td><div align="right

27、"><font size="2">出生年月:</font></div></td><td><font size="2"> <input name="birthday" type="text" id="birthday" value="<%=rs.fields("birth")%>"></font></td><td>

28、;<div align="right"><font size="2">班级:</font></div></td><td><input name="class" type="text" id="class" value="<%=rs.fields("class")%>"></td></tr><tr> <td><

29、div align="right"><font size="2">政治面貌:</font></div></td><td><select name="zz" id="zz"><option value="团员">团员</option><option value="党员">党员</option><option value="其他"

30、>其他</option></select></td><td><div align="right"><font size="2">班主任:</font></div></td><td><input name="teach" type="text" id="teach" value="<%=rs.fields("teach")%>

31、"></td></tr><tr> <td><div align="right"><font size="2">学历:</font></div></td><td><font size="2"> <select name="xl" id="xl"><option value="初中">初中</option

32、><option value="高中">高中</option><option value="大专">大专</option><option value="本科">本科</option><option value="研究生">研究生</option><option value="其他">其他</option></select></font></t

33、d><td><div align="right"><font size="2">教室:</font></div></td><td><input name="room" type="text" id="room"></td></tr><tr> <td><div align="right"><font size=&

34、quot;2">原毕业学校:</font></div></td><td><font size="2"><input name="school" type="text" id="school" value="<%=rs.fields("school")%>"></font></td><td colspan="2" rowspan=

35、"5"><div align="left"><p><font color="#FF0000" size="2">请数据录入人员认真录入学员信息,以便以</font></p><p><font color="#FF0000" size="2">后查询!</font></p></div></td></tr><tr> <

36、;td><div align="right"><font size="2">联系地址:</font></div></td><td><font size="2"><input name="add" type="text" id="add" value="<%=rs.fields("add")%>"></font></td></tr><tr> <td><div align="right"><font size="2">联系电话:</font></div></td><td><font size="2"><input name="tel" type=&qu

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论