ASP制作学生档案管理系统(毕业论文)
2008-02-23 09:34:26来源:互联网 阅读 ()
关键字 ASP 在线查询 信息录入 信息修改
一、制作数据库和建立数据源
1、利用Microsoft Access 制作数据库,取名为information,然后制作表,表名为infor.下面写入数据字段。如图所示:
2、建立ODBC数据源(在2000 professional 系统中建立)
步骤:
控制面板à管理工具àODBC数据源à系统DSNàAdd….ODBC界面
二、系统界面
一个好的系统需要一个友好的用户界面。由于本系统是基于ASP开发的,所以,我们利用网页制作工具制作友好的用户界面。部分界面如图所示:
进入界面:
信息录入界面
信 息 查 询
三、程序实现
由于本系统是基于ASP开发的实现在线操作的系统。所以,本系统的完成需要借助HTML,又由于HTML是网页编程的基础,所以,在这里就省去HTML代码,相信大家都是HTML高手。
1、信息录入
<%
dim strsql,rs
set conn=createobject("ADODB.connection") //建立ADODB连接
conn.open ("DSN=information;UID=;PWD=;") //打开数据源information
set rs=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 ("你已经成功注册的这位学员的信息。请继续<a href='input.htm'>注册 </a>") //显示提示信息
rs.close //关闭数据记录
conn.close //关闭连接
set rs=nothing
set conn=nothing
%>
2、信息查询
<%
dim strsql,conn,rs
set conn=server.createobject("ADODB.connection")
conn.open ("DSN=information;UID=;PWD=;")
set rs=server.createobject("ADODB.Recordset")
strsql="select * from infor where name= '" & request("name") &"'"//利用SQL建立查询
rs.open strsql,conn
%>
<table width="1205" border="1" align="left" bordercolor="#6600CC">
<tr> //本行写上要显示的字段的相应的中文名
<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="122"><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="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"><font 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">入学时间</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></div></td>
</tr>
<% while Not rs.eof %> //循环语句控制符合条件的记录输出
<tr> //本行根据循环条件可以重复输出
<td><div align="center"><font size="2"><%=rs("name")%></font></div></td>
/*输出数据库中符合条件的name字段的值*/
<td><div align="center"><font size="2"><%=rs("sex")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("birth")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("xl")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("zzmm")%></font></div></td>
标签:
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有
IDC资讯: 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营: 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程: Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术: Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧: 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作: FrontPages Dreamweaver Javascript css photoshop fireworks Flash