|
||||
|
||||
|
□您现在的位置: 梧桐细雨范文网 >> 论文中心 >> 计算机类 >> 计算机应用 >> 正文 |
|
|||||
ASP制作学生档案管理系统 | |||||
作者:网络 论文来源:网络 点击数:279 更新时间:2007/3/21 | |||||
一、制作数据库和建立数据源 1、利用Microsoft Access 制作数据库,取名为information,然后制作表,表名为infor.下面写入数据字段。如图所示: 2、建立ODBC数据源(在2000 professional 系统中建立)
控制面板à管理工具àODBC数据源à系统DSNàAdd…. ODBC界面 二、系统界面 一个好的系统需要一个友好的用户界面。由于本系统是基于ASP开发的,所以,我们利用网页制作工具制作友好的用户界面。部分界面如图所示:
信息录入界面 信 息 查 询 三、程序实现
<%
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、信息查询 <%
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 %> <br 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> <td><div align="center"><font size="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"><%=rs("teach")%></font></div></td> <td><div align="center"><font size="2"><%=rs("date")%></font></div></td> <td><div align="center"><font size="2"><%=rs("tel")%></font></div></td> <td><div align="center"><font size="2"><%=rs("add")%></font></div></td> </tr> <% rs.movenext Wend rs.close conn.close %> </br> 3、信息修改 <%
conn.open "DSN=information;UID=;PWD=;" set rs=server.CreateObject("adodb.recordset") username=request("name") // 取得name表单的值赋给username strsql="select * from infor where name='"&username&"'" //建立SQL查询 rs.open strsql,conn,3,3 %> <form action="zhuce.asp" method="post"> // 以POST方式将修改的记录通过zhuce.asp页面的程序保存到数据库当中 <br width="75%" border="1" align="center" bordercolor="#663399"> <tr> <td width="18%"><div 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")%>"> </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" value="<%=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="radio" value="<%=rs.fields("sex")%>" checked> 男</label> <label> <input type="radio" name="sex" value="<%=rs.fields("sex")%>"> 女</label> <br> </p></td> <td><div align="right"><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"><font size="2">出生年月:</font></div></td> <td><font size="2"> <input name="birthday" type="text" id="birthday" value="<%=rs.fields("birth")%>"> </font></td> <td><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><div align="right"><font size="2">政治面貌:</font></div></td> <td><select name="zz" id="zz"> <option value="团员">团员</option> <option value="党员">党员</option> <option value="其他">其他</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")%>"></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> <option value="高中">高中</option> <option value="大专">大专</option> <option value="本科">本科</option> <option value="研究生">研究生</option> <option value="其他">其他</option> </select> </font></td> <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="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="5"><div align="left"> <p><font color="#FF0000" size="2">请数据录入人员认真录入学员信息,以便以</font></p> <p><font color="#FF0000" size="2">后查询!</font></p> </div></td> </tr> <tr> <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="text" id="tel" value="<%=rs.fields("tel")%>"> </font></td> </tr> <tr> <td><div align="right"><font size="2">婚姻状况:</font></div></td> <td><select name="mar" id="mar"> <option value="已婚">已婚</option> <option value="未婚">未婚</option> </select></td> </tr> <tr> <td><div align="right"><font size="2">籍贯:</font></div></td> <td><font size="2"> <input name="addr" type="text" id="addr" value="<%=rs.fields("jg")%>"> </font></td> </tr> </br> <br width="75%" border="0"> <tr> <td><div align="center"> <input type="submit" name="Submit2" value="保 存"> </div></td> <td><input type="reset" name="Reset" value="重 写"></td> </tr> </br> <p> </p> </form> |
|||||
论文录入:梧桐细雨范文网 责任编辑:梧桐细雨范文网 | |||||
【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
【网友评论】(只显示最新10条。评论内容只代表网友观点,与本站立场无关) |
|
◇网站地址:江苏省大丰市 邮编:224100 ◇本站ICP备案证书:苏ICP备06051753号 ◇本站站长:梧桐细雨 |