学生档案管理系统摘要:本系统是根据现代化校园的发展而设计的基于ASP的学生档案管理系统,本系统可以方便老师、家长来学校查找学生。实现全校学生信息在线查询。还可以对新来的学员信息进行信息录入。由于学员上课情况复杂,可以实现信息修改,及时调整学员的基本情况。关键字ASP在线查询信息录入信息修改一、制作数据库和建立数据源1、利用MicrosoftAccess制作数据库,取名为information,然后制作表,表名为infor.下面写入数据字段。如图所示:2、建立ODBC数据源(在2000professional系统中建立)步骤:控制面板à管理工具àODBC数据源à系统DSNàAdd….ODBC界面二、系统界面一个好的系统需要一个友好的用户界面。由于本系统是基于ASP开发的,所以,我们利用网页制作工具制作友好的用户界面。部分界面如图所示:进入界面信息录入界面信息查询三、程序实现由于本系统是基于ASP开发的实现在线操作的系统。所以,本系统的完成需要借助HTML,又由于HTML是网页编程的基础,所以,在这里就省去HTML代码,相信大家都是HTML高手。1、信息录入%dimstrsql,rssetconn=createobject(ADODB.connection)//建立ADODB连接conn.open(DSN=information;UID=;PWD=;)//打开数据源informationsetrs=createobject(ADODB.Recordset)//建立记录对象rsrs.openinfor,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='input.htm'注册/a)//显示提示信息rs.close//关闭数据记录conn.close//关闭连接setrs=nothingsetconn=nothing%2、信息查询%dimstrsql,conn,rssetconn=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=1205border=1align=leftbordercolor=#6600CCtr//本行写上要显示的字段的相应的中文名tdwidth=69divalign=centerfontsize=2姓名/font/div/tdtdwidth=46divalign=centerfontsize=2性别/font/div/tdtdwidth=122divalign=centerfontsize=2出生年/font/div/tdtdwidth=46divalign=centerfontsize=2学历/font/div/tdtdwidth=91divalign=centerfontsize=2政治面貌/font/div/tdtdwidth=91divalign=centerfontsize=2专业/font/div/tdtdwidth=50divalign=centerfontsize=2班级/font/div/tdtdwidth=69divalign=centerfontsize=2班主任/font/div/tdtdwidth=122divalign=centerfontsize=2入学时间/font/div/tdtdwidth=146divalign=centerfontsize=2联系电话/font/div/tdtdwidth=337divalign=centerfontsize=2联系地址/font/div/td/tr%whileNotrs.eof%//循环语句控制符合条件的记录输出tr//本行根据循环条件可以重复输出tddivalign=centerfontsize=2%=rs(name)%/font/div/td/*输出数据库中符合条件的name字段的值*/tddivalign=centerfontsize=2%=rs(sex)%/font/div/tdtddivalign=centerfontsize=2%=rs(birth)%/font/div/tdtddivalign=centerfontsize=2%=rs(xl)%/font/div/tdtddivalign=centerfontsize=2%=rs(zzmm)%/font/div/tdtddivalign=centerfontsize=2%=rs(career)%/font/div/tdtddivalign=centerfontsize=2%=rs(class)%/font/div/tdtddivalign=centerfontsize=2%=rs(teach)%/font/div/tdtddivalign=centerfontsize=2%=rs(date)%/font/div/tdtddivalign=centerfontsize=2%=rs(tel)%/font/div/tdtddivalign=centerfontsize=2%=rs(add)%/font/div/td/tr%rs.movenextWendrs.closeconn.close%/table3、信息修改%setconn=server.createobject(adodb.connection)conn.openDSN=information;UID=;PWD=;setrs=server.CreateObject(adodb.recordset)username=request(name)//取得name表单的值赋给usernamestrsql=select*frominforwherename='&username&'//建立SQL查询rs.openstrsql,conn,3,3%formaction=zhuce.aspmethod=post//以POST方式将修改的记录通过zhuce.asp页面的程序保存到数据库当中tablewidth=75%border=1align=centerbordercolor=#663399trtdwidth=18%divalign=rightfontsize=2姓名:/font/div/tdtdwidth=36%fontsize=2inputname=nametype=textid=namevalue=%=rs.fields(name)%/font/td//显示符合查询条件的数据库当中name字段的值,供修改tdwidth=15%divalign=rightfontsize=2入学时间:/font/div/tdtdwidth=31%inputname=timetype=textid=timevalue=%=rs.fields(date)%/td/trtrtdheight=20divalign=rightfontsize=2性别:/font/div/tdtdplabelinputname=sextype=radiovalue=%=rs.fields(sex)%checked男/labellabelinputtype=radioname=sexvalue=%=rs.fields(sex)%女/labelbr/p/tdtddivalign=rightfontsize=2专业:/font/div/tdtdinputname=careertype=textid=careervalue=%=rs.fields(career)%/td/trtrtddivalign=rightfontsize=2出生年月:/font/div/tdtdfontsize=2inputname=birthdaytype=textid=birthdayvalue=%=rs.fields(birth)%/font/tdtddivalign=rightfontsize=2班级:/font/div/tdtdinputname=classtype=textid=classvalue=%=rs.fields(class)%/td/trtrtddivalign=rightfontsize=2政治面貌:/font/div/tdtdselectname=zzid=zzoptionvalue=团员团员/optionoptionvalue=党员党员/optionoptionvalue=其他其他/option/select/tdtddivalign=rightfontsize=2班主任:/font/div/tdtdinputname=teachtype=textid=teachvalue=%=rs.fields(teach)%/td/trtrtddivalign=rightfontsize=2学历:/font/div/tdtdfontsize=2selectname=xlid=xl